作者:乔山办公网日期:
返回目录:excel表格制作
For i = 1 To Range("Sheet1").Columns.Count
应该改为如下语句来吗?自
For i = 1 To sheets("Sheet1").Columns.Count
如果是,同样需要更改如zhidao下语句
For j = 1 To Range("Sheet1").Rows.Count
请把你的语句:
Sheets("database").Select
修改为:
Application.Goto Sheets("database")
可以如下方式解决:百
1、当按F5键,就报:运行时错误1004。可以这样操作,单击文件――选项――信任中心――打开“信任中心”对话框度,宏设置――勾选“信任对VBA工程对象模型的访问”。再次运行,就不会出现运行时错误问1004提示。
2、再在搜索引擎查询,才知道运行时错误1004不只是在上面答这种情况才会有提示。比如通过使用 Visual Basic 对应用程序版的宏创建一个数组公式时您也可能会收到运行时错权误1004提示提示信息。造成excel vba输入公式出现运行时错误1004的原因:当试图将传递一个包含超过 255 个字符的公式时,会发生此问题,并为应用程序中 Visual Basic 中使用 FormulaArray 属性。
excel 的问题。
换成:
for each sh in sheets
if sh.name<>"a" then
sh.visible =false
end if
next