[求助] 关于DLL

狗狗熊

有的人用VBA的程序做成DLL，EXCEL中为什么没有一个代码也没有，却能运行DLL，也没有在工具--引用任何的DLL引用，谁能给我一个提示，我学习也能有一个方向

xq1234

根据我的经验来说哈:

是用VB6.0、或者VC来做DLL，而不是VBA来做DLL。

EXCEL中不是一点代码都没有，一般都有DLL注册与反注册的代码。如果没有注册反注册的代码，则要引用这个DLL；但手动引用不如自动注册来的方便，也不便于在别的机子上运行，所以一般都会有注册与反注册的代码。

有关DLL的制作示例，本论坛可以搜索出很多。

Moneky

VB做的简单例子，仅在Excel启动的时候显示一个MsgBox 附件中包含VB源代码，和成品Dll。使用前需要Regsvr32 dll（用Regsvr32注册Dll），再打开Excel，你会发现系统会弹出一个Msgbox，但是Excel环境中没有任何代码

uEnxcao1.rar (8.75 KB, 下载次数: 70)

2008-8-9 10:08 上传

点击文件名下载附件

[此贴子已经被作者于2008-8-9 10:08:15编辑过]

狗狗熊

我在运行中输入 Regsvr32 C:\AddInTest\MyAddIn.dll

上例中的确好用，谢谢 楼上两位，有点明白了，我是在运行中手动注册的，其实是不是可以自动注册，在安装软件过程中？？还是...

狗狗熊

Moneky你好，你做的就是我想学的东西，例子中能不能再深化一点，如：我在excel工做表中A1中输入1，在就是b1中显示2

我在VB中输入为什么不好用呢:

Private Sub AddinInstance_OnConnection(ByVal Application As Object, ByVal ConnectMode As AddInDesignerObjects.ext_ConnectMode, ByVal AddInInst As Object, custom() As Variant)
'    On Error GoTo error_handler
    MsgBox "Moneky创建的Add-In示例，现在时间是：" & CStr(Now), vbOKOnly + vbInformation, "测试"
   
    If Application.Range("A1") = 1 Then Application.Range("B1") = 2

Moneky

QUOTE:

以下是引用狗狗熊在2008-8-9 16:33:06的发言：

Moneky你好，你做的就是我想学的东西，例子中能不能再深化一点，如：我在excel工做表中A1中输入1，在就是b1中显示2

我在VB中输入为什么不好用呢:

Private Sub AddinInstance_OnConnection(ByVal Application As Object, ByVal ConnectMode As AddInDesignerObjects.ext_ConnectMode, ByVal AddInInst As Object, custom() As Variant)
'    On Error GoTo error_handler
    MsgBox "Moneky创建的Add-In示例，现在时间是：" & CStr(Now), vbOKOnly + vbInformation, "测试"
   
    If Application.Range("A1") = 1 Then Application.Range("B1") = 2

我也只会皮毛，其他的正在学习中……

在老外那里找到一个例子，自己改造了一点点，可以实现你上面的要求，见附件。

 

c0ls1tTx.rar (18.46 KB, 下载次数: 36)

2008-8-10 08:34 上传

点击文件名下载附件
[求助] 关于DLL

老外的原文地址：http://www.codematic.net/Excel-development/Excel-Add-ins/excel-add-ins.htm

狗狗熊

谢谢Moneky

xq1234

QUOTE:

以下是引用Moneky在2008-8-9 9:46:28的发言：

VB做的简单例子，仅在Excel启动的时候显示一个MsgBox 附件中包含VB源代码，和成品Dll。使用前需要Regsvr32 dll（用Regsvr32注册Dll），再打开Excel，你会发现系统会弹出一个Msgbox，但是Excel环境中没有任何代码

Moneky的方法叫做加载项（注意：是加载项而不是加载宏），这样在运行Excel.exe程序时就会运行这个加载项。这种方法可以嵌入到Exce，Word，IE浏览器中，在xls.doc,htm文件中不需要任何代码。

而另一种方法是：xls文件调用DLL文件

hhzjxss

谢谢Moneky，研究一下你的源代码，想学习一下！