Excel VBAでセルの表示形式の設定は、NumberFormat プロパティで行います。 下のサンプルソフトでは、数字・日付・時間・文字の代表的な例を行っています。 日付と時間のセルはNOW関数を使っています。 例えば、"[blue]#,##0;[red]-#,##0"では、正数が青色で負数が赤色になっています。 "ggge年mm月dd日(aaaa)"では、平成21年03月09日(月曜日)になっています。 関連する「令和を表示させる~セルの書式設定とText関数で表示」も掲載していますので、参考にしてください。 |
「書式設定」ボタンで、D列の表示形式を変更します。
B列は設定なし(標準)の元データです。
下記の種類の書式設定例になります。
Sub ボタン1_Click()
Range("D7").NumberFormat = "0"
Range("D8").NumberFormat = "0.00"
Range("D9").NumberFormat = "#,###"
Range("D10").NumberFormat = "#,#00"
Range("D11").NumberFormat = "#,##0;[red]-#,##0"
Range("D12").NumberFormat = "#,##0;[red]-#,##0"
Range("D13").NumberFormat = "[blue]#,##0;[red]-#,##0"
Range("D14").NumberFormat = "\\#,###"
Range("D15").NumberFormat = "0%"
Range("D16").NumberFormat = "0.00%"
Range("D18").NumberFormat = "yyyy/mm/dd"
Range("D19").NumberFormat = "yy/mm/dd"
Range("D20").NumberFormat = "ggge年mm月dd日"
Range("D21").NumberFormat = "ggge年mm月dd日(aaaa)"
Range("D23").NumberFormat = "hh:mm:ss"
Range("D24").NumberFormat = "hh:mmAM/PM"
Range("D26").NumberFormat = "@ かきくけこ"
End Sub
■■■
このサイトの内容を利用して発生した、いかなる問題にも一切責任は負いませんのでご了承下さい
■■■
当ホームページに掲載されているあらゆる内容の無許可転載・転用を禁止します