OfficeDataSourceObject.Columns-Eigenschaft (Office)

Ruft ein ODSOColumns-Objekt ab, das die Felder in einer Datenquelle darstellt. Schreibgeschützt.

Syntax

Ausdruck. Spalten

Ausdruck Eine Variable, die ein OfficeDataSourceObject-Objekt darstellt.

Beispiel

Im folgenden Beispiel werden die Feldnamen der Datenquelle angezeigt, die mit der aktiven Publikation verknüpft ist.

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

Siehe auch

• Elemente des OfficeDataSourceObject-Objekts

Support und Feedback

Haben Sie Fragen oder Feedback zu Office VBA oder zu dieser Dokumentation? Unter Office VBA-Support und Feedback finden Sie Hilfestellung zu den Möglichkeiten, wie Sie Support erhalten und Feedback abgeben können.