TextFileOtherDelimiter Property [Excel 2003 VBA Language Reference]
Returns or sets the character used as the delimiter when you import a text file into a query table. The default value is Null. Read/write String.
Use this property only when your query table is based on data from a text file (with the QueryType property set to xlTextImport), and only if the value of the TextFileParseType property is xlDelimited.
If you specify more than one character in the string, only the first character is used.
This example sets the pound character (#) to be the delimiter for the query table on the first worksheet in the first workbook, and then it refreshes the query table.
Set shFirstQtr = Workbooks(1).Worksheets(1) Set qtQtrResults = shFirstQtr.QueryTables _ .Add(Connection := "TEXT;C:\My Documents\19980331.txt", _ Destination := shFirstQtr.Cells(1,1)) With qtQtrResults .TextFileParseType = xlDelimited .TextFileOtherDelimiter = "#" .Refresh End With