0

保存されたクエリを実行し、データをExcelレポートにエクスポートするための次のコードがあります。このクエリが別のデータベースにある場合、どのようにコードを変更する必要がありますか？

DoCmd.Requery Q_Check_Mismatches
DoCmd.RunSavedImportExport "Export-Q_Check_Mismatches"

関連するすべてのテーブルを現在のデータベースにリンクしてから、ローカルでクエリを実行できることはわかっています。しかし、DBサイズの問題のため、これが必要です。

あなたの応答に感謝します

乾杯

シャバー

4

1 に答える 1

0

次のコードは私のために働いた

Function QueryRun(strDBPath As String, strImportExport As String) 

Dim objAccess As Access.Application 

Set objAccess = CreateObject("Access.Application") 
objAccess.OpenCurrentDatabase 

strDBPath objAccess.DoCmd.RunSavedImportExport strImportExport 
objAccess.CloseCurrentDatabase 
objAccess.Quit 
Set objAccess = Nothing 
End Function

乾杯

シャバー

于 2013-04-10T03:12:31.690 に答える