我正在尝试运行一个VBA脚本,该脚本将运行和导出Access查询。我可以在代码中执行运行查询的步骤,但是,我需要连接到DB2才能在Access中运行此查询,而我不知道如何在代码中实现以输入用户名和密码。Sub RunQuery()Application.DisplayAlerts = False
Set A = CreateObject("Access.A
我正尝试在excelvba中编写一个宏,它只需打开access数据库并在access中运行2个查询即可。它似乎每点击两次宏按钮就会运行一次查询。我的意思是我点击它,它工作了,第二次点击我得到一个‘运行时错误462’在第二次点击,第三次点击它工作,第四次点击我再次得到错误,以此类推。我似乎弄不明白为什么会这样。下面是代码。Sub QueryAccess1()
Dim db As Access.Application