テキストボックスで「1」を「00001」と表示するように、フォームを表示するときに発生するイベントで設定します。 フォームには、テキストボックス「TextBox1」を配置します。
Private Sub UserForm_Initialize() Dim myBango As Integer myBango = 1 TextBox1.Text = Format(myBango, "00000") End Sub
利用者の皆様にお知らせです。
マイクロソフト オフィス スペシャリスト(MOS)
ビジネス統計スペシャリスト
IC3(アイシースリー)
VBAエキスパート
アドビ認定プロフェッショナル
Microsoft認定資格
App Development with Swift