Dante Amor respondió:
Te anexo la macro, cambia "D4" por la celda en la que quieres pegar la ruta completa y el nombre del archivo Sub Ruta_Archivo() 'Por.Dante Amor With Application.FileDialog(msoFileDialogFilePicker) .Title = "Seleccione archivo" .Filters.Clear...