Objeto ODSOColumn

Representa un campo de un origen de datos. El objeto ODSOColumn es un miembro de la colección ODSOColumns. La colección ODSOColumns incluye todos los campos de datos de un origen de datos de combinación de correspondencia (por ejemplo, Nombre, Dirección y Ciudad).
Utilizar el objeto ODSOColumn
Utilice Columns(index), donde index es el número de índice o el nombre de un campo de datos, para devolver un solo objeto ODSOColumn. El número de índice representa la posición del campo de datos en el origen de datos de combinación de correspondencia. Este ejemplo recupera el nombre y valor del primer campo del primer registro del origen de datos adjunto a la publicación activa.
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
Comentarios
No puede agregar campos a la colección ODSOColumns. Todos los campos de datos de un origen de datos se incluyen automáticamente en la colección ODSOColumns.