MGSBOX en macro dependiendo del Valor

[ohfresa]

Buenos días,
Necesito ayuda para que dentro de la macro si el valor de una celda es 0 aparezca un MGSBOX con texto y pare la macro. y si es 1 que continúe.

Gracias de Antemano

 

[Macro Antonio]

If Range("A1") = 0 Then MsgBox "Celda a cero"