[VBA]テキストボックスからエクセル反映(複数行)

質問

始めまして。初めて質問させて頂きます。至らない点があると思いますがよろしくお願い致します。

今テキストボックスよりエクセル(単一セル)に文字を入力するシートを作成しております。
テキストボックスで複数行入力(Enterで改行)の方法と複数行入力した文字をシート(1セル)に反映したいのですが良い方法をご存知でしたらご教授お願いします。

【やりたい事項】
テキストボックス内
(1)○は△です。(Enterで改行)
(2)×は●です。

エクセルシート上(A1セルで)
(1)○は△です。(ALT+Enter)
(2)×は●です。

現状：MultiLineをTRUEにして右端まで文字入力すると2行目に入力可能
エクセルに反映すると「○は△です。×は●です。」と1セルで1行で表示となってます。

言葉足らずかもしれませんが、よろしくお願いします。

回答No.1

onlyrom · ベストアンサー

TextBoxに複数行入力させる場合は２つのプロパティが関係します。

MultiLineプロパティと
EnterKeyBehaviorプロパティの２つです。

（１）MultiLineプロパティのみ True　の場合は、

　　　　Ctrl+Enter　で改行となります。

（２）MultiLine、EnterKeyBehaviorプロパティの２つとも　True　の場合

　　　　Enter　で改行となります。

ですから、質問のようにEnterで改行させたいときは？
上記２つのプロパティをTrueにしなければならないということです。

そうすれば、
Range("A1").Value = TextBox1.Value　でご希望の結果になります。

以上。

お礼

お返事が遅くなり申し訳ありません。

上記設定をしました所希望する動作となっておりました。

素早い回答ありがとうございます。