> 行いたいこととしましては、
> @ユーザーフォーム1にテキストボックスを配置し、商品選択ボタンを配置。
> A商品選択のユーザーフォーム2を開き、リストボックスの中から項目を複数選択。
> B「追加」ボタンで別シートに選択項目をコピー。
ここまではできているようですね。
> C別シートの項目をユーザーフォーム1のテキストボックスに反映。
ここをどうするか? ということですね。
ユーザーフォーム1にコマンドボタンを配置して、これをクリックするとシートの値を
テキストボックスに表示する。という方法ではいかがですか?
どのようなタイミングでテキストボックスを書き換えるコードを実行するのか・・・ということですよね?
簡単な例ですが、標準モジュールには
Sub test()
Load UserForm1
UserForm1.Show vbModeless
End Sub
ユーザーフォームへはテキストボックスとコマンドボタンが配置しています。
Private Sub UserForm_Initialize()
TextBox1.Value = "AAA"
End Sub
Private Sub CommandButton1_Click()
TextBox1.Value = Worksheets("Sheet1").Range("B2").Value
End Sub
B2セルの値を変更して、フォームのコマンドボタンを押すと、B2セルの値が表示されます。
|