Então eu tive um problema semelhante,
Eu criei uma macro com minhas configurações desejadas, veja abaixo:
Sub OpenSpool()
Workbooks.OpenText Filename:="C:\Downloads\SPOOL_PRHN", Origin:=xlMSDOS, _
StartRow:=1, DataType:=xlDelimited, TextQualifier:=xlDoubleQuote, _
ConsecutiveDelimiter:=False, Tab:=True, Semicolon:=False, Comma:=True, _
Space:=False, Other:=False, FieldInfo:=Array(Array(1, 1), Array(2, 1), Array( _
3, 1), Array(4, 1), Array(5, 1), Array(6, 1)), TrailingMinusNumbers:=True
End Sub
Você precisaria alterar o local do arquivo,
Para obter as configurações desejadas, copie-o do arquivo de palavras, grave uma macro e use o texto para a função de colunas. Uma vez feito olhar na macro para obter suas configurações e copiar para o acima com a localização do arquivo, etc.