Colocar cuadro de mensaje luego de ejecutar la macro

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.

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