ＶＢＡ 日付を出力するときの書式

Question

セルに日付を月/日として出力したい場合のコードは下記のコードでよろしいでしょうか？

Cells(5, 2).Value = Format(CStr(month2) + "/" + CStr(i), "m/d")

month2は、月の格納変数で、iは、日の格納変数です。
上記のコードを実行すると、○月○日という表示になってしまいます。

Answer 1

Cells(5, 2).NumberFormatLocal = "m/d;@"
Cells(5, 2).Value = Format(CStr(month2) + "/" + CStr(i), "m/d")

のように、セルの書式を設定してからValueを代入してはいかがでしょうか？

Cells(5, 2)の「セルの書式設定」が『標準』になっているので、○月○日と表示されてしまっているのではないでしょうか？

Answer 2

無理やりセルに入れたいのであれば、
"'" & [月日]
と頭にアポストロフィーを追加すると、
セル側で自動変換されず、文字列として出力できます。

セル側では日付系の値は、日付型の値に自動変換されてしまうので注意ですね。

そもそもですが、月 + "/" + 日とするならFormat関数の意味はなく
Format(yyyy/m/d, "m/d")と使って
m/d 形式の値を取得する使い方になります。