セルに行を挿入する必要がありますが、改行を挿入できません。
例えば :
ライン1
2行目
ライン3
VBA コードの場合:
Ws.Cells(i, 2) = line1 & line2 & line3
私は得る:
ライン1 ライン2 ライン3
この問題を解決するにはどうすればよいですか?
これはあなたがしようとしていることですか?
Ws.Cells(i, 2).Value = "line1" & vbnewline & "line2" & vbnewline & "line3"
また
Ws.Cells(i, 2).Value = "line1" & vbCrLf & "line2" & vbCrLf & "line3"
編集:コメントに記載されているように引用符を挿入しました。
いくつかの組み合わせをテストしましたが、結果は次のとおりです。
cell(a,b) = line1 & vbCrLf & line2
結果:
line1**
line2
cell(a,b) = line1 & vbCr & line2
結果:
line1line2
cells(a,b) = line1 & vbLf & line2
結果:
line1
line2
上記の結果では、* は空白を表します (理由はわかりません)。そのため、セルのコンテンツを水平方向に中央揃えする場合は、vbCrLf はお勧めしません。私の好みは vbLf です。
VBA の改行はvbCrLf
文字列と連結できます。
Ws.Cells(i, 2) = line1 & line2 & Chr(10) & line3
参考までに、入力しやすい変数名を使用することで、コーディングのタイプミスを防ぐことができます。
bx = vbCrLf
textstring = "Hello everybody!" & bx & "This is my second line!"