Question

excel 录制宏之后 运行时错误’1004 类Range 的AutoFill方法无效

excel 录制宏之后 运行时错误’1004 类Range 的AutoFill方法无效这句语句有很多，但也不是每个都出现这个情况，只是偶尔才出现一次，请大神看看怎么才能解决，谢谢 Rows("4:4").Select Selection.Replace What:= _ " 5\第5项(上4-下3)\第5项-上4（动1.1.1.1）-下3\第5项-上4（1.动1.1.1）-下3\第5项-上4（1.1.动1.1）-下3\第5项-上4（1.1.1.动10）-下3" _ , Replacement:= _ " 5\第5项(上4-下3)\第5项-上4（动1.1.1.1）-下3\第5项-上4（1.动1.1.1）-下3\第5项-上4（1.1.动2.1）-下3\第5项-上4（1.1.1.动10）-下3" _ , LookAt:=xlPart, SearchOrder:=xlByRows, MatchCase:=False, SearchFormat _ :=False, ReplaceFormat:=False Selection.AutoFill Destination:=Rows("4:40"), Type:=xlFillDefault Rows("4:40").Select'
前面的是替换数据后，将当前行下拉,会出现这种问题





Answer 1

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

Answer 2

可以做如下调整，试试

sub 打印（）
sheets("打印").range("C4:J7").PrintOut
end sub