URGENT HELP NEEDED - TURNING LIST FROM ONE CELL INTO

[whippler]

SEPARATE ROWS.

IS THERE A FXN OR MACRO TO TAKE A COPIED OUTLOOK DISTRIBUTION (USING SEMI COLONS) INTO SEPARATE ROWS AS OPPOSED TO ONE CELL IN EXCEL?

 

[PA HS Teacher]

Did you want something like this?

Dim myArr() As String
Dim i As Long
   myArr = Split(";a;b;c;d", ";") ' replace with your own string
For i = 1 To UBound(myArr)
   ActiveSheet.Cells(i, 1).Value = myArr(i)
Next i