質問: excel vbaのtextboxについて こんにちは。 excelのユーザーフォームのテキストボックスに、 あああ いいい と改行されたデータを入力した後、 セルa1に「あああ」 セルa2に「いいい」とできないでしょうか。 windows2000、office2003です。 あまり詳しくないので説明不足な点もあると思いますが、よろしくお願いいたします。
回答: vbe画面で挿入ーユーザーフォーム そのフォームにテキストボックスとコマンドボタンをツールボックスからd&dして、1つづつ貼り付けます。 コマンドボタンにクリックイベントを private sub commandbutton1_click() a = textbox1.text s = split(a, chr(10)) for i = 0 to ubound(s) worksheets("sheet4").cells(i + 1, "a") = s(i) next i end sub にします(上記を貼り付け) sheet4は適当に変えてください。 テキストボックスのプロパティボックスを開き enterkeybehavior=true multiline=true wordwrap=true を設定する。 そして実行する。 テキストボックスの中へ文字を入力する。 例 (+は続けて入力を示す。) おおた ひとし+(改行) 東京都千代田区+(改行) 大田 均+(改行) ・・ コマンドボタンをクリックする a1セル以下のセルに分かれて 上記語句・文章が入るでしょう。 質問には、こんなことでよいでしょうか。