セル表示形式の設定

 

NumberFormatLocalプロパティによる書式設定

 

Sub test()

 

    ’  1行目を文字列に
    Rows(1).NumberFormatLocal = "@"
    
    ’  B列を日付、年月日8桁形式に
    Range("B:B").NumberFormatLocal = "yyyy/mm/dd"

    ’  C列をカンマ区切りで0サプレスに
    columns(3).NumberFormatLocal = "#,###"

    ’  セルD2:D5を小数点2桁固定に
    Range("D2:D5").NumberFormatLocal = "#0.00"

 

End Sub

 

実行結果

 

"="右の書式記号は、「セルの書式設定」ダイアログの「表示形式」と同じです。

 

 

主要書式記号例

 

 

 Format関数による書式変換

 

Sub test2()

 

    ’ A2の文字を携帯番号風にハイフンで桁分け

    Cells(2, 2) = Format(Cells(2, 1), "000-0000-0000")

 

End Sub

 

実行結果

 

― ― ― ― ― ― ― ― ― ― → Excel VBA基礎入門もくじ へ戻る 

 

 

関連記事 

 

VBA セル罫線操作(罫線太さや色)

VBA セル罫線操作(罫線種類)

VBA セル罫線操作(罫線位置)

VBA セルの操作 文字書体設定

VBA セルの操作 もじ色の設定

VBA セルの操作 背景色の設定

VBA セルの操作 値の代入

VBA始める前の準備

VBAとは?