Ricardo Hernandez Rueda

Abraham Valencia respondió: Así es, el evento "SheetBeforeDelete" del libro está incluido solo desde la versión 2013 del Excel. Para tu caso creo que sí es recomendable la protección del libro (que dicho sea de paso, es lo que ese código hace) y sí se puede ejecutar macros...

Dante Amor respondió: Pon el siguiente evento en Thisworkbook Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean) MsgBox "No es posible guardar el archivo", vbExclamation, "SALIR" Cancel = True End Sub Pon lo siguiente en un módulo para ejecutar...

Dante Amor respondió: Revisa el siguiente enlace https://www.rondebruin.nl/win/s1/outlook/bmail2.htm Realiza una prueba para enviar el rango de celdas En esta parte: Set rng = Selection.SpecialCells(xlCellTypeVisible) 'You can also use a fixed range if you want 'Set rng =...

Dante Amor respondió: Revisa las siguientes respuestas, ahí explico como poner una imagen en un correo. Primero tienes que guardar tu imagen como un archivo .jpg o .gif o .png Ya que tienes la imagen en un archivo la tienes que insertar en el correo pero con HTML Envío de...

José Saúl Méndez Alonso respondió: Te envío el código modificado Private Sub CommandButton1_Click() UserForm1.Show End Sub Private Sub CommandButton2_Click() 'Con esta indicacion cierras la aplicación Application.Quit ActiveWorkbook.Close False End Sub Private Sub...

Victor Rodriguez respondió: Prueba cambiando esta línea de lugar Workbooks("Tickets2"). Activate y ponerla aquí If fichero = False Then Exit Sub Workbooks("Tickets2"). Activate