Excel（エクセル）のマクロ・ＶＢＡ・関数・操作などのメモ

取り消し線を設定する（Strikethrough プロパティ)

2015/07/28

取り消し線を設定する（Strikethrough プロパティ)

Strikethrough プロパティに、True を設定すると指定した対象に取り消し線が表示されます。値の取得および設定が可能です。

【書式】

＜取得＞
object.Strikethrough

＜設定＞
object.Strikethrough = boolean

引数・戻り値

object ・・・対象となる Font オブジェクトを指定します。
boolean ・・・ブール型（Boolean）の値を使用します。True を設定すると取り消し線が表示されます。

取り消し線を設定（Strikethrough プロパティ) 使用例

サンプルVBAソース

　
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

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

　

実行結果

- VBA基本 Font オブジェクト, Strikethrough プロパティ, VBA基本, エクセルVBA

Tweet

Message コメントをキャンセル

このサイトはスパムを低減するために Akismet を使っています。コメントデータの処理方法の詳細はこちらをご覧ください。

関連記事

: フォント太字・斜体（Bold, Italic, FontStyle プロパティ）

太字の設定（Bold プロパティ） Bold プロパティは、フォントを太字にする …

: 日付時刻：日付から曜日を取得（ Weekday 関数、WeekdayName 関数）

Weekday 関数（日付から曜日を表す数値を返す）の使い方【書式】 week …

: 日付時刻：日付・時刻の間隔を取得（ DateDiff 関数）

DateDiff 関数の使い方【書式】 result = DateDiff ( …

: 列挙型変数（Enum ステートメント）

列挙型変数を使う列挙型変数を使用するには、Enum ステートメントを使って、宣 …

: 変数が日付型かどうかをチェックする（ IsDate 関数）

IsDate 関数の使い方【書式】 result = IsDate( expr …

: 出力位置、書き込み位置を設定（Tab 関数）

出力位置、書き込み位置を設定 Tab 関数は、Print メソッド、または P …

: フォントサイズ（Size プロパティ・StandardFontSize プロパティ）

フォントサイズを取得・設定する（Size プロパティ） Size プロパティは、 …

: 文字列：アルファベットを小文字または大文字に変換（LCase 関数,UCase 関数）

LCase 関数・UCase 関数の使い方【書式】＜アルファベットの大文字 …

: xlFileFormat 列挙型

xlFileFormat 列挙型 Workbook.SaveAs メソッドの引 …

: 配列（多次元配列・配列の次元の変更）

多次元配列【書式】　多次元配列の宣言＜静的配列（固定長配列）＞ Dim my …

PREV: フォントサイズ（Size プロパティ・StandardFontSize プロパティ）
NEXT: 上付き文字・下付き文字（Superscript,Subscript）