(5) Check5-sonota
[1].ハイパーリンク(Ver2.32)

    VBA便利帳
郷土への思い「木曽上松町」 Excelで株投資

[2]HTMLタグで書いたリンク

http://www2s.biglobe.ne.jp/~iryo
ExcelVBA便利帳
ExcelVBA便利帳（TARGET="_top"のタグ）

[3]テーブルの形状をExcelシートへ記入（KIweb適用のルール　# BORDER=0 WIDTH=300 ）(#は2個）
AAAA BBBBBB
CCCC DDDDDD

　
[4]テーブルの形状をExcelシートへ記入（KIweb適用のルール　# BORDER=2 WIDTH=400）(#は2個）
AAAA BBBBBB
CCCC DDDDDD


[5]各テ－ブル幅の指定(ピクセル）（KIweb適用のルール　# WIDTH 60　50　40　・・・ ）
ああ いい うう ええ おお かか
aaaa bbb ccc ddd eee fff


[6]各テ－ブル幅の指定(%）（KIweb適用のルール　# WIDTH 15%　20% 25% ・・・ ）
ああ いい うう ええ おお かか
aaaa bbb ccc ddd eee fff


[7]テ－ブル幅指定解除（KIweb適用のルール　# WIDTH ）（解除しない場合は⑤⑥はシートないで継続適用）
ああ いい うう ええ おお かか
aaaa bbb ccc ddd eee fff

[8]HTMLタ グ＜per＞＜/per＞で書いたままにWebに表示
Sub 図形1_1()
Dim zusuu As Integer
Dim zu As Object
    ThisWorkbook.Sheets("図形").Select
        For Each zu In ActiveSheet.Shapes
            zu.Delete
            zusuu = zusuu + 1
        Next
DoEvents
MsgBox "図形を「" & zusuu & "」個削除しました。"
End Sub