第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 ・・・新着記事一覧を見る
キーボード操作だけで非表示列を表示｜エクセル雑感(2021-05-11)
変数を考えることはロジックを考える事｜エクセル雑感(2021-04-11)
RangeオブジェクトのFor EachとAreasについて｜VBA技術解説(2021-04-08)
PropertyのSetはLetでも良い｜VBA技術解説(2021-03-31)
エクセル麻雀ミニゲーム｜VBAサンプル集(2021-03-09)
VBA100本ノック 100本目：WEBから100本ノックのリストを取得｜VBA練習問題(2021-03-03)
VBA100本ノック 魔球編：2桁の最小公倍数｜VBA練習問題(2021-02-02)
Select Caseでの短絡評価（ショートサーキット）の使い方｜VBA技術解説(2021-01-03)
VBA100本ノック 迷宮編：巡回セル問題｜VBA練習問題(2020-12-31)
VBA100本ノック 魔球編：閉領域の塗り潰し｜VBA練習問題(2020-12-16)
アクセスランキング ・・・ ランキング一覧を見る
1.最終行の取得（End,Rows.Count）｜VBA入門
2.Excelショートカットキー一覧｜Excelリファレンス
3.RangeとCellsの使い方｜VBA入門
4.マクロって何？VBAって何？｜VBA入門
5.変数宣言のDimとデータ型｜VBA入門
6.繰り返し処理（For Next)｜VBA入門
7.ひらがな⇔カタカナの変換｜エクセル基本操作
8.Range以外の指定方法（Cells,Rows,Columns）｜VBA入門
9.セルのコピー&値の貼り付け（PasteSpecial）｜VBA入門
10.セルに文字を入れるとは（Range,Value）｜VBA入門
- ホーム
- マクロVBA応用編
- ユーザーフォーム入門
- テキストボックス(TextBox)の値をセルへ
このサイトがお役に立ちましたら「シェア」「Bookmark」をお願いいたします。
記述には細心の注意をしたつもりですが、
間違いやご指摘がありましたら、「お問い合わせ」からお知らせいただけると幸いです。
掲載のVBAコードは動作を保証するものではなく、あくまでVBA学習のサンプルとして掲載しています。
掲載のVBAコードは自己責任でご使用ください。万一データ破損等の損害が発生しても責任は負いません。