generar la ruta de una carpeta determinada?

[prax3des]

Existe alguna forma de incluir en una celda de forma automatica la ruta de una carpeta determinada?

Gracias

[aaquino]

Hola, sí, existe.

Saludos.

[Jose BN]

En 30/10/2019 at 10:34 , prax3des dijo:

Existe alguna forma de incluir en una celda de forma automatica la ruta de una carpeta determinada?

Gracias

Fíjate a ver si entendí bien:

Sub carpeta()
ruta = InputBox("ingresar la ruta")
Range("i1").Select
Do While ActiveCell.Value <> ""
MkDir (ruta & "\" & ActiveCell.Value)
ActiveCell.Offset(1, 0).Select
Loop

End Sub

 

[prax3des]

Josee BN muchas gracias?