HOME > 即効テクニック > Excel VBA > ユーザーフォーム関連のテクニック > フォームのテキストボックスに5桁の数字(00001)を表示する

即効テクニック

ユーザーフォーム関連のテクニック

フォームのテキストボックスに5桁の数字(00001)を表示する

(Excel 97)
テキストボックスで「1」を「00001」と表示するように、フォームを表示するときに発生するイベントで設定します。
フォームには、テキストボックス「TextBox1」を配置します。
Private Sub UserForm_Initialize()
    Dim myBango As Integer

    myBango = 1
    TextBox1.Text = Format(myBango, "00000")

End Sub