vba - このエクセルVBAの従来の書き方は？

Question

これを書くためのよりコンパクトで/または従来の方法はありますか?

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

Connection1行目に書いて2行目にあるのは何か理由があるのPostTextですか？

Answer 1

Connectionおよび(etc) は QT のプロパティですが、関数Destinationへの必須の引数です。この関数は、 なしでも、引数として渡されたプロパティでも機能しません。AddPostTextAddConnection

追加の参照については、これとこれを参照してください。