Разделение текстов в одной ячейке на несколько ячеек с помощью Excel / Excel VBA

Question

Я собрал данные из веб-поиска, используя python, но оказалось, что все комментарии на одной странице собраны в одну ячейку в Excel. Есть ли какие-либо функции Excel или функции / коды Excel VBA, которые я мог бы использовать, чтобы разделить все данные в свою собственную ячейку?

[Мари Рассел,
Оливия,
Кэт ie Джейд,
Элади Старр,
Анджела Грэм,
Хиллари,
Энн Хадак,
Dag107,
Сара Саммербелл,
Келли Силл,
Линетт Старлепер,
KatherineC605 ,
Рэйчел,
Одалис Мельгар,
Алиса Р,
Джина Дж Кэри,
Донна Джулиан,
Шарикка Фрайлон,
Элизабет Марсенаро,
Шеннон Бузцелл]

Answer 1

Sub TransposeRange()
'Updateby20140312
Dim rng As Range
Dim InputRng As Range, OutRng As Range
xTitleId = "KutoolsforExcel"
Set InputRng = Application.Selection.Range("A1")
Set InputRng = Application.InputBox("Range(single cell) :", xTitleId, InputRng.Address, Type:=8)
Set OutRng = Application.InputBox("Out put to (single cell):", xTitleId, Type:=8)
Arr = VBA.Split(InputRng.Range("A1").Value, ",")
OutRng.Resize(UBound(Arr) - LBound(Arr) + 1).Value = Application.Transpose(Arr)
End Sub