取り消し線を設定する(Strikethrough プロパティ)
取り消し線を設定する(Strikethrough プロパティ)
Strikethrough プロパティに、True を設定すると指定した対象に取り消し線が表示されます。値の取得および設定が可能です。
【書式】
<取得>
object.Strikethrough
<設定>
object.Strikethrough = boolean
引数・戻り値
- object ・・・ 対象となる Font オブジェクトを指定します。
- boolean ・・・ ブール型(Boolean)の値を使用します。True を設定すると取り消し線が表示されます。
取り消し線を設定(Strikethrough プロパティ) 使用例
サンプルVBAソース
|
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 |
Sub Sample_Font04() With Range("B2") .Value = "あいうえおかきくけこ" .Font.Size = 14 .Font.Strikethrough = True .EntireColumn.AutoFit End With With Range("B5") .Value = "たちつてとなにぬねの" .Font.Size = 20 .Characters(Start:=6, Length:=3).Font.Strikethrough = True .EntireColumn.AutoFit End With End Sub |
実行結果
関連記事
-
-
変数が配列かどうかをチェックする( IsArray 関数 )
IsArray 関数の使い方 【書式】 result = IsArray( va …
-
-
データをクリアする(ClearContents メソッド)
ClearContents メソッド 対象がセル範囲(Range オブジェクト) …
-
-
エラー(CVErr 関数・IsError 関数・Error 関数)
CVErr 関数(エラー番号をエラー値に変換する)の使い方 【書式】 retur …
-
-
変数がオブジェクト型かどうかをチェックする( IsObject 関数 )
IsObject 関数の使い方 【書式】 result = IsObject ( …
-
-
ポイント単位の値に変換(CentimetersToPoints,InchesToPoints)
CentimetersToPoints メソッド センチメートル単位の値をポイン …
-
-
指定した値を8進数で表記した文字列に変換する(Oct 関数)
Oct 関数 の使い方 【書式】 result = Oct ( expressi …
-
-
乱数ジェネレータを初期化 (乱数系列を再設定) する(Randomize ステートメント)
Randomize ステートメントの使い方 Rnd 関数 を使用する前に使用しま …
-
-
Join 関数(配列の要素を結合)
Join 関数 1次元配列の各要素を指定した区切り文字で連結します。 【書式】 …
-
-
上付き文字・下付き文字(Superscript,Subscript)
上付き文字(Superscript プロパティ) Superscript プロパ …
-
-
Math 関数( Abs,Atn,Cos,Exp,Log,Rnd,Sgn,Sin,Sqr,Tan )
Abs 関数 【書式】 value = Abs ( number ) 【引数・戻 …
