Table of contents
Collapse the table of content
Expand the table of content

OfficeDataSourceObject.Columns Property (Office)

office 365 dev account|Last Updated: 6/12/2017
1 Contributor

Gets an ODSOColumns object that represents the fields in a data source. Read-only.


expression. Columns

expression A variable that represents an OfficeDataSourceObject object.


The following example displays the field names in the data source attached to the active publication.

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 
 End With 
End Sub

See also


OfficeDataSourceObject Object

Other resources

OfficeDataSourceObject Object Members

© 2018 Microsoft