08/07/21 14:00:09
すみません、よくわからないので教えてください(excel2003)
1つのセルの中にALT+Enterで改行を入れ、複数項目を入れた場合
項目1つ1つを取り出すにはどうしたらよいのでしょうか?
tmp = Split(ActiveSheet.Range("A1").Value, "\n")
For i = 0 To UBound(tmp)
MsgBox tmp(i)
Next i
というようなコードを書いたのですが、すべて取得してしまいます
\nを\r、\r\nに変えても駄目でした