WebConsecutiveDelimitersAsOne Property [Excel 2003 VBA Language Reference]
True if consecutive delimiters are treated as a single delimiter when you import data from HTML <PRE> tags in a Web page into a query table, and if the data is to be parsed into columns. False if you want to treat consecutive delimiters as multiple delimiters. The default value is True. Read/write Boolean.
This example sets the space character to be the delimiter in the query table on the first worksheet in the first workbook, and then it refreshes the query table. Consecutive spaces are treated as a single space.
Set shFirstQtr = Workbooks(1).Worksheets(1) Set qtQtrResults = shFirstQtr.QueryTables _ .Add(Connection := "URL;http://datasvr/98q1/19980331.htm", _ Destination := shFirstQtr.Cells(1,1)) With qtQtrResults .WebConsecutiveDelimitersAsOne = True .Refresh End With