一打开excel文件就自动引用一个用VB制作成的DLL文件，无需使用VBA中的引用对话框！

发布网友发布时间：2022-05-12 00:35

共2个回答

热心网友时间：2023-10-30 05:56

自动引用不得行吧。可以自动注册。代码如下：代码放到生日计算.xls工作表的WORKBOOK.OPEN中。

Private Sub Workbook_Open()
   Dim SourceFile, DestinationFile
'      SourceFile = “C:\WINDOWS\system32\dd.dll”   ' 指定源文件名。
        DestinationFile = "c:\windows\system32\MSCOMCT2.OCX"   ' 指定目的文件名。
'        FileCopy SourceFile, DestinationFile    ' 将源文件的内容复制到目的文件中
        Shell "regsvr32 " & DestinationFile, vbHide '注册控件
        MsgBox "如果显示注册成功的信息,该文件你可以可删除."
       Application.Quit
End Sub

热心网友时间：2023-10-30 05:57

找到加载宏，然后从加载宏里设置引用。