Question

在工作表保护下运行宏提示错误'1004'：类Range的Insert方法无效

Sub Macro3()
'
' Macro3 Macro
' 宏由 YLMF 录制，时间: 2012-3-22
'

'
Rows("3:3").Select
Selection.Insert Shift:=xlDown 这行为黄色
Sheets("贷款信息统奴表").Select
Rows("1:1").Select
Selection.Copy
Sheets("贷款信息库").Select
Rows("3:3").Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
Application.CutCopyMode = False
ActiveWorkbook.Save
End Sub

Answer 1

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