見出し画像

3行マクロ

いつも見に来ていただきありがとうございます!

今回は、Excelのマクロの記録でマクロを作ってみました。

-1000⇒△1,000

マイナス数値の円を-1000⇒△1,000
△表示+桁区切りに切り替えるマクロです。
いかんせん、この作業ですらめんどくさいので作成しました。
あとはショートカットキーを割り当て出来上がりです。
コードは↓

Sub マイナス表示()
' マイナス表示 Macro
Selection.NumberFormatLocal = "#,##0;""△ ""#,##0"
End Sub

まさに3行

これの応用版で、-1000000⇒△1,000という千円未満切り捨てのマクロも作ろうと思う。
いかんせん、Excelの桁区切りでは赤色のマイナスなるので、黒色の表示が好みです。

今日はこのマクロの他に、
・ヘッダーフッダーを全シート削除する(日付やページNoをカット)
・印刷余白を全シートで最小化する(印刷するときに出来る限り文字を大きく)
2つのマクロをつくりました。
特にショートカットにわりあてることはせずにマクロの実行でやろうと思います。

VBAのコードはあまりよくわかってないけど、マクロて作れるんだと実感しました。
マクロ作れたら、面倒くさい作業も正確に出来るので出来るる限り取り入れていきたいです。

もしよろしければスキやフォローよろしくお願いいたします

この記事が気に入ったらサポートをしてみませんか?