Hinweis
Für den Zugriff auf diese Seite ist eine Autorisierung erforderlich. Sie können versuchen, sich anzumelden oder das Verzeichnis zu wechseln.
Für den Zugriff auf diese Seite ist eine Autorisierung erforderlich. Sie können versuchen, das Verzeichnis zu wechseln.
Gibt eine Zeichenfolge mit OLE DB-Einstellungen zurück, die eine Verbindung von Microsoft Excel zu einer ODBC-Datenquelle ermöglicht, oder legt sie fest. Variant-Wert mit Lese-/Schreibzugriff.
Syntax
Ausdruck verwendet werden. Verbindung
Ausdruck Eine Variable, die ein OLEDBConnection-Objekt darstellt.
Hinweise
Durch Festlegen der Connection-Eigenschaft wird die Verbindung mit der Datenquelle nicht sofort initiiert. Sie müssen die Refresh -Eigenschaft verwenden, um die Verbindung herzustellen und die Daten abzurufen. Legen Sie bei Verwendung einer Offlinecubedatei die UseLocalConnection-Eigenschaft auf True fest und verwenden Sie die LocalConnection.Eigenschaft statt der Connection-Eigenschaft.
Beispiel
Dieses Beispiel erstellt einen PivotTable-Cache basierend auf einem OLAP-Anbieter und dann einen PivotTable-Bericht basierend auf dem Cache in Zelle A3 des aktiven Arbeitsblatts.
With ActiveWorkbook.PivotCaches.Add(SourceType:=xlExternal)
.Connection = _
"OLEDB;Provider=MSOLAP;Location=srvdata;Initial Catalog=National"
.MaintainConnection = True
.CreatePivotTable TableDestination:=Range("A3"), _
TableName:= "PivotTable1"
End With
With ActiveSheet.PivotTables("PivotTable1")
.SmallGrid = False
.PivotCache.RefreshPeriod = 0
With .CubeFields("[state]")
.Orientation = xlColumnField
.Position = 0
End With
With .CubeFields("[Measures].[Count Of au_id]")
.Orientation = xlDataField
.Position = 0
End With
End With
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.