Dante Amor

H o l a: ¿Puedes decirme cuál rango? ¿Pero quieres que envíe un mail por cada celda que tienes en ese rango? ¿O quieres enviar en un correo el contenido de las celdas de un rango?

H o l a: Te anexo la macro actualizada Sub CopiarValor() 'Por.Dante Amor If Not IsDate([D8]) Then MsgBox "La celda D8 no contiene una fecha" [D8].Select Exit Sub End If mes = Month([D8]) año = Year([D8]) For i = 2 To Cells(42,...

H o l a: Te anexo la macro actualizada Sub CopiarValor() 'Por.Dante Amor If Not IsDate([D8]) Then MsgBox "La celda D8 no contiene una fecha" [D8].Select Exit Sub End If mes = Month([D8]) año = Year([D8]) For i = 2 To Cells(42,...

H o l a: ¿Las otras pc's tienen la misma impresora? Me ha pasado en ocasiones que si quito líneas de código de los parámetros, la impresión no resulta la misma; pero si dejo todos los parámetros que resultan cuando grabo la macro, entonces sí...

H o l a: Crea un formulario con los botones que necesitas, en este ejemplo, voy a crear el formulario con 3 botones: El código de este formulario. Observa como en la sección de declaraciones tengo declaradas como públicas las variables que van a...

H o l a: Ya no entendí. ¿El formulario lo tienes en excel? Puedes poner imágenes con ejemplos de lo que tienes.

H o l a: Quedaría así: Sub guardapdf() 'Por.Dante Amor uf = ActiveCell.SpecialCells(xlLastCell).Row ru = "C:\Users\ v061368\Desktop \Reportes\ TCF \TATQ00481\" Range("B2:AG" & uf).Select Selection.ExportAsFixedFormat Type:=xlTypePDF, _ Filename:=ru &...

H o l a: Sigue las siguientes instrucciones: 1.- Crea un archivo nuevo. 2. - En la primera hoja del archivo nuevo pon los siguientes títulos en la fila 1 como se muestra en la imagen: 3.- En la columna "A" desde la fila 2 hacia abajo, pon el nombre...

H o l a: Hace tiempo hice esta macro y funcionó, puedes probar: Sub PasarDatosaPdf() 'Por.Dante Amor Application.DisplayAlerts = False Application.ScreenUpdating = False Set h2 = Sheets("Hoja2") 'contador ' celdas = Array("A2", "B2", "C2", "D2",...

No conozco alguna aplicación para crearlos, pero puedes buscar en la red el código VBA para crear menús. Revisa el siguiente enlace para crear menús en excel:...