【Word VBA】露芝文様描画マクロ▽ソースコード
Option Explicit
Option Base 0
'
Public Sub 露芝文様描画マクロ() Const DEWGLEFT = 90 '描画開始位置X
Const DEWGTOPP = 80 ' Y
'
Const DEWGVSPC = 60 '横-間隔
Const DEWGHSPC = 25 '縦-間隔
'
Const DEWGMWID = 15 '描画幅(90度回転)
Const DEWGMHEI = 40 '描画高さ
Const DEWGMVST = (DEWGMHEI / 5) 'ずれ幅-横 Const DEWGMHST = (DEWGMWID / 8) 'ずれ幅-縦 '
Const DEWGODR0 = 5 '露直径1
Const DEWGODR1 = 3 '露直径2
Const DEWGCOLS = 4 '横/描画数
Const DEWGROWS = 6 '縦/描画数
'
Const DEWGLNWE = 1.5 '線の太さ
'
Const DEWGMADJ = 0.1 '三日月太さ
'--------------------------------------------------------
0