excel - VBA 运行时错误 1004 范围的 object_global 失败

Question

如果单元格的值不等于 0，那么它将相加，X = X +1，所以我可以看到我需要打印多少页。我不确定这是否是最好的方法，但这是我到目前为止所拥有的。需要所有帮助！这只是工作的一个副项目，所以时间不是问题。我也在excel中创建这个。

    Sub Find_Pages_to_Print()

    Sheets("Invoice").Select

    Dim X As Integer
    If Not Range("D9").Value = 0 Then
    X = X + 1



    If Not Range("D41").Value = 0 Then
    X = X + 1


       If Not Range("D70").Value = 0 Then
        X = X + 1


            If Not Range("D100").Value = 0 Then
            X = X + 1
            Else:
            X = X + 0



                If Not Range("D131").Value = 0 Then
                X = X + 1


                    If Not Range("D161").Value = 0 Then
                    X = X + 1


                        If Not Range("191").Value = 0 Then
                        X = X + 1
                        Else:
                        X = X + 0



                            If Not Range("D221").Value = 0 Then
                            X = X + 1


                            End If
                        End If
                    End If
                End If
            End If
        End If
    End If
End If

MsgBox "Sets to Print: " & X
End Sub

Answer 1

问题在于：

If Not Range("191").Value = 0 Then

你可能想要

If Not Range("D191").Value = 0 Then