TextConnection.TextFileTextQualifier (Excel)
Returns or sets the text qualifier when you import a text file into a query table. The text qualifier specifies that the enclosed data is in text format. Possible return values are xlTextQualifierDoubleQuote - Double quotation mark ("), xlTextQualifierNone - No delimiter, xlTextQualifierSingleQuote - Single quotation mark (').
ActiveWorkbook.Connections(1).TextConnection.TextFileTextQualifier = xlTextQualifierDoubleQuote