Excelマクロを使用して1つのセルに複数の行をカンマで区切ります

Question

こんにちは、そこには複数の項目があるExcelセルがあります。それらはすべてカンマで区切られています。 Excelワークブックが生成されると、自動的に項目が生成され、各項目がコンマで区切られます。しかし、問題は、Excelのマクロを実行して、各項目を別々の行に置いておきたいときです。各コンマの後に本質的に改行が入ります。この問題は、一度にセルにどれくらいの時間があるかわからないので、動的にする必要があります。何か案は？

更新：

Dim originalApplications As String 
Dim splitApplications As Variant 
Dim i As Integer 

originalApplications = Range("E2").Value 


splitApplications = Split(originalApplications, ",") 

For i = 0 To UBound(splitApplications) 

    MsgBox splitApplications(i) 

Next i 

は今、私はちょうどそれを破る整列する方法を把握する必要があります。あなたのループでは

Answer 1

あなたは、セル

const startRow = 10 
const assignCol = 1 
For i = 0 To UBound(splitApplications) 

    Cells(i+startRow,assignCol).Value = splitApplications(i) 

Next i