【VBA】テキストボックスを挿入(作成)する方法(ユーザーフォーム)

今回はユーザーフォームにテキストボックスを挿入する方法を紹介します｡

この記事では↓の内容が分かります｡

  • テキストボックスの挿入方法
  • 入力された値の取得方法
  • 初期値の設定方法

テキストボックスの挿入方法

テキストボックスは画像のようにツールボックス中のアイコンをクリックすることで追加ができます｡

入力された値の取得方法 (Valueプロパティ)

コマンドボタンを追加
Private Sub CommandButton1_Click()
    MsgBox TextBox1.Value 'テキストボックスに入力された値をメッセージで表示
End Sub

入力された値の取得にはValueプロパティを使います｡

画像のようにテキストボックスの他にコマンドボタンを追加します｡

そしてサンプルコードのCommandButton1_Clickプロシージャを追加します｡

この状態でユーザーフォームを実行してコマンドボタンを押すとテキストボックスに入力された値がメッセージボックスに表示されます｡

初期値の設定方法 (Valueプロパティ)

Private Sub UserForm_Initialize()
    TextBox1.Value = "初期値"
End Sub

初期値の設定にもValueプロパティを使用します｡

Valueプロパティに代入した値が初期値としてテキストボックスに入力されます｡

サンプルコードではUserForm_Initializeプロシージャで初期値を入れています｡
(UserForm_Initializeはユーーフォームを表示する前に自動的に実行されるプロシージャです)

VBAが難しいと感じたら
プロにお任せして代わりに作ってもらってはいかがでしょう？
VBAの作成依頼はこちらから

《VBA中級者向けの本》
VBA上級者を目指したい人にはパーフェクトExcel VBA一択です。

パーフェクトExcel VBA (PERFECT SERIES)
created by Rinker
技術評論社
¥3,608 (2023/06/06 16:32:04時点 Amazon調べ-詳細)

他の「VBA」の記事はこちらからどうぞ

VBA

Posted by やろまい