Excel VBA教程:Connection属性

返回或设置包含下列某项的字符串:允许 Microsoft Excel 连接到 OLE DB 数据源的 OLE DB 设置;允许 Microsoft Excel 连接到 ODBC 数据源的 ODBC 设置;允许 Microsoft Excel 连接到 Web 数据源的 URL;或者文本文件的名称或路径,或是指定某个数据库或 Web 查询的文件名称或路径。Variant 类型,可读写。

说明

设置 Connection属性并不会立即启动与数据源的连接。必须使用Refresh方法来建立连接和检索数据。

在使用脱机多维数据集文件时,请将UseLocalConnection属性设置为 True,并使用LocalConnection属性,而不是用 Connection属性。

有关连接字符串语法的详细信息,请参阅 QueryTables集合的Add方法和 PivotCaches集合的Add方法。

用户可选择 Microsoft ActiveX 数据对象 (ADO) 库以直接访问数据源。

Excel VBA教程:Connection属性·示例

本示例在活动工作表的 A3 单元格上新建一个基于OLAP 提供程序的数据透视表高速缓存,然后基于该高速缓存创建一个新的数据透视表。


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

本示例为第一张工作表上的第一个查询表提供新的 ODBC 连接信息。


Worksheets(1).QueryTables(1) _
    .Connection:="ODBC;DSN=96SalesData;UID=Rep21;PWD=NUyHwYQI;"

本示例指定一个文本文件。


Worksheets(1).QueryTables(1) _
    Connection := "TEXT;C:\My Documents\19980331.txt"

上页:Excel VBA教程:ConflictResolution属性 下页:Excel VBA教程:ConnectionSiteCount属性

Excel VBA教程:Connection属性

Excel VBA教程:ConnectionSiteCount属性 Excel VBA教程:Connector属性
Excel VBA教程:ConnectorFormat属性 Excel VBA教程:ConsolidationFunction属性
Excel VBA教程:ConsolidationOptions属性 Excel VBA教程:ConsolidationSources属性
Excel VBA教程:ConstrainNumeric属性 Excel VBA教程:Container属性
Excel VBA教程:Contrast属性 Excel VBA教程:ControlCharacters属性
Excel VBA教程:ControlFormat属性 Excel VBA教程:CopyObjectsWithCells属性
Excel VBA教程:Corners属性 Excel VBA教程:CorrectCapsLock属性
Excel VBA教程:CorrectSentenceCap属性 Excel VBA教程:Count属性
Excel VBA教程:CreateBackup属性 Excel VBA教程:Creator属性
Excel VBA教程:Criteria1属性 Excel VBA教程:Criteria2属性
版权所有 © 中山市飞娥软件工作室 证书:粤ICP备09170368号