urgente porfas necesito cancelar sentencias de un boton

[niker80]

este codigo esta en eun button al darle clic el msgbox preguntara si o no el problema es q si le doy no quiero q las demas sentencias queden canceladas osea el if de abajo ya no se ejecute haber si ayudan porfas es urgeee


If MsgBox("¿Funciona Bomba 1?", vbQuestion + vbYesNo) = vbYes Then

Shape1.FillColor = &HFF00&

Else
Shape1.FillColor = &HFF&
MsgBox ("ERROR!!! - FALLA EN PROCESO")
Text10.Visible = True
Text10.ForeColor = &HFF&
Text10.Text = "ERROR!!!"

End If

If MsgBox("¿Funciona Bomba 2?", vbQuestion + vbYesNo) = vbYes Then

Shape23.FillColor = &HFF00&

Else
Shape23.FillColor = &HFF&
MsgBox ("ERROR!!! - FALLA EN PROCESO")
Text10.Visible = True
Text10.ForeColor = &HFF&
Text10.Text = "ERROR!!!"

End If

[Avellaneda]

No sé si entendí bien la pregunta, pero si es lo que creo, pon un Exit Sub después de la sentencia Text10.Text = "ERROR!!!"

.....
Else
.....
.....
Text10.Text = "ERROR!!!"
Exit Sub
End If