3

有没有更紧凑和/或传统的方式来写这个?

With ActiveSheet.QueryTables.Add(Connection:="URL;http://carbon.brighterplanet.com/flights.txt", Destination:=Range("A2"))
    .PostText = "origin_airport=MSN&destination_airport=ORD"
    .RefreshStyle = xlOverwriteCells
    .SaveData = True
    .Refresh
End With

有没有Connection写在第一行而写在PostText第二行的原因?

4

1 回答 1

4

Connection并且DestinationAdd函数的必需参数,而PostText(etc) 是 QT 的属性。如果没有作为参数传递的属性,该Add函数将无法工作。Connection

请参阅以获取更多参考。

于 2012-06-22T16:00:24.837 回答