Dante Amor

Listo. Preparé una macro para realizar la impresión: En la pregunta anterior te puse los detalles. Sub impresion() Dim h1 As Worksheet, h2 As Worksheet Dim u1 As Long, u2 As Long, n As Long Application.ScreenUpdating = False Application.DisplayAlerts...

Pon aquí tus códigos, tal vez alguien te los convierta sin costo.

Descarga mi aplicación para enviar correos masivos. Al final de la respuesta está el enlace para descargarla desde google drive: Macro para envíar correos masivos con adjuntos diferentes

Qué dice el mensaje de error. En cuál línea de la macro te marca el error.

Revisa esto: Para hacer una captura de pantalla en Galaxy A20e: 1- Ve a la pantalla a la que quieres hacer la captura de pantalla en tu Samsung. 2- Abre la barra de notificaciones y selecciona "Captura". 3- La imagen capturada se guarda...

Utiliza la función DERECHA Por ejemplo: =DERECHA(A1;1)

Lo recomendable es con Alcohol Isopropílico.

Respuesta: a. Validación de datos

Utiliza la siguiente macro. Cambia los datos de carpeta, hoja y celda por tus datos Sub Contar_Pdf() Dim arch As Variant Dim ruta As String Dim n As Long ' ruta = "C:\trabajo\" arch = Dir(ruta & "*.pdf") ' Do While arch <> "" n = n + 1 arch = Dir()...

Quita esta línea On Error Resume Next Prueba otra vez y escribe aquí qué dice el mensaje de error. Prueba esto y revisa si el archivo que aparece en el msg realmente existe en la carpeta Private Sub CommandButton1_Click() Dim imag As String imag =...