¿Cómo contar archivos en una carpeta/directorio específico en Excel?
Si necesita obtener el número de archivos en una carpeta específica en Excel, ¿qué método se le ocurriría? ¿Qué tal contar el número de archivos de un tipo específico en una carpeta? ¿Y si contara los archivos en una carpeta específica y sus subcarpetas en Excel? Los siguientes trucos le ayudarán a resolverlo fácilmente.
- Contar archivos de un tipo específico en una carpeta con VBA
- Contar todos los archivos en la carpeta que contiene el libro de trabajo actual
- Contar todos los archivos en una carpeta específica (incluidas las subcarpetas) con Kutools para Excel
Contar archivos de un tipo específico en una carpeta con VBA
El siguiente código VBA puede ayudarle a contar fácilmente archivos de un tipo específico en una carpeta determinada, como contar todos los archivos .xlsx en una carpeta. Por favor, haga lo siguiente:
1. Presione simultáneamente las teclas Alt + F11 para abrir la ventana de Microsoft Visual Basic para Aplicaciones.
2. Haga clic en Insertar > Módulo, y luego pegue el siguiente código VBA en la ventana del Módulo que se abre.
VBA: Contar un archivo específico en una carpeta determinada
Sub CountFiles()
Dim xFolder As String
Dim xPath As String
Dim xCount As Long
Dim xFiDialog As FileDialog
Dim xFile As String
Set xFiDialog = Application.FileDialog(msoFileDialogFolderPicker)
If xFiDialog.Show = -1 Then
xFolder = xFiDialog.SelectedItems(1)
End If
If xFolder = "" Then Exit Sub
xPath = xFolder & "\*.xlsx"
xFile = Dir(xPath)
Do While xFile <> ""
xCount = xCount + 1
xFile = Dir()
Loop
MsgBox xCount & " files found"
End SubNota: El código VBA anterior contará los archivos .xlsx en una carpeta específica. Para contar otro tipo de archivos, busque xPath = xFolder & "\*.xlsx", y cambie .xlsx a otra extensión de archivo según sea necesario.
3. Presione la tecla F5 o haga clic en el botón Ejecutar para ejecutar este código VBA.
4. En el cuadro de diálogo Examinar que aparece, seleccione la carpeta específica donde desea contar los archivos de un tipo específico y haga clic en el botón Aceptar.
5. Ahora aparecerá un cuadro de diálogo que le mostrará cuántos archivos del tipo específico existen en esa carpeta. Simplemente cierre el cuadro de diálogo.
Descubre la Magia de Excel con Kutools AI
- Ejecución Inteligente: Realiza operaciones en celdas, analiza datos y crea gráficos, todo impulsado por comandos simples.
- Fórmulas Personalizadas: Genera fórmulas adaptadas para optimizar tus flujos de trabajo.
- Codificación VBA: Escribe e implementa código VBA sin esfuerzo.
- Interpretación de Fórmulas: Comprende fórmulas complejas con facilidad.
- Traducción de Texto: Supera las barreras del idioma dentro de tus hojas de cálculo.
Contar todos los archivos en la carpeta que contiene el libro de trabajo actual
Si ha abierto una carpeta, normalmente obtendrá el número total de archivos en la parte inferior de esta carpeta. Este método presentará la utilidad Abrir la carpeta que contiene de Kutools para Excel para abrir la carpeta que contiene el libro de trabajo actual y luego obtener el número de archivos en esta carpeta.
1. Haga clic en Kutools Plus > Libro de trabajo > Abrir la carpeta donde se encuentra el documento actual. Ver captura de pantalla:
2. Ahora se está abriendo la carpeta que contiene el libro de trabajo actual.
Desmarque cualquier archivo en la carpeta que se abre, y verá el número total de archivos en la parte inferior de esta carpeta, como se muestra en la siguiente captura de pantalla:
Nota: La Abrir la carpeta donde se encuentra el documento actual utilidad será inválida si nunca ha guardado el libro de trabajo actual antes.
Kutools para Excel - Potencia Excel con más de 300 herramientas esenciales. ¡Disfruta de funciones de IA gratis permanentemente! Consíguelo ahora
Contar todos los archivos en una carpeta específica (incluidas las subcarpetas) con Kutools para Excel
A veces, es posible que desee contar varios tipos de archivos en una carpeta y sus subcarpetas. De hecho, Kutools para Excel proporciona otra utilidad Lista de nombres de archivos para resolverlo fácilmente.
1. Haga clic en Kutools Plus > Importar / Exportar > Lista de nombres de archivos para abrir el cuadro de diálogo Lista de nombres de archivos.
2. En el cuadro de diálogo Lista de nombres de archivos que se abre, haga lo siguiente:
(1) Haga clic en el Examinar botón 
para seleccionar la carpeta específica donde contará los archivos de tipos específicos.
(2) Especifique los tipos de archivos que contará según sus necesidades.
Por ejemplo, si necesita contar todo tipo de libros de trabajo, como archivos .xlsx, archivos xlsm y archivos .xls, etc., marque la opción Tipos comunes y seleccione Todos los archivos de Excel de la lista desplegable a continuación.
Nota: Si necesita contar todos/los tipos específicos de archivos en la carpeta específica y sus subcarpetas, marque la opción Incluir archivos en subdirectorios.
3. Haga clic en el botón Aceptar en el cuadro de diálogo Lista de nombres de archivos.
4. Ahora todos los archivos de tipos específicos están listados en una nueva hoja de cálculo. Simplemente seleccione la primera columna sin el encabezado de columna, y obtendrá el número de archivos en la Barra de estado, como se muestra en la siguiente captura de pantalla:
Kutools para Excel - Potencia Excel con más de 300 herramientas esenciales. ¡Disfruta de funciones de IA gratis permanentemente! Consíguelo ahora
Demostración: Contar todos los archivos en una carpeta específica (incluidas las subcarpetas)
Las mejores herramientas de productividad para Office
Potencia tus habilidades en Excel con Kutools para Excel y experimenta una eficiencia sin precedentes. Kutools para Excel ofrece más de300 funciones avanzadas para aumentar la productividad y ahorrar tiempo. Haz clic aquí para obtener la función que más necesitas...
Office Tab lleva la interfaz de pestañas a Office y facilita mucho tu trabajo
- Habilita la edición y lectura con pestañas en Word, Excel, PowerPoint, Publisher, Access, Visio y Project.
- Abre y crea varios documentos en nuevas pestañas de la misma ventana, en lugar de nuevas ventanas.
- ¡Aumenta tu productividad en un50% y reduce cientos de clics de ratón cada día!