【VBA】セルに取り消し線を引く

以下のように
 ・取り消し線を引く
ことが出来ます!

VBAコード

ここでは例として、
 ・シート「sample」のセル「B5」に
 ・取り消し線
を引きます。

Sub sample()
    '取り消し線を引く
    Worksheets("sample").Range("B5").Font.Strikethrough = True
End Sub

Range(“XX”).Font.Strikethrough」に「True」を指定することで、取り消し線を引くことが出来ます。
※「False」を指定すると取り消し線が消えます。

実行結果

セルに取り消し線を引くことが出来ました。

タイトルとURLをコピーしました