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

関連記事

: VBA の演算子（比較演算子）

比較演算子比較演算子による演算の結果は「真」の場合は「True」、「偽」の場合 …

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

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

: テキストファイル（UTF-8）を読み込み、書き出し（ADODB.Stream）

Stream オブジェクト ADO（ActiveX Database Objec …

: オートシェイプの種類を表す定数（MsoAutoShapeType 列挙型）

MsoAutoShapeType 列挙型オートシェイプオブジェクトの図形の種類 …

: カレントフォルダ（CurDir 関数、ChDir ステートメント、ChDrive ステートメント）

カレントフォルダカレントフォルダとは、ブックを開いたり保存するときに既定で参照 …

: VBAの変数宣言

VBAの変数宣言について変数を暗黙的に宣言するエクセル VBA の場合、明示 …

: Split 関数（文字列型の一次配列を作成）

Split 関数の使い方【書式】 myArray = Split ( expr …

: 四捨五入・切り上げ・切り捨て・丸め（Round 関数他）

Round 関数（丸め）の使い方【書式】 value = Round ( ex …

: 変数がEmpty 値かどうかをチェックする（ IsEmpty 関数）

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

: 文字列：文字列左から指定文字数取得（Left 関数,LeftB 関数）

Left 関数・LeftB 関数の使い方【書式】 result_left = …

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