取り消し線を設定する(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 |
実行結果
関連記事
-
-
メッセージボックスを表示(MsgBox関数)
MsgBox関数 【書式】 result = MsgBox ( Prompt [ …
-
-
文字列:2つの文字列を比較する(StrComp 関数)
StrComp 関数の使い方 【書式】 result = StrComp ( s …
-
-
オブジェクトの書式をクリアする(ClearFormats メソッド)
ClearFormats メソッド 対象となるオブジェクトの書式(スタイル)を初 …
-
-
Option Compare ステートメント
Option Compare ステートメントの使い方 【書式】 Option C …
-
-
文字に下線を設定する(Underline プロパティ)
下線を設定(Underline プロパティ) Underline プロパティは、 …
-
-
指定した数のスペースを挿入する(Spc 関数)
指定した数のスペースを挿入 指定した数のスペースを挿入するには、Spc 関数を使 …
-
-
日付時刻:数値から日付・時刻データを取得( DateSerial 関数、TimeSerial 関数 )
DateSerial 関数(数値を使って日付データを取得) 【書式】 date …
-
-
引数が省略されたかどうかをチェックする( IsMissing 関数 )
IsMissing 関数の使い方 【書式】 result = IsMissing …
-
-
色の設定(ThemeColor プロパティ・TintAndShade プロパティ)
ThemeColor プロパティ・TintAndShade プロパティ テーマカ …
-
-
連想配列(Dictionary オブジェクト)
連想配列 連想配列とは、添字(キー)に文字列を使用することができる配列です。 V …
