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 を使っています。コメントデータの処理方法の詳細はこちらをご覧ください。

関連記事

: 文字列：文字列の一部を別の文字列で置換（Replace 関数）

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

: 文字列：文字列右から指定文字数取得（Right 関数,RightB 関数）

Right 関数・RightB 関数の使い方【書式】 result_righ …

: 日付時刻：現在の日付・時刻を取得・設定（Now、Date、Time）

現在の日付・時刻を取得・設定現在の日付・時刻を取得（Now 関数、Date 関 …

: カレントフォルダの取得・設定（DefaultFilePath プロパティ）

DefaultFilePath プロパティカレントフォルダとは、ブックを開いた …

: ユーザー定義定数（Const ステートメント）

定数を使うユーザー定義の定数を使用するには、Const ステートメントを使って …

: 文字列：指定した数の空白（スペース）からなる文字列を返す（Space 関数）

Space 関数【書式】 result = Space ( number ) …

: 日付時刻：年・月・日を取得（Year、Month、Day 関数）

日付から年・月・日を取得する関数【書式】 date_year = Year ( …

: セルのデータを固定長形式で複数のセルに分割する（TextToColumns メソッド・Parse メソッド）

固定長形式でセルを分割 TextToColumns メソッドや Parse メソ …

: 対象のオブジェクトをクリアする（Clear メソッド）

Clear メソッド対象となるオブジェクト全体をクリアします。Range オブ …

: ポイント単位の値に変換（CentimetersToPoints,InchesToPoints）

CentimetersToPoints メソッドセンチメートル単位の値をポイン …

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