我有一个Access MyExternTable.mde数据库，我在打开工作簿时连接到该数据库。连接由常规Excel的数据 - ＆gt;定义。连接UI，效果很好。 连接字符串是：
Provider=Microsoft.ACE.OLEDB.12.0;
User ID=Admin;
Data Source=D:\DataBases\UUUU\MyExternTable.mde;
Mode=ReadWrite;
Extended Properties="";
Jet OLEDB:System database="";
Jet OLEDB:Registry Path="";
Jet OLEDB:Engine Type=5;
Jet OLEDB:Database Locking Mode=1;
Jet OLEDB:Global Partial Bulk Ops=2;
Jet OLEDB:Global Bulk Transactions=1;
Jet OLEDB:New Database Password="";
Jet OLEDB:Create System Database=False;
Jet OLEDB:Encrypt Database=False;
Jet OLEDB:Don't Copy Locale on Compact=False;
Jet OLEDB:Compact Without Replica Repair=False;
Jet OLEDB:SFP=False;
Jet OLEDB:Support Complex Data=False;
Jet OLEDB:Bypass UserInfo Validation=False;
Jet OLEDB:Limited DB Caching=False;
Jet OLEDB:Bypass ChoiceField Validation=False
commadText是：
qryIDNameEXPORT
我的工作簿还包含一个VBA Sub程序，我称之为＃34; SortIdNames＆＃34;我想在导入表后立即调用它，以便对其进行排序。
有没有办法在不使用Workbook_Open()或Workbook_Activate事件的情况下调用它？也许是通过连接定义的东西？
非常感谢任何想法！