宏无法看到工作表 - “运行时错误 9”

Question

我有 2 张工作表和 1 个将值从一个粘贴到另一个的宏。 宏正在工作。 我复制了它并稍微改变了它。 但它不能运行 -

'运行时错误 9'

这是可见性问题。

所有工作表都在同一个excel文件中。

原始宏代码，它的工作原理：

Sub original()

For j = 18 To 28
        Worksheets("Express_vnzp").Select
        srok = Cells(26, j).Value
        stav = Cells(31, j).Value
        komis = Cells(28, j).Value
        stavka_privlech = Cells(29, j).Value

        For i = 10 To 12

            PD = Cells(i, 17).Value
            Worksheets("Ðàñ÷åòû").Select
            Cells(3, 2).Value = stav
            Cells(4, 2).Value = srok
            Cells(5, 2).Value = komis
            Cells(7, 2).Value = stavka_privlech
            Cells(15, 2).Value = PD
            marzha2 = Cells(23, 2).Value

            Worksheets("Express_vnzp").Select
            Cells(i, j).Value = marzha2

        Next
Next
End Sub

我复制并更改了 i,j - 不工作。

Sub erj()

    For j = 3 To 4
            Worksheets("creditcard").Select
            srok = Cells(26, j).Value
            stav = Cells(31, j).Value
            komis = Cells(28, j).Value
            stavka_privlech = Cells(29, j).Value

            For i = 5 To 6

                PD = Cells(i, 17).Value
                Worksheets("ras").Select
                Cells(3, 2).Value = stav
                Cells(4, 2).Value = srok
                Cells(5, 2).Value = komis
                Cells(7, 2).Value = stavka_privlech
                Cells(15, 2).Value = PD
                marzha2 = Cells(23, 2).Value

                Worksheets("creditcard").Select
                Cells(i, j).Value = marzha2

            Next
    Next
    End Sub

给出“运行时错误”，它的可见性问题。