このサイトの記事内では「アフィリエイト広告」などの広告を掲載している場合があります。
消費者庁が問題としている「誇大な宣伝や表現」とならないよう配慮しコンテンツを制作しておりますのでご安心ください。
問題のある表現が見つかりましたらお問い合わせよりご一報いただけますと幸いです。

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

2024年4月18日

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

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

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

VBAが難しいと感じたら
自分で作るのが難しいと感じたらご相談ください。
ココナラにて、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

Posted by やろまい