1

別のデータベース（データベースB）からのVBAコードを介して1つのAccessデータベース（データベースAと呼びましょう）を閉じることは可能ですか？

この例では、データベースBの起動時にデータベースAが開いている場合は、データベースAを閉じます。これはVBAを使用して可能ですか？

私はグーグルを持っていましたが、すべての答えは、VBAを使用して現在のデータベースを閉じることに関連しているようです。もちろん、これはDoCmd.Quitで達成できます。

どんな助けでも大歓迎です。

4

2 に答える 2

6

あなたはそれを乗っ取ることができます：

Dim OtherDB As Object

sOther = "Z:\Documents\other.accdb"
Set OtherDB = GetObject(sOther)
OtherDB.Application.Quit

それは誰かの生活を困難にするかもしれません。

于 2012-07-03T14:58:41.313 に答える
3

私はこの質問が古いことを知っています、しかし多分これは誰かを助けるでしょう。VBAを使用して別のデータベースを開き、マクロを実行するデータベースがありました。次に、データベースを閉じたいと思いました。私のために働いたコードは以下の通りです、それは開いてから閉じるまでの全プロセスを含みます。

Function functionName()

Static acc As Access.Application
Dim db As DAO.Database
Dim dbname As String
dbname = "absolutePathToDBHere.accdb"
Set acc = New Access.Application
acc.Visible = True
Set db = acc.DBEngine.OpenDatabase(dbname, False, False)
acc.OpenCurrentDatabase dbname
acc.DoCmd.RunMacro ("macroName")
acc.DoCmd.Quit acQuitSaveAll

db.Close
Set db = Nothing

End Function
于 2014-10-30T15:46:19.510 に答える