clwn.net
当前位置:首页 >> ExCEl 录制宏之后 运行时错误'1004 类RAngE 的Auto... >>

ExCEl 录制宏之后 运行时错误'1004 类RAngE 的Auto...

可以做如下调整,试试 sub 打印() sheets("打印").range("C4:J7").PrintOut end sub

可以如下方式解决: 1、当按F5键,就报:运行时错误1004。可以这样操作,单击文件――选项――信任中心――打开“信任中心”对话框,宏设置――勾寻信任对VBA工程对象模型的访问”。再次运行,就不会出现运行时错误1004提示。 2、再在搜索引擎查询,才知道...

这个是自己编的吗? 这句话本身没问题啊,你的用户窗口存在吗?

你的按钮是在哪个Sheet里呢? 对于非按钮所在Sheet里的单元格引用,Range前面要加上所在的Sheet名,这样代码看起来也不容易混淆,如: Sheets("Sheet3").Activate Sheets("Sheet3").Range("B6:D6").Select 并且,如果你不需要界面显示真的切换到...

Range("A:A").EntireColumn.Hidden = True括号内换成你需要的行或者列, 再试试

在工作表保护状态下,是不能插入行或列的,如果此时插入行或列就会出现错误提示。 正确的做法应该是在代码的开始先撤消工作表保护,再插入及其他操作,然后在代码的结尾再保护工作表。 撤消保护的代码: ActiveSheet.Unprotect 保护的代码: Act...

可以做如下调整,试试 sub 打印() sheets("打印").range("C4:J7").PrintOut end sub

Order1:=xlDescending 少打了个s

我新建文件用你的代码,运行没有错误。或者你可以把文件发给我看看。

Range("A1:D599").Select 这句代选择的是代码所在的工作表,如果该工作表处于非激活状态则出错。 修改为如下任意一个(根据自己需要) 1、 sheet("sheet1").activate 先把要选择的工作表激活,然后再选择。 Range("A1:D599").Select 2、 ActiveS...

网站首页 | 网站地图
All rights reserved Powered by www.clwn.net
copyright ©right 2010-2021。
内容来自网络,如有侵犯请联系客服。zhit325@qq.com