Office) (ODSOColumn 物件
代表資料來源中的欄位。 ODSOColumn 物件是 ODSOColumns 集合的成員。
ODSOColumns 集合包含合併列印資料來源 (例如名稱、 地址及縣/市) 中的所有資料欄位。
您無法將欄位新增至 ODSOColumns 集合。 ODSOColumns 集合中隨附自動到資料來源中的所有資料欄位。
使用 資料 行 (索引) ,其中 index 是資料欄名或索引編號,可傳回單一 ODSOColumn 物件。 該索引編號代表資料欄位在合併列印資料來源中的位置。
本範例會擷取附加至使用中出版物的資料來源中第一筆記錄的名稱及值。
Sub GetDataFromSource()
Dim appOffice As OfficeDataSourceObject
Set appOffice = Application.OfficeDataSourceObject
appOffice.Open bstrConnect:="DRIVER=SQL Server;SERVER=ServerName;" & _
"UID=user;PWD=;DATABASE=Northwind", bstrTable:="Employees"
With appOffice.Columns
MsgBox "Field Name: " & .Item(1).Name & vbLf & _
"Value: " & .Item(1).Value
End With
End Sub
有關於 Office VBA 或這份文件的問題或意見反應嗎? 如需取得支援服務並提供意見反應的相關指導,請參閱 Office VBA 支援與意見反應。