VBA-Programmierung in Microsoft Excel

VBA-Begriff: Beispiel zur TextFileConsecutiveDelimiter-Eigenschaft

In diesem Beispiel werden Leerzeichen in der Abfragetabelle im ersten Tabellenblatt der ersten Arbeitsmappe als Trennzeichen festgelegt und anschließend die Abfragetabelle aktualisiert. Aufeinanderfolgende Leerzeichen werden als einzelnes Trennzeichen behandelt.

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
    .TextFileSpaceDelimiter = True
    .TextFileConsecutiveDelimiter = True
    .Refresh
End With