VBAtypes不匹配

我在我的简单的代码中得到types不匹配,我不明白为什么。 有人可以解释为什么我得到这个错误? 我得到ActiveSheet行上的错误。

Sub testHidden() Dim i As Integer Dim totalRows As Long totalRows = ActiveSheet.UsedRange.Rows.Count ActiveSheet.Rows("1:totalRows").Hidden = False End Sub 

或者干脆:

 Sub testHidden() ActiveSheet.UsedRange.Rows.Hidden = False End Sub 

根据user414076的评论大多是正确的:

 Sub testHidden() Dim i As Integer Dim totalRows As long totalRows = ActiveSheet.UsedRange.Rows.Count ActiveSheet.Rows("1:" + CStr(totalRows)).Hidden = False End Sub