初歩的な質問

質問

お世話になります。
ユーザーフォームで下記の様にテキストボックスに
品番を入力し、Ａ２セルにその値を表示させていますが、

その後、ユーザーフォームはＣｌｏｓｅさせ、
通常の標準モジュールでのＶＢＡの記述に、繋げたい
のですが、どういう様な記述をしたら１回のマクロ実行
で済むのでしょうか？
途切れ途切れでうまく行きませんでした。
ご教示下さいます様、宜しくお願い致します。

　　　　　　　　　記

Private Sub CommandButton1_Click()
Sheets("結果").Range("a2") = TextBox1.Value
End Sub

回答No.1

end-u · ベストアンサー

単純に考えると
Private Sub CommandButton1_Click()
　　Sheets("結果").Range("a2") = TextBox1.Value
　　Unload Me
　　Call Macro1 'Macro1 は標準モジュールに書いたマクロ名
End Sub
...な感じですが
>途切れ途切れでうまく行きませんでした。
これがちょっと気になりますね。
上記でうまくいかない場合は、実際に試したコードを掲載したほうが良いでしょう。

お礼

うまくいきました。
ありがとうございました。