2

Excel VBA 経由で SQL Management Studio に接続すると、SQL のテーブルからデータを取得する次のコード (一部) が作成されます。

With BalanceSheet
    ' Assign the Connection object.
    .ActiveConnection = cnPubs
    ' Extract the required records.
    .Open "select * from Analytics.dbo.BalSheetKeyLineItemsFinal"
    Sheet1.Range("A13").CopyFromRecordset BalanceSheet
    ' Tidy up
    .Close
End With

ただし、テーブルの列名は表示されません。データを Excel にエクスポートするときに列名を含める方法はありますか??

ありがとう!

4

1 に答える 1

4

レコードセットには、クエリを実行したデータが含まれているため、これが予想されることです。.Openandを使用しているので.ActiveConnection、ADO を使用していると思います。この場合、recordset オブジェクトのFieldsコレクションからフィールド名を取得できます。

For i = 0 to .Fields.Count - 1
  Sheet1.Range("A12").Offset(, i) = .Fields(i).Name
Next

これにより、 の 12 行目にフィールド タイトルが書き込まれますSheet1

于 2013-03-19T14:41:50.293 に答える