Dante Amor

¿Cómo se llama el archivo pdf? ¿Cómo se llama la carpeta donde tienes el archivo pdf? ¿En cuál celda tienes el número de página? Revisa en tu equipo e investiga dónde tienes tu programa Adobe Reader, nombre de la carpeta y nombre del programa. Por...

Ejecuta la macro. Selecciona una carpeta con los archivos .zip y presiona Aceptar. Si quieres otra carpeta, ejecuta nuevamente la macro Sub DemoUnZip1() Dim carpeta As Variant, archivo As Variant, itm As Variant Dim ShellApp As Object ' Set ShellApp...

Te sugiero que la hoja destino esté vacía. En la macro le indiques en cuál columna quieres cada semestre. Por ejemplo: I col W II col W III col A IV col A Etc. Entonces buscas en la hoja origen el semestre I, copias todas las filas y las pegas en la...

Prueba lo siguiente: Debes utilizar "set" cada vez que le vas a asignar un rango. Sub pruebas() Dim Fecha As Date Dim Rango As Range, RangoF As Range, RangoC As Range Dim FechaFinal As Range, FechaInicio As Range Dim TurnoX As Variant Dim...

Prueba lo siguiente: Private Sub UserForm_Initialize() Dim año As Long Dim c As Range ' año = 9999 ' For Each c In Range("A5", Range("A" & Rows.Count).End(3)) If c.Value <> "" And IsDate(c.Value) Then If Year(c.Value) < año Then año = Year(c.Value)...

2. Si la hoja1 y hoja2 tienen estos datos. Cuál sería el resultado en la hoja Destino: Según tus condiciones, en la hoja Destino solamente pondría datos de la hoja1, ya que los valores de la hoja1 no son menores a 100, entonces no se debe traer nada...

Pero entonces necesitas 6 celdas para poner los diferentes rangos, algo como esto: Public Function clasif(A As Double) As Byte clasif = 0 If A >= Range("A1") And A <= Range("B1") Then clasif = 1 If A > Range("A2") And A <= Range("B2") Then clasif = 2...

Filtre todo lo que sea 1, lo copie ¿Copiar desde cuál columna y hasta cuál columna? ¿En cuál fila tienes encabezados? ¿En cuál fila empiezan los datos? Lo pegue en la hoja llamada "Macro" Lo peguen cuál celda, en cuál fila, en cuál columna. Antes de...

Debes explicar cómo se llama tu carpeta. En cuál columna tienes los nombres de archivo y cuál columna quieres el resultado. Prueba lo siguiente. Supone que la carpeta se llama "c:\trabajo\pdfs\" También supone que los nombres están en la columna A y...

Cambia en el código la ruta por el nombre de la carpeta donde tienes tus pdf's. Si el archivo de excel está en la misma carpeta donde tienes los pdf's, entonces cambia a esto: ruta = thisworkbook.Path & "\" Cambia la letra "C" por la letra de la...