Compartir a través de

Propiedad PivotCache.Connection (Excel)

  • Artículo

Devuelve o establece una cadena que contiene una de las siguientes opciones:

  • Configuración de OLE DB que permite a Microsoft Excel conectarse a un origen de datos OLE DB
  • Configuración de ODBC que permite a Excel conectarse a un origen de datos ODBC
  • Dirección URL que permite a Excel conectarse a un origen de datos web
  • Ruta de acceso a y nombre de archivo de un archivo de texto
  • Ruta de acceso y nombre de archivo de un archivo que especifica una base de datos o una consulta web

Variante de lectura y escritura.

Sintaxis

expresión. Conexión

Expresión Expresión que devuelve un objeto PivotCache .

Comentarios

Al usar un archivo de cubo sin conexión, establezca la propiedad UseLocalConnection en True y use la propiedad LocalConnection en lugar de la propiedad Connection .

También puede optar por tener acceso a un origen de datos directamente mediante la biblioteca Microsoft ActiveX Data Objects (ADO).

Ejemplo:

En este ejemplo se crea una nueva caché de tabla dinámica basada en un proveedor OLAP y, a continuación, se crea un nuevo informe de tabla dinámica basado en la caché en la celda A3 de la hoja de cálculo activa.

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

Soporte técnico y comentarios

¿Tiene preguntas o comentarios sobre VBA para Office o esta documentación? Vea Soporte técnico y comentarios sobre VBA para Office para obtener ayuda sobre las formas en las que puede recibir soporte técnico y enviar comentarios.