vba - 这个简单宏的错误在哪里？

Question

我有这个代码:

Sub ADD_PEDIDO_AtualizaPagamentos()

If M6 = erro Then
MsgBox ("Erro!")

Else
Sheets("ADD_PEDIDO").[M9].Value = "Done!"

End If
End Sub

没有“IF”，代码可以正常工作。但是在我插入 IF 和 Else 之后，我总是收到错误代码。
正如您在上面的代码中看到的那样，M6 单元格给予“OK”以插入，但宏给了我错误。

有什么帮助吗？

Answer 1

您的编码中有一些严重的语法问题。

您应该使用 来引用范围。工作表.范围 方法。

Sub ADD_PEDIDO_AtualizaPagamentos()
    If Worksheets("ADD_PEDIDO").Range("M6") = "erro" Then
        MsgBox "Erro!"
    Else
        Worksheets("ADD_PEDIDO").Range("M9").Value = "Done!"
    End If
End Sub