Método PivotCache.MakeConnection (Excel)

Establece una conexión para la caché de tabla dinámica especificada.

Sintaxis

expresión. MakeConnection

Expresión Variable que representa un objeto PivotCache .

Comentarios

El método MakeConnection se puede usar para volver a establecer una conexión después de que la caché la haya interrumpido.

Hay diversos objetos y métodos que pueden devolver un error en tiempo de ejecución si la caché no está conectada. Utilizar este método garantiza que siempre exista una conexión antes de ejecutar otros objetos o métodos.

Este método producirá un error en tiempo de ejecución si la propiedad MaintainConnection de la memoria caché de tabla dinámica especificada se ha establecido en False, la propiedad SourceType de la caché de tabla dinámica especificada no se ha establecido en xlExternal o si la conexión no está en un origen de datos OLE DB.

Nota:

Microsoft Excel puede interrumpir temporalmente una conexión durante una sesión (sin que el programador de VBA lo sepa), por lo que este método puede resultar de gran utilidad.

Ejemplo:

El siguiente ejemplo determina si la caché está conectada a su origen y establece una conexión con el origen si es necesario. Se supone que existe una caché de tabla dinámica en la hoja de cálculo activa.

Sub UseMakeConnection() 
 
    Dim pvtCache As PivotCache 
 
    Set pvtCache = Application.ActiveWorkbook.PivotCaches.Item(1) 
 
    ' Handle run-time error if external source is not an OLE DB data source. 
    On Error GoTo Not_OLEDB 
 
    ' Check connection setting and make connection if necessary. 
    If pvtCache.IsConnected = True Then 
        MsgBox "The MakeConnection method is not needed." 
    Else 
        pvtCache.MakeConnection 
        MsgBox "A connection has been made." 
    End If 
    Exit Sub 
 
Not_OLEDB: 
    MsgBox "The data source is not an OLE DB data source" 
 
End Sub

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.