ＶＢＡでの質問

質問

ＶＢＡでの質問
お世話になります。
初歩的な質問なのですが、ユーザーフォームでテキストボックスを設け
ユーザーから月を入力してもらおうとしていますが、例えば一桁で入力
してもらったとしても、変数の中に二桁で格納したいのです。
そこで、下記の様に記述して見ましたがうまくいきませんでした。
すみませんがご教授頂きたく、宜しくお願い申し上げます。
　　　　　　　　　　　　記
a = TextBox1
Mytuki = Format(a, "mm")

回答No.1

myRange · ベストアンサー

＞Mytuki = Format(a, "mm")

"mm"　は、日付の書式です。
今回は、単に数値を入力するわけですから数値の書式にします。

myTuki = Format(a, "00")

または文字列処理をして、

myTuki = Right("00" & a, 2)

以上です。

お礼

早々のご回答ありがとうございました。
大変参考になりました。