Visual Basic para Aplicaciones - Dar formato a texto en word

Hola a todos.

He puesto el mismo post en el foro VB ADO, y creo que me he confundido, que va mejor aqui, perdon.

Estoy haciendo una macro en word para darle formato a un texto que me pasan en un doc con texto plano. El caso es que este doc tiene más de 600 hojas, y más o menos ese número de tablas, es decir, lineas de este estilo:

numero;empresa;codigo;
xxx;yyy;zzz
xxx;yyy;zzz
...
xxx;yyy;zzz

lo tengo que convertir en tabla, y la verdad es que tarda muchisimo. Hay alguna forma de hacer una tabla con una macro más rapidamente, sin tener que hacer lo siguiente:

Selection.ConvertToTable ...

With Selection.Cells
With .Shading
...
End With
With .Borders(wdBorderLeft)
...
End With
With .Borders(wdBorderRight)
...
End With
With .Borders(wdBorderTop)
...
End With
With .Borders(wdBorderBottom)
...
End With
With .Borders(wdBorderHorizontal)
...
End With
With .Borders(wdBorderVertical)
...
End With

Gracias por la ayuda y un saludo