OfficeDataSourceObject.Columns プロパティ (Office)

データ ソース内のフィールドを表す ODSOColumns オブジェクトを取得します。 読み取り専用です。

構文

式。列

式OfficeDataSourceObject オブジェクトを表す変数。

例

次の使用例は、作業中の文書に結合されているデータ ソースのフィールド名を表示します。

Sub ShowFieldNames() 
 Dim appOffice As OfficeDataSourceObject 
 Dim intCount As Integer 
 
 Set appOffice = Application.OfficeDataSourceObject 
 appOffice.Open bstrConnect:="DRIVER=SQL Server;SERVER=ServerName;" & _ 
 "UID=user;PWD=;DATABASE=Northwind", bstrTable:="Employees" 
 
 With appOffice.Columns 
 For intCount = 1 To .Count 
 MsgBox "Field Name: " & .Item(intCount).Name 
 Next 
 End With 
End Sub

関連項目

• OfficeDataSourceObject オブジェクト メンバー

サポートとフィードバック

Office VBA またはこの説明書に関するご質問やフィードバックがありますか？ サポートの受け方およびフィードバックをお寄せいただく方法のガイダンスについては、Office VBA のサポートおよびフィードバックを参照してください。