Colocar cuadro de mensaje luego de ejecutar la macro

Después de ejecutar una macro como hago para que me aparezca el mensaje pedido copiado correctamente

Respuesta
1

Pon la siguiente línea

MsgBox "pedido copiado correctamente"

Ejemplo:

Sub test()
  'línas de tu macro
  'línas de tu macro
  'línas de tu macro
  'línas de tu macro
  'línas de tu macro
  MsgBox "pedido copiado correctamente"
End Sub

1 respuesta más de otro experto

Respuesta
2

Te presento otras situaciones donde debieras colocar el mensaje no al finalizar la macro, sino solo si se ejecuta correctamente.

Por ejemplo cuando tenemos varias macros en un formulario o Userform. Aquí podemos observar los botones de ACEPTAR y de ELIMINAR. (Los modelos completos se encuentran en videos N° 6, 27 y 28 de mi canal).

Se debiera colocar el mensaje solo si cada macro cumple las tareas.

'BOTÓN DE ACEPTAR
'confirmar tarea
sino = MsgBox("¿Deseas guardar estos datos?", vbQuestion + vbYesNo, "Confirmar")
If sino <> vbYes Then Exit Sub
'instrucciones para el guardado de datos
MSGBOX "pedido copiado correctamente"
End Sub
'BOTÓN PARA ELIMINAR REGISTRO
'confirmar
sino = MsgBox("¿Desea eliminar este Registro?", vbQuestion + vbYesNo, "CONFIRMAR")
If sino = vbYes Then
    'elimina fila y envía el mensaje   
     hop.Range("A" & fily).EntireRow.Delete xlUp
     MSGBOX "registro eliminado correctamente"
End If

Sdos.

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas