VBA-Programmierung in Microsoft Excel

Tutorial: Excel-Beispiele

VBA-Begriff: Beispiel zur WebSelectionType-Eigenschaft

In diesem Beispiel wird eine neue Webabfragetabelle zu dem ersten Tabellenblatt der ersten Arbeitsmappe hinzugefügt und anschließend die Daten aus der ersten und der zweiten Tabelle in der Webseite importiert.

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
    .WebFormatting = xlNone
    .WebSelectionType = xlSpecifiedTables
    .WebTables = "1,2"
    .Refresh
End With