-
Cómo tener Excel Leer 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 con el contenido del directorio le permite utilizar Excel como una aplicación de gestión de archivos. Por ejemplo, se puede proporcionar a un usuario con un anuncio en el directorio desde el que se puede elegir una tabla de base de datos Access para importar en el libro de Excel actual. El proyecto de este artículo se basa en el lenguaje de programación de Excel, Visual Basic para aplicaciones, o VBA para abreviar. Puede utilizar este lenguaje para automatizar cualquier tarea de Excel que no requiere la intervención del usuario. Una forma eficaz de aprendizaje de este idioma es utilizar el comando "Grabar macro" de Excel en su pestaña "desarrollador".
Instrucciones
1 Haga clic en el botón "Opciones" del botón de Office y, a continuación, haga clic en la casilla de verificación "Mostrar desarrollador" para revelar la ficha "desarrollador". Esta pestaña contiene botones para las macros de Visual Basic. Vamos a usar una macro VBA para listar los archivos en un directorio y guardar esa lista en una nueva hoja de cálculo.
2 Haga clic en la pestaña "desarrolladores" y, a continuación, haga clic en el botón de "Visual Basic" para entrar en el entorno de programación Visual Basic. Haga doble clic en el elemento "este libro" en el panel de navegación de la izquierda de pantalla. Esta acción abre una nueva ventana de programación en el que para entrar en el programa de directorio para publicar anuncios.
3 Pegue el siguiente programa en la ventana de programación. Este programa utiliza la función de VBA "Dir" para leer un directorio. La salida de esta función es un solo archivo de ese directorio.
Option Explicit
ListFiles Public Sub ()
Dim d
d = Dir ( "c: \ windows *")
d MsgBox
End Sub
4 Haga clic en cualquiera de los estados del programa y, a continuación, haga clic en el comando "Ejecutar" del menú de "Ejecutar" para ejecutar el programa. Excel mostrará un cuadro de mensaje que indica el nombre de un archivo en la carpeta "C: \ Windows."
5 Pega el siguiente programa después de que el "End sub" declaración del primer programa. Este programa crea un nuevo libro e inserta un valor en una de sus células. Su programa final que enumera los archivos de un directorio utilizará las declaraciones en este programa para insertar los nombres de archivo en un libro nuevo.
Option Explicit
Public Sub MakeNewWorkbook ()
Workbooks.Add
activecell = "Hola"
End Sub
6 Ejecutar el programa como lo hizo la anterior y, a continuación, haga clic en el icono "Excel" en la barra de tareas de Windows para volver a Excel. Su programa añadirá un nuevo libro cuya hoja de cálculo actual muestra el texto "Hola" en la celda A1.
7 Utilice instrucciones paso de 2 para volver al entorno de programación VBA, y luego pega el siguiente programa después de que el "End Sub" declaración del programa anterior. Este programa utiliza la función "Dir" para reunir todos los archivos en el directorio "C: \ Windows" carpeta. El programa almacena cada nombre de archivo en su propia fila en una hoja de cálculo de un libro nuevo.
Option Explicit
Public Sub ListOneFile ()
Dim d
d = Dir ( "c: \ windows *")
Workbooks.Add
Hacer hasta d = ""
ActiveCell = d
'mover hacia abajo
ActiveCell.Offset (1) .Seleccionar
d = Dir
Lazo
End Sub
8 Ejecutar el programa como lo hizo los anteriores, y luego volver a Excel usando instrucciones paso de 6. Verás una nueva hoja de cálculo cuyas células mostrar una lista de todos los archivos en el directorio "C: \ Windows" directorio.
