如何批量将excel中的数据填到word指定控件里

闻启学

wzway 发表于 2023-2-19 09:58
出现了这要的报错，不知道要怎么处理？和我的引用的控件字典有关吗，我的是12.0的，不是16.0的。office20 ...

楼主，doc1 对象无赋值  改为 set doc1 =docapp.documents.open(path)

wzway

闻启学 发表于 2023-2-19 10:30
楼主，doc1 对象无赋值  改为 set doc1 =docapp.documents.open(path)

不好意思，我还没有加好友权限。

这里还是出现同样的问题提示，可否请你帮忙改写好代码再发我，谢谢！

闻启学

wzway 发表于 2023-2-19 10:54
不好意思，我还没有加好友权限。

这里还是出现同样的问题提示，可否请你帮忙改写好代码再发我，谢谢！ ...

看上一贴 我已经写出来了  楼主是用WPS 还是E、word ？？

taller

wzway

闻启学 发表于 2023-2-19 11:12
看上一贴 我已经写出来了  楼主是用WPS 还是E、word ？？

我已经按你说的改了，还是不成。我是office2007

wzway

taller 发表于 2023-2-19 11:52

为何我照做了，还是不行啊

wzway

闻启学 发表于 2023-2-19 10:28
Private Sub CommandButton1_Click()
    Dim a As String
    Dim mydoc

成了，谢谢大佬
拜谢拜谢！！