Visual Basic - UREGENTE:Recorrer directorio

hola,

Soy nuevo en visual basic, pero necesito recorrer un directorio que me introduzcan por teclado quedandome con los ficheros .xls que existan en ese directorio.

Y luego analizar cada uno de esos ficheros por separado(¿cómo accedo a cada uno de ellos?).

muchísimas gracias, es muy urgente!!!!!!!!!

Si consultás la ayuda de la función dir en la ayuda verás que trae unos ejemplos, el último es un algoritmo para recorrer el directorio. Es fácil de adaptar a lo que querés

Saludos Ruri

gracias, pero lo que pasa es que no tengo instalada la ayudad de VB. Si pudieras copiar y pegar ese fragmento de código lo agradecería mucho.

MyPath = "c:\" ' Establece el directorio
MyName = Dir(MyPath, vbDirectory) ' Recibe la primer entrada
Do While MyName <> "" ' Comienza el bucle
' Ignora el directorio actual y el superior
If MyName <> "." And MyName <> ".." Then
' Verifica que no sea un directorio
If (GetAttr(MyPath & MyName) And vbDirectory) <> vbDirectory Then
If MyName like ".xls" then
Debug.print MyPath & MyName 'Envía el resultado esperado a la ventana de depuración
End if
End If
End If
MyName = Dir
Loop

gracias, pero lo que pasa es que no tengo instalada la ayudad de VB. Si pudieras copiar y pegar ese fragmento de código lo agradecería mucho.