【Word VBA】鈴描画マクロ▽ソースコード
Option Explicit
Option Base 0
'
Public Sub 鈴描画マクロ()
Const BELLLEFT = 80 '描画開始位置X
Const BELLTOPP = 90 ' Y
'
Const BELLSWID = 30 '鈴描画幅
Const BELLSHEI = BELLSWID '鈴画高さ
'
Const BELLHSIZ = (BELLSWID * 0.2) '上部サイズ
Const BELLCSIZ = (BELLSWID * 0.15) '真ん中凸サイズ
Const BELLMSIZ = (BELLSWID * 0.2) '下部穴
Const DELLGWID = 3 '下部溝幅
'
Const BELLVSPC = 18 '横-間隔
Const BELLHSPC = 20 '縦-間隔
'
Const BELLCOLS = 5 '横/描画数
0