Cómo utilizar la función Dir en VBA

VBA es el lenguaje de programación desarrollado e implementado por Microsoft Corporation. VBA se utiliza para programar y mejorar muchos productos de Microsoft, incluyendo las varias versiones de Microsoft Office. VBA contiene una serie de funciones integradas, tales como la función Dir, que se puede utilizar para crear o mejorar las aplicaciones existentes. La función Dir se utiliza para devolver una cadena que representa los nombres de los archivos, directorios o listas de carpetas. Uso de la función Dir requiere sólo unos pocos pasos simples.

Instrucciones

1 Abra Microsoft Word.

2 Haga clic en "Herramientas", "Macro" y luego "Visual Basic" para abrir el entorno de programación VBA.

3 Haga clic en "Insertar" y "Módulo".

4 Este código VBA da un ejemplo de cómo utilizar la función Dir para solicitar todos los archivos en un directorio, la unidad C:. El procedimiento guarda los nombres de los archivos individuales en el "TodosLosArchivos" variable y luego la muestra en un cuadro de mensaje para el usuario. Escriba o pegue el siguiente bloque de código en la ventana módulo:

MostrarArchivos sub ()

Dim como secuencia NextFile se

TodosLosArchivos Dim como secuencia

TodosLosArchivos = ""

NextFile se dir = ( "C: \", 0)

Mientras NextFile se <> ""

AllFiles = AllFiles & Chr(13) & NextFile

NextFile se dir =

Encaminarse a

MsgBox TodosLosArchivos

End Sub

5 Haga clic en "Archivo" y luego "Guardar" para guardar su trabajo.

6 Pulse la tecla "F5" en su teclado para ejecutar el programa. Debería ver un cuadro de mensaje con una lista de nombres de archivos en la unidad C:.