Access - ¿Cómo reducir la ruta de un hipervínculo?

Tengo un campo hipervínculo donde hay un botón que te dirige a una ubicación de la misma base de datos. Allí escoges una carpeta dónde está la documentación de la factura correspondiente, la pregunta es si se puede simplificar la ruta y que solo me muestre el número de factura. A continuación os muestro el código que he utilizado para ver si me podéis ayudar, gracias!

Public Function buscaArchivo() As String

Dim fDialog As Office.FileDialog

Set fDialog = Application.FileDialog(msoFileDialogFolderPicker)

With fDialog

.AllowMultiSelect = False

.ButtonName = "Seleccionar"

.Title = "Seleccionar el archivo"

.InitialFileName = Application.CurrentProject.Path & "\Autorizacion\"

.InitialView = msoFileDialogViewDetails

.Filters.Clear

If .Show = True Then

buscaArchivo = .SelectedItems(1)

Else

MsgBox "Agregar la documentación”

End If

End With

End Function

1

1 Respuesta

725.900 pts. No responderé preguntas de usuarios que no valoren las...

Fácil:

Imagino que en tu botón tendrás algo como esto:

Me.Factura=buscaArchivo

pues tan solo tienes que cambiarlo por esto otro:

Dim miArchivo As String
miArchivo = BuscaArchivo
Me.txtTest = Right(miArchivo, Len(miArchivo) - InStrRev(miArchivo, "\"))

Y listo, te colocará en el cuadro de texto tan solo el nombre y extensión del archivo. Y cuando necesites mostrarlo, con encadenarle al principio la ruta "fija", solucionado. Por ejemplo:

Application.FollowHyperlink Application.CurrentProject.Path & "\Autorizacion\" & Me.Factura

Un saludo.


Añade tu respuesta

Haz clic para o

Más respuestas relacionadas