Como Generar Ruta de Un Documento en una celda
El objetivo de la macro seria insertar la ruta completa de un documento en el equipo (pdf,ppt,txt etc)
ejemplo:
"C:\Users\Public\Downloads\imagen.PNG"
la idea es que se abra el Explorador de archivo y busques manualmente el documento del cual requieres la ruta completa.
y se guarde o copie la ruta en una celda determinada Digamos (A1)
1 respuesta
Respuesta de Dante Amor
1
Utiliza esta macro
Sub ruta()
'Por.DAM
With Application.FileDialog(msoFileDialogFilePicker)
.Title = "Seleccione archivo"
.Filters.Clear
.Filters.Add "All Files", "*.*"
.AllowMultiSelect = False
.InitialFileName = ThisWorkbook.Path
If .Show Then
Range("A1") = .SelectedItems.Item(1)
End If
End With
End Sub Saludos.DAM
No olvides finalizar la pregunta.
