inexperto27

Mi idea es que hagas un filtro automático por colory luego cuentes las filas visibles. Suponiendo que la columna coloreada es la 2: Range("A1"). AutoFilter 2, vbYellow, xlFilterCellColor MsgBox "filas = " & WorksheetFunction.CountA(Range("A2",...

¿No entiendo bien tu macro(end(3)(2)?) Esta es mi propuesta para lo que pides, ya me dirás si te funciona :) : libre=Range("F1").end(xldown).row + 1 range("A1:D1").copy range("F" & libre)

Segun lo qu entendi, aqui te explico como lo hice en 3 pasos: Ordenas la tabla de la hoja2, por numero de forma ascente y por fecha de forma descendente (de forma que la 1ª fecha sea la más reciente)eliminas los duplicado de la tabla de la hoja2en la...

¿Cómo se guarda un libro en formato PDF? Nunca lo probé... dime Bueno así sin poder probarlo no se exactamente pero se me ocurre que el código debería ser algo así: if not (range("B13") and range("D13") )then activeworkbook.saveas...

No se si te servirá (dpde del nº de criterios que necesites), yo para 2 criterios utilice el método Sort(creo que admite hasta 3 criterios), no se si habrá algún otro que admita más criterios XX..Sort key1:=Columns(1), order1:=xlAscending,...

Probé tu código y NO me funciona :( Me da error de tipos en la función TimeValue ¿Seguro tu código funciona? Para que me programe eventos con fecha y hora (04/04/20 18:3) puedes probar a usar: OnTime CDate(Range("E6")), "X" mira a ver si te funciona...

No se si entendí exactamente lo que quieres, te explico para restar los caracteres hasta el penúltimo "\": Si tu archivo excel esta en Documentos\lista\fichero.xlsx con: ruta=thisworkbook.path 'ruta="documentos\lista"...

Yo también tuve ese problema en mis macros de VBA, así que te explico como resolver tu problema: Entendí que quieres filtrar una lista de fechas entre un valor(por ejemplo 1/1/2020) y otro(por ejemplo 11/3/2020), ¿si? Veamos pues el código...

He tenido problemas similares en mis macros, yo también andaba jugando con la función weekday() para evitar los fines de semana pero hay una función para calcular esto: workday(), miratela creo te servirá para tu problema, aunque si quieres evitar...

Cambia de línea el asunto(como bien dice Alejandro) y ponlo al final de las Asignaciones. A parte creo que el cuerpo del mensaje (Msg) esta mal definido