在Excel工作簿中如何对三个工作表同时进行隐藏指定条件的行

我的《学生成绩管理》工作簿里有《学生基本情况登记表》、《成绩统计表》和《成绩分析表》这三个工作表。它们的第1.2.3.4行都是表头，第1列A是序号。我想在《原始数据设置》页面根据学生数来（C12）确定并同时自动隐藏《学生基本情况登记表》、《成绩统计表》和《成绩分析表》这三个工作表的指定行。按钮“确定”为执行命令。

下面的代码该如何修改：

Private Sub CommandButton1_Click()
Me.Unprotect ""
If Sheets("初始设置").[C12] <> "" Then
For i = 5 To 64
If Cells(i, 1) > Sheets("初始设置").[C12].Value Then Rows(i).Hidden = True '隐藏该行
Next
End If
Me.Protect ""
End Sub

如果需要,告知邮箱即传附件.谢谢!
上述代码在单个工作表中已测试通过.

运行后会有如下提示: 运行时错误'1004':
不能设置类 Range 的 Hidden 属性

Private Sub CommandButton1_Click()
Dim tt%, k%
If Sheet5.[c12] <> "" Then
tt = [c12] + 5
For k = 5 To 7
Sheets(k).Rows(tt & ":65").Hidden = True
Next
End If
End Sub

可以循环的代码
出错原因是你的sheet.index比较乱，所以从5到7循环，原来的sheet2保护了