archivos en directorios

15/08/2005 - 21:59 por ««« Sis »»» | Informe spam
existes una formula en excel que me diga los nombres de los archivos que
se encuentran en tal directorio.

Gracias.

Preguntas similare

Leer las respuestas

#1 Héctor Miguel
16/08/2005 - 05:10 | Informe spam
hola, gvalentin !

... formula en excel que me diga los nombres de los archivos que se encuentran en tal directorio.



no formula [como para usarla en una hoja de calculo por funciones] :-((
pero si forma [de entre varias mas posibles] con una macro [+/- como la siguiente]...
-> pruebala en una hoja 'en limpio'

saludos,
hector.
== copia las siguientes lineas en un modulo de codigo 'normal' =Sub Listar_Libros_en_Directorio()
Application.ScreenUpdating = False
Dim BuscarDonde As String, Sig As Integer
' en la siguiente linea ESPECIFICA el directorio donde quieres 'buscarlos' '
BuscarDonde = "c:uta y\sub-carpeta donde estan\los archivos\" ' NO olvides al final el ->\<- '
With Application.FileSearch
.NewSearch
.LookIn = BuscarDonde
.SearchSubFolders = False
.FileType = msoFileTypeExcelWorkbooks
If .Execute() > 0 Then
Range("a1") = "Libros en " & BuscarDonde
For Sig = 1 To .FoundFiles.Count
Range("a1").Offset(Sig) = Mid(.FoundFiles(Sig), Len(BuscarDonde) + 1)
Next
Else: MsgBox "No existen documentos en " & BuscarDonde
End If
End With
End Sub
email Siga el debate Respuesta Responder a este mensaje
Ads by Google
Help Hacer una preguntaRespuesta Tengo una respuesta
Search Busqueda sugerida