TextConnection.TextFilePlatform (Excel)
Retorna ou define a origem do arquivo de texto que você está importando para a tabela de consulta. Essa propriedade determina que página de código será usada durante a importação de dados. Leitura/gravação XlPlatform. Os valores de retorno possíveis são xlMacintosh - Estes, xlMSDOS - Tais, xlWindows - Microsoft WindowsMicrosoft Windows.
ActiveWorkbook.Connections(1).TextConnection.TextFilePlatform = xlMacintosh