Lista de archivos + VINCULO

[rolanditorc]

Hola expertos, quiero compartir el codigo adrian
el codigo realiza lo siguente, te pide seleccionar una carpeta y en el excel coloca el nombre de todos los archivos y carpetas que se encuentran en...

Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes iniciar sesión aquí

 

[jonamac1]

Te envío una solución diferente, pero espero te sirva.

Saludos

Sub Lista()

Dim Ruta, Archivo As String

Ruta = "TURUTAAQUI"
Archivo = Dir(Ruta)

While Archivo <> ""...

Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes iniciar sesión aquí

 

[rolanditorc]

Perfecto, logre acomodarlo a lo que necesito, pero me veo con una necesidad tan grande y espero me puedas ayudar, que pasa si hay sub carpetas??..veo k solo me muestra el link de la carpeta, seria...

Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes iniciar sesión aquí

 

[rolanditorc]

Y si se puede decirle que solo coloque en el excel los archivos que tiene como extension final "xlm2 por ejmplo, ya que no me interesa cincular otro tipo de archivos o solo quiero ver en el excel...

Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes iniciar sesión aquí