TextConnection.TextFilePlatform procedure builder

TextConnection.TextFilePlatform (Excel)

Returns or sets the origin of the text file that you are importing into the query table. This property determines which code page is used during the data import.

Possible Values are xlMacintosh - Macintosh, xlMSDOS - MS-DOS, xlWindows - Microsoft Windows.
ActiveWorkbook.Connections(1).TextConnection.TextFilePlatform = xlMacintosh