发布DLL封装过程教程12-19

xhjok · 发表于 2006-12-20 09:30

还是和原来一样的错误呀

桃花岛岛主 · 发表于 2006-12-20 09:38

那可能你缺少文件！

xhjok · 发表于 2006-12-20 10:17

我是2003版本，完全安装的，如果少文件，会少哪个文件呢？

桃花岛岛主 · 发表于 2006-12-20 10:42

看看◎这个源文件对不对！！

xhjok · 发表于 2006-12-20 12:13

SPqL9MCs.rar (14.69 KB, 下载次数: 121)

请帮我看看，现在窗体能调用啦，但是写入数据时去出错。

桃花岛岛主 · 发表于 2006-12-20 12:17

Private Sub Command1_Click()
Dim xlapp As Object, xlbok As Object, xlsht1 As Object
Set xlapp = GetObject(, "Excel.Application") '取得Excel实例
Set xlbok = xlapp.ActiveWorkbook '取得Excel实例下活动工作簿
Set xlsht1 = xlbok.Worksheets("sheet1")
xlsht1.cells(1, 1) = Textbox1.Text
End Sub

Textbox1.Text修改为TEXT1.TEXT

VB里面窗体的文本框名字是TEXT1

xhjok · 发表于 2006-12-20 12:25

谢谢指正,感谢楼主,终于会啦,再次感谢

xhjok · 发表于 2006-12-20 12:27

还有一个小问题是:我的DLL文件不会在VBA里自动引用,我都是手动去点击引用的,不知是怎么回事而且引用里的名称也不是我的DLL文件名DLLSSS,而是工程1,我只能通过路径来区别

[此贴子已经被作者于2006-12-20 12:29:18编辑过]

playbober · 发表于 2007-1-2 16:32

QUOTE:

以下是引用桃花岛岛主在2006-12-20 10:42:13的发言：

看看◎这个源文件对不对！！

l楼主，即使用你的这个，在我电脑上仍然提示active部件不能创建对象，错误429

应该怎么搞啊？请指教

shishi · 发表于 2007-1-2 18:56

好帖子！

学习了不少东西，谢谢！

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