Luis Mondelo

Por lo que veo estás reubicando archivos con nuevos nombres. Para hacer algo así no es necesario abrirlos para después cerrarlos, basta con utilizar la sentencia: name ... as ... En tu ejemplo sería algo asi: En B1 carpeta vieja En C1 nombre viejo En...

Supongamos que tenemos esos números apilados en la columna desde A1 hasta A4. Ahora en la celda B2 escribe esta fórmula: =INDICE(A1:A4;ALEATORIO.ENTRE(1;4)) recuerda finalizar la consulta

Te mando mi solución: Suponemos que tenemos esos datos apilados en una misma columna uno de bajo de otro. Imaginemos que los tenemos en la columna A desde A1 hacia abajo. Sitúate en la celda B1 y escribe esta fórmula y luego arrastrala hacia abajo....

Te mando mi solución. Supongo que quieres poner un color alterno cada 6 filas en una columna de datos. Supongamos que lo queremos hacer en la columna A desde donde empiezan los datos hasta donde terminen. Posiciónate en el primer valor de la lista y...

Hay un error en la línea del chdir, la correcta seria así: ChDir "C:\ Users\ A2273174\ Desktop\ Archivos\ Resultados\" Le faltaba la barra en el final

Te mando mi solución: Mediante el evento change de la hoja en la que estás trabajando se puede hacer. Para ello copia la siguiente macro en el objeto hoja que estás tratando, no en un módulo. Private Sub Worksheet_Change(ByVal Target As Range) 'por...

Te mando mi solución con una macro. Las instrucciones siguen siendo las mismas, es decir, tenemos los números escritos en la columna A desde A1 hacia abajo. En este caso te posicionas encima de A1 y después ejecutas esta macro: Sub prueba() 'por...

Necesito una aclaración: ¿A la hoja2 copiaremos un solo registro siempre o los iremos acumulando en dicha hoja uno debajo de otro en futuros copiados?

Prueba a poner la macro así: Sub PDF() Worksheets("PRUEBA").Range("B3:M54").Select Selection.ExportAsFixedFormat Type:=xlTypePDF, Filename:="c:\GILDARDO\Desktop\PRUEBA\" & Range("d16").Value End Sub recuerda finalizar la consulta

Te mando mi solución y sigue mi ejemplo: -Tenemos un volumen de datos en hoja1 ocupando el rango A1:¿M? (Cualquier tamaño) -En mi ejemplo no tengo encabezado. -Ejecuta esta macro y tendrás tu solución: Sub prueba() 'por luismondelo...