Метод PivotCache.MakeConnection (Excel)

Устанавливает соединение для указанного кэша сводной таблицы.

Синтаксис

expression. MakeConnection

выражение Переменная, представляющая объект PivotCache .

Замечания

Метод MakeConnection можно использовать после того, как кэш удаляет подключение, и пользователь хочет восстановить подключение.

Различные объекты и методы могут возвращать ошибку во время выполнения, если кэш не подключен. Использование этого метода обеспечивает подключение перед выполнением других объектов или методов.

Этот метод приведет к ошибке во время выполнения, если свойству MaintainConnection указанного кэша сводной таблицы присвоено значение False, свойству SourceType указанного кэша сводной таблицы не присвоено значение xlExternal или если подключение не установлено к источнику данных OLE DB.

Примечание.

Microsoft Excel может временно удалить подключение в ходе сеанса (неизвестно программисту VBA), поэтому этот метод окажется полезным.

Пример

В следующем примере определяется, подключен ли кэш к источнику, и при необходимости выполняется подключение к источнику. В этом примере предполагается, что на активном листе существует кэш сводной таблицы.

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

Поддержка и обратная связь

Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.