Preguntas esperando respuesta
Actividad pública reciente
Ha preguntado en el tema en
Microsoft Excel
Power Query - Combinar archivos de carpeta. Diferentes hojas!
Espero que puedan ayudarme, como siempre... :) Tengo una carpeta en la que guardo un archivo Excel por día. Necesito "juntar" todos los datos en un único archivo. Lo estoy intentando hacer con Power Query (Obtener datos desde una carpeta) pero, me...
Sin respuestas
Ha preguntado en el tema en
Microsoft Excel
y en 1 temas más
Tabla vinculada a un Excel compartido en Sharepoint
Tengo un archivo Excel REGISTRO alojado en sharepoint. Varias personas se conectan a dicho fichero para introducir datos. Tengo un segundo archivo Excel ANÁLISIS que utilizo para hacer tablas dinámicas y diferentes cálculos a partir de los datos del...
Sin respuestas
Ha valorado "Excelente" la respuesta
EXCEL - Contar.Si en tabla filtrada
Para contar los registros visibles puedes utilizar la función Subtotales( ) Por ejemplo, para contar los datos del rango B2:B11, utiliza el número de función 3 La fórmula quedaría: =SUBTOTALES(3;B2:B11) El resultado solamente cuenta los datos...
Ha valorado "Excelente" la respuesta
ACCESS-EXCEL: Vincular Objeto tabla de Excel a Access
Esto te puede servir https://youtu.be/D9t0VOeLVFQ https://youtu.be/f7ae2oY8Hd4 Visita https://programarexcel.com SUSCRIBE https://www.youtube.com/c/programarexcel?sub_confirmation=1
Ha valorado "Excelente" la respuesta
VBA - Para los valores de un rango, copiar datos desde otra hoja
Le hice algunos ajustes a tu primer macro y me funciona. Sub CopiarPedidos() Application.ScreenUpdating = False Dim Celda As Range, Lista As Range Set h1 = Sheets("PLAN") Set h2 = Sheets("ANALISIS") 'Recorrer la Lista --> copiar fecha en celda de...
Ha valorado "Excelente" la respuesta
EXCEL - Lista de hojas de un libro, pero sin contar las 4 primeras
Podés utilizar esta otra: Sub listaHojas() 'x Elsamatilde 'arma lista de hojas excluyendo las primeras 4 x = 10 For i = 5 To Sheets.Count Sheets("Hoja3").Range("C" & x) = Sheets(i).Name x = x + 1 Next i End Sub O esta otra cuando sepas el nombre de...
Ha valorado "Excelente" la respuesta
EXCEL - Aplicar Filtro y, a continuación, una macro definida
Así quedaría el orden de instrucciones, agregando las que dejo en negrita. Set h1 = Sheets("Proyectos") For i = 10 To h1.Range("K" & Rows.Count).End(xlUp).Row If h1.Rows(i).Hidden = False Then If h1.Cells(i, "K") <> "" Then 'tus instrucciones End If...
Ha valorado "Excelente" la respuesta
Aplicar macro a varios archivos de una carpeta
Quedaría así: Sub LoopThroughFiles() ruta = Sheets("EXPORTACIÓN").Range("K4").Value If Right(ruta, 1) <> "\" Then ruta = ruta & "\" xFileName = Dir(ruta & "*.xls*") Do While xFileName <> "" With Workbooks.Open(ruta & xFileName) 'your code here End...
Ha cambiado su perfil.
- Vive en: España.