VBA Texto para Coluna e Linha

Question

Boa noite Pessoal.

Tenho uma Tabela que vai receber no campo ativo um texto separado por ";" e por "/" e a minha divida é a seguinte:

Como separar a texto em colunas usando o ";" e quando achar o "/" ir para proxima linha e preencher as colunas e assim por diante?

exemplo:

	A
1	Robson;Ollevruc;32/Gabriela;Antonieta;22/Anderson;Adolf;38/Jackson;Amarildo;66

A tabela ficaria assim:

	A	B	C
1	Robson	Ollevruc	32
2	Gabriela	Antonieta	22
3	Anderson	Adolf	38
4	Jackson	Amarildo	66

Separar em colunas eu encontrei a função a seguir:

Sub ExampleSplit1()
    Selection.TextToColumns _
      Destination:=ActiveCell, _
      DataType:=xlDelimited, _
      TextQualifier:=xlDoubleQuote, _
      ConsecutiveDelimiter:=False, _
      Tab:=True, _
      Semicolon:=False, _
      Comma:=False, _
      Space:=False, _
      Other:=True, _
      OtherChar:=";"
End Sub

Porem não sei como mudar de linha.

Agradeço desde já!!!