ubiquitour.com

Cómo tener Excel Lee un directorio y crear una hoja de cálculo

Saber cómo utilizar Excel para leer un directorio y crear una hoja de cálculo lista contenido de directorio le permite utilizar Excel como una aplicación de gestión de archivo. Por ejemplo, podría proporcionar un usuario con un listado en el directorio desde el que puede elegir una tabla de base de datos de Access para importar en el libro actual de Excel. Proyecto de este artículo se basa en lenguaje de programación de Excel, Visual Basic para aplicaciones o VBA para el cortocircuito. Puede utilizar este lenguaje para automatizar cualquier tarea de Excel que no requiere intervención del usuario. Una forma efectiva de aprender este idioma es utilizar comando de "Macro de registro" de Excel en la pestaña "Programador".

Instrucciones

1 Haga clic en el botón de "Opciones" de oficina y haga clic en la casilla de verificación "Show developer" para mostrar la ficha "Programador". Esta ficha tiene botones para macros de Visual Basic. Usarás una macro VBA para listar los archivos en un directorio y guardar esta lista en una nueva hoja de cálculo.

2 Haga clic en la ficha "Programador" y haga clic en el botón "Visual Basic" para entrar en el entorno de programación Visual Basic. Haga doble clic en el elemento "Libro" en el panel de navegación en pantalla izquierda. Esta acción abre una nueva ventana de programación en el que entrar en el programa de listado de directorio.

3 Pegue el siguiente programa en la ventana de programación. Este programa utiliza la función VBA "Dir" para leer un directorio. La salida de esa función es un único archivo de ese directorio.

Opción explícita

Público Sub ListFiles()

Dim d

d = Dir("c:\windows*")

MsgBox d

End Sub

4 Haga clic en cualquiera de las declaraciones del programa y haga clic en el comando de "Ejecutar" del menú "Run" para ejecutar el programa. Excel mostrará un cuadro de mensaje indicando el nombre de un archivo en la carpeta "C:\windows".

5 Pegar el siguiente programa después de la instrucción "End sub" del primer programa. Este programa crea un libro nuevo e inserta un valor en una de sus células. El programa final que contiene los archivos de un directorio utilizará las declaraciones en este programa para insertar los nombres de archivo en un nuevo libro.

Opción explícita

Público Sub MakeNewWorkbook()

Workbooks.Add

activeCell = "Hola"

End Sub

6 Ejecute el programa como lo hizo el anterior y a continuación, haga clic en el icono de "Excel" en la barra de tareas de Windows para volver a Excel. El programa añadirá un nuevo libro cuya hoja de cálculo actual muestra el texto "Hola allí" en la celda A1.

7 Instrucciones de paso 2 para volver al entorno de programación VBA y luego pegar el siguiente programa después de la instrucción "End Sub" del programa anterior. Este programa utiliza la función "Dir" para recopilar todos los archivos en la carpeta "C:\windows". El programa guarda cada archivo en su propia fila en una hoja de cálculo de un libro nuevo.

Opción explícita

Público Sub ListOneFile()

Dim d

d = Dir("c:\windows*")

Workbooks.Add

Hasta d = ""

ActiveCell = d

' mover hacia abajo

ActiveCell.Offset(1). Seleccione

d = Dir

Lazo

End Sub

8 Ejecutar el programa como hiciste con los anteriores y volver a Excel siguiendo las instrucciones del paso 6. Usted verá una nueva hoja de cálculo cuyas células muestran un listado de todos los archivos en el directorio "C:\windows".