VBA代码封装助手(永久免费)

yychpy · 发表于 2015-11-3 15:23

感谢分享，很好的作品。

homepeople · 发表于 2015-11-10 13:58

谢谢各位大大了，最近正好找封装的工具哈哈

kou666 · 发表于 2015-11-12 20:43

谢谢分享！

qlh1978 · 发表于 2015-11-16 11:31

win8.1下64位，office2013 32位，加载不成功
com加载项列表中可以显示，但是选项卡中不能被加载
没有禁用任何加载项
已运行管理员权限安装
如何解决

andysky · 发表于 2015-11-16 19:15

qlh1978 发表于 2015-11-16 11:31
win8.1下64位，office2013 32位，加载不成功
com加载项列表中可以显示，但是选项卡中不能被加载
没有禁用 ...

要安装的VB才行http://pan.baidu.com/s/1xeXu0

ikimi · 发表于 2015-11-18 19:48

感谢分享{:soso_e100:}

ypfw · 发表于 2015-11-27 11:00

代码封装后是否存在32 位 64位系统区别呢？

hyugajin · 发表于 2015-11-27 15:15

本帖最后由 hyugajin 于 2015-11-27 15:30 编辑

各位高手，有个疑问：
用vb封装成dll的如下代码
xlApp.ThisWorkbook.Worksheets("Sheet2").Range("a2") = 5不行
但是
xlApp.sheets("Sheet2").Range("a2") = 5 却可以，真是奇葩

andysky · 发表于 2015-11-28 09:41

hyugajin 发表于 2015-11-27 15:15
各位高手，有个疑问：
用vb封装成dll的如下代码
xlApp.ThisWorkbook.Worksheets("Sheet2").Range("a2") = ...

很正常啊，VB中是不存在ThisWorkbook的

hyugajin · 发表于 2015-11-30 08:33

andysky 发表于 2015-11-28 09:41
很正常啊，VB中是不存在ThisWorkbook的

大师，问一下以下3个语句的区别,第一种，第二种可以实现赋值，第三种却不行
1.
Public xlApp As excel.Application
xlApp .Workbooks("test.xls").Worksheets("Sheet2").Range("a2").Value = 5
2.
Set xlapp = GetObject(, "excel.application")
xlapp.Workbooks("test.xls").Worksheets("Sheet2").Range("a2").Value = 5
3.
excel.Application.Workbooks("test.xls").Worksheets("Sheet2").Range("a2").Value = 5

		自动登录	找回密码
密码			免费注册