Mensaje de alerta antes de cerrar Excel

Resuelto
DBD -  
 ancat -
Buenas noches,

Me gustaría que Excel (versión 1997-2003) me pregunte antes de salir al hacer clic en la cruz, si he escrito correctamente la fecha y el nombre del responsable de la actualización del archivo en la hoja de inicio.

Cuadro de diálogo: "¿Ha escrito su nombre y la fecha de la última actualización en la hoja de inicio, por favor?"

Muchas gracias.
Configuración: Windows XP Internet Explorer 6.0

3 respuestas

  1. Mike-31 Mensajes publicados 18405 Fecha de registro   Estado Colaborador Última intervención   5 147
     
    Hola,

    Abres tu Visual Basic Editor, ya sea desde la barra de Visual Basic o haciendo clic derecho en una pestaña de hoja en el proyecto VBAProject. encontrarás ThisWorkbook, pegas el código a continuación

    Private Sub Workbook_BeforeClose(Cancel As Boolean)
    Msg = "¿Has escrito" & vbCrLf & "" & vbCrLf & " tu nombre y la fecha de la última actualización en la hoja de inicio, gracias"
    StyleBoîteDialogue = vbOKOnly + vbQuestion
    Title = "Antes de cerrar este archivo,"
    respuesta = MsgBox(Msg, StyleBoîteDialogue, Title)
    End Sub

    Hablamos de nuevo mañana

    A+
    8
    1. DBD
       
      Hola Mike,

      Ok, veo eso en el trabajo y te mantendré informado. ¡Gracias mil!
      0
    2. DBD
       
      Buenas noches y muchas gracias, Mike-31!

      Me has solucionado el problema y está perfecto!
      Una pequeña pregunta, aunque no quisiera abusar, ¿podrías explicarme el papel de los siguientes caracteres que pusiste en la macro?

      "& vbCrLf & "" & vbCrLf &"

      Gracias
      muchas gracias y hasta pronto...
      Dan.
      0
  2. Mike-31 Mensajes publicados 18405 Fecha de registro   Estado Colaborador Última intervención   5 147
     
    Sí, existen libros, pero para aconsejarte, estoy un poco desbordado. Para empezar, vas a un gran supermercado o a FNAC y eliges según tus conocimientos actuales para entender códigos más técnicos y no quedarte fuera.

    Luego, te vuelves curioso, te registras en un foro y sigues las conversaciones muy diversas a tu nivel y las trabajas en tu PC.

    Un consejo: no intentes ir demasiado rápido, Excel es una monstruosidad de posibilidades.

    ¡Ánimo, un saludo!
    2
    1. ancat
       
      esto es bueno este tipo de pequeño intercambio, ¡me solucionó mi problema también! y bravo por los consejos
      0
  3. Mike-31 Mensajes publicados 18405 Fecha de registro   Estado Colaborador Última intervención   5 147
     
    Hola,

    este es el código para crear una línea adicional en tu msgbox para evitar que las msgbox sean demasiado largas y facilitar la lectura

    a continuación tu texto está en tres líneas
    Msg = "Avez-vous inscrit" & vbCrLf & "" & vbCrLf & " votre nom et la date de la dernière mise à jour

    a continuación tu texto está en dos líneas
    Msg = "Avez-vous inscrit" & vbCrLf & " votre nom et la date de la dernière mise à jour sur la feuille accueil merci"

    a continuación tu texto está en una línea
    Msg = "Avez-vous inscrit votre nom et la date de la dernière mise à jour sur la feuille accueil merci"

    A+
    1
    1. DBD
       
      Ok, entiendo que no estoy equipado para adivinar todo eso.
      ¿Existe un diccionario que hable de los principales códigos de VBA para Excel 1997?
      Buenas noches.
      Dan.
      0