こんにちはゲストさん。会員登録(無料)して質問・回答してみよう!

解決済みの質問

VBA テキストボックスの改行

現在、テキストボックスに入力された文字列を
セルに入力するプログラムを作っています。
その際、テキストボックス内で
あいうえお[改行]
かきすけこ
と入力された場合、
セル[A1]あいうえお
セル[A2]かきすけこ
としたいのですが何か方法はありますか?
回答よろしくお願い致します。

投稿日時 - 2008-12-05 17:11:39

QNo.4532137

すぐに回答ほしいです

質問者が選んだベストアンサー

ANo.1です。

取り敢えず締め切っていないので応用編をば。

Dim x As Variant
x = Split(TextBox1.Text, vbLf)
Range("A1").Resize(UBound(x) + 1).Value = Application.Transpose(x)

ではどうでしょう?

投稿日時 - 2008-12-05 23:00:09

お礼

ご返事遅くなり申し訳ございません。
思っていた通りの事が出来ました。
ありがとうございます。

投稿日時 - 2008-12-08 09:54:12

ANo.2

このQ&Aは役に立ちましたか?

2人が「このQ&Aが役に立った」と投票しています

回答(2)

ANo.1

取り敢えず2行限定で

Range("A1").Resize(2).Value = Application.Transpose(Split(TextBox1.Text, vbLf))

あとは上手く応用して下さい。

投稿日時 - 2008-12-05 17:52:26

お礼

回答ありがとうございます。
早速、応用してやってみます。

投稿日時 - 2008-12-05 17:58:47

あなたにオススメの質問