MsgBox Que Ejecute Una Macro

Tengo una macro en excel y quiero que me genere una pregunta con dos únicas respuestas

Pregunte si quiero o no correr la Macro

Respuestas:

1: Si

2: No

Dependiendo de la respuesta realice

1: Si  = Ejecute la macro (sin mensaje alguno)

2: No = (Mensaje) que diga la Macro no Se ejecuto

2 respuestas

Respuesta
1

Prueba con algo así:

Sub Ejemplo()
Dim ValordeMsgbox As Integer
Let ValordeMsgbox = MsgBox("¿Desea activar la macro?", vbYesNo)
If ValordeMsgbox = vbYes Then
Call tu_macro
Exit Sub
End If
MsgBox "La macro no se activará"
End Sub

Comentas

Abraham Valencia

Respuesta
1

siono = MSgbox("¿Desea ejecutar la rutina?", vbQuestion + vbYesNo, "Confirmar")

If siono <> vbYes Then GoTo  saliendo  MSgbox "La rutina no se ejecutó"

Aquí iría tu rutina que deseas que se ejecute

Saliendo:

Exit sub

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas