Adriel Ortiz Mangia

Sub GUARDARPDF() Application.ScreenUpdating = False Application.DisplayAlerts = False ruta = ThisWorkbook.Path & "\" nomb = [G4] & " " & [B3] ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, _ Filename:=ruta & nomb & Format(Range("G2"), "dd-mm-yyyy")...

Estoy muy satisfecho Saludos!

HOLA. Debe existir salto de página en la hoja. Para verificar haz clic en el icono marcado y ver si existe. De ser así elimina

Para que te salga el formato DD/MM/AAAA cambia la configuración de fecha por el panel de control>>configuración regional >>>en la pestaña fecha. ¿Pregunto? ¿A qué celda arroja el resultado la variable fecha?

Private Sub Command3_Click() 'GUARDAR Adodc1.Recordset.AddNew 'Añade un nuevo registro End Sub el UPDATE es para actualizar

¿Cuál es otro sistema operativo que va instalar?

Si hiciste copia de seguridad solo de datos te va funcionar, y si lo hiciste con todo el sistema + los datos pues no

Yo utilizo el antivirus ESET NO32 y el registro es muy necesario para la actualización, sin la actualización queda obsoleto. Pero en este caso el problema está en tu navegador puede ser (mozilla, Internet explorer, Chome etc..) que se instalaron como...

https://www.youtube.com/watch?v=qWw9i5JYnoI Tal vez esto te puede sacar de la duda

Indica la celda para el nombre de tu archivo.