次の方法で共有


OfficeDataSourceObject.DataSource プロパティ (Office)

取得または接続されているデータ ソースの名前を表す 文字列 を設定します。 値の取得と設定が可能です。

構文

データソース

OfficeDataSourceObject オブジェクトを表す変数。

次の使用例は、データ ソースの名前が空白の場合に名前を設定します。

Sub SetAndReturnDataSourceName() 
 Dim appOffice As OfficeDataSourceObject 
 
 Set appOffice = Application.OfficeDataSourceObject 
 With appOffice 
 .Open bstrConnect:="DRIVER=SQL Server;SERVER=ServerName;" & _ 
 "UID=user;PWD=;DATABASE=Northwind", bstrTable:="Employees" 
 
 If .DataSource = "" Then 
 .DataSource = "Northwind" 
 MsgBox .DataSource 
 End If 
 End With 
End Sub

関連項目

サポートとフィードバック

Office VBA またはこの説明書に関するご質問やフィードバックがありますか? サポートの受け方およびフィードバックをお寄せいただく方法のガイダンスについては、Office VBA のサポートおよびフィードバックを参照してください。