第1种方法: 如果你手头有Office 2010的安装程序或电脑有安装文档的话在控制面板中打开程序和功能,选择Office 2010右键点击更改,再打开Office 2010安装程序-选择"添加或删除功能"重新添加"office 共享功能"中的"visual Basic for Applications"组件安装完成后,再次启动Word,即搞定第2中方法: Word选项——加载项——管理com加载项,转到——把几个勾勾都取消掉——确定,即可。Win7中注意要以管理员身份进行,因为这些写入了注册表。解决办法: 打开word,工具——选项——安全性——宏安全性,把“中级”改为“高级”或把“安全级高级”改为“非常高”,再把“可靠发行商”中的“信任所有安装的加载项和模板”前面的勾去掉,word就恢复到之前的状态了。
这个问题我好像回过,要你补充资料的。
ALT+F11,插入模块后在模块中添加下面的代码。
然后回到sheet1中添加2个自选图形,右击后为其指定相应宏。
Sub
提取()
t
=
InputBox("请输入要查找的内容:")
y
=
5
Range("a5:p65536")ClearContents
With
Sheets("sheet2")
For
r
=
1
To
[D65536]End(xlUp)Row
If
InStr(Cells(r,
4),
t)
Then
Cells(r,
1)Resize(1,
15)Copy
Cells(y,1)
Cells(y,
16)
=
r
y
=
y
+
1
End
If
Next
End
With
End
Sub
Sub
还原()
With
Sheets("sheet2")
For
r
=
5
To
[P65536]End(xlUp)Row
Cells(r,
1)Resize(1,
15)Copy
Cells(Cells(r,
16)Value,
1)
Next
End
With
Range("a5:p65536")ClearContents
End
Sub
以上就是关于无法读取数据库中所含的VBA工程怎么解决全部的内容,包括:无法读取数据库中所含的VBA工程怎么解决、VBA 程序 含义解释、vb和vba有什么区别等相关内容解答,如果想了解更多相关内容,可以关注我们,你们的支持是我们更新的动力!
欢迎分享,转载请注明来源:内存溢出
评论列表(0条)