第7回.テキストボックス(TextBox)の値をセルへ
ユーザーフォーム入門として基礎から解説します。
ユーザーフュームのテキストボックスに入力した値を、ワークシートのセルに出力します。
前回までに作成したユーザーフォーム
ワークシートの用意
シート名は、「顧客マスタ」
実行ボタンには、先に作成してある、
Sub FormShow()
frmSample.Show
End Sub
このプロシージャーを割り当てておきましょう。
OKボタンクリック時のイベントプロシージャー作成
「OK」ボタンをダブルクリックし以下のイベントを追加します。
選択するオブジェクトにより既定のイベントが自動挿入されます。
目的のイベント以外の場合は、右側のイベント選択で目的のイベントを選択します。
Private Sub btnOk_Click()
End Sub
これを以下に変更します。
Private Sub btnOk_Click()
Dim lastRow As Long
With Worksheets("顧客マスタ")
lastRow = .Cells(.Rows.Count, 1).End(xlUp).Row + 1
.Cells(lastRow, 1).Value = Me.txtコード.Text
.Cells(lastRow, 2).Value = Me.txt漢字名称.Text
.Cells(lastRow, 3).Value = Me.txtカナ名称.Text
End With
Unload Me
End Sub
これで完成です。
Textプロパティ、または、Valueプロパティで取得します。
テキストボックスに入力してから、「OK」ボタンを押下してみましょう。
一番下に、テキストボックスの値が入りましたね。
ユーザーフォームのインテリセンス
実際にタイピングして入力してみて下さい。
すると、何かに気がつくと思います。
Me.
ここまで入力したときに、インテリセンス（自動補完）が効きます。
Me.txt
ここまで入力すると、
そうです、名前を確認しやすくなりますし、効率が良くなります。
今回はここまでです。
次回は、今回とは逆にワークシートの値をテキストボックスに表示します。
ではまた次回お会いしましょう。
同じテーマ「ユーザーフォーム入門」の記事
第4回.コントロールの位置・サイズ調整
第5回.ラベルの追加
第6回.テキストボックス(TextBox)の追加
第7回.テキストボックス(TextBox)の値をセルへ
第8回.セルの値をテキストボックスへ
第9回.標準モジュールとフォーム間のデータ受け渡しⅠ
第10回.標準モジュールとフォーム間のデータ受け渡しⅡ
第11回.コンボボックス(ComboBox)の追加
第12回.リストボックス(ListBox)の追加
第13回.チェックボックス(CheckBox)の追加
第14回.オプションボタン(OptionButton)の追加
新着記事NEW ・・・新着記事一覧を見る
構成比を合計しても100%にならないと言われた…｜ツイッター出題回答 (2022-09-01)
一覧から複数条件（部分一致、範囲）に合致するデータを抽出する｜ツイッター出題回答 (2022-08-30)
縦横スピルしないXLOOKUP代替（MATCH+INDEX,FILTER,CHOOSEROWS）｜エクセル入門(2022-08-27)
IF関数の論理式で比較演算子を省略したCOUNT系関数を書くのは｜ツイッター出題回答 (2022-08-23)
LAMBDA以降の新関数の使用例｜エクセル入門(2022-08-22)
数珠順列（配置に条件付き）を全て出力する｜ツイッター出題回答 (2022-08-20)
日付時刻のマイナス表示に対応する方法｜ツイッター出題回答 (2022-08-17)
LAMBDA以降の新関数について｜エクセル入門(2022-08-16)
条件付きの最大値と中央値（"A"が2文字の条件）｜ツイッター出題回答 (2022-08-14)
VBAマクロと操作対象データの分離について｜ツイッター出題回答 (2022-08-11)
アクセスランキング ・・・ ランキング一覧を見る
1.最終行の取得（End,Rows.Count）｜VBA入門
2.RangeとCellsの使い方｜VBA入門
3.変数宣言のDimとデータ型｜VBA入門
4.繰り返し処理（For Next)｜VBA入門
5.セルのコピー&値の貼り付け（PasteSpecial）｜VBA入門
6.Excelショートカットキー一覧｜Excelリファレンス
7.並べ替え（Sort）｜VBA入門
8.マクロって何？VBAって何？｜VBA入門
9.Range以外の指定方法（Cells,Rows,Columns）｜VBA入門
10.エクセルVBAでのシート指定方法｜VBA技術解説
- ホーム
- マクロVBA応用編
- ユーザーフォーム入門
- テキストボックス(TextBox)の値をセルへ
このサイトがお役に立ちましたら「シェア」「Bookmark」をお願いいたします。
記述には細心の注意をしたつもりですが、
間違いやご指摘がありましたら、「お問い合わせ」からお知らせいただけると幸いです。
掲載のVBAコードは動作を保証するものではなく、あくまでVBA学習のサンプルとして掲載しています。
掲載のVBAコードは自己責任でご使用ください。万一データ破損等の損害が発生しても責任は負いません。