Discussion :

[sharivary]

Bonjour,

Niveau débutant.

Une table avec en champ 1 les noms de fichiers et en champs 2 les hyperliens de ceux-ci. La table est lié à un fichier Excel donc le champs 2 n'est pas en propriété "Hyperlink"

Sur un formulaire de recherche par champ 1 de cette table le résultat affiche la colonne 1 avec le nom du fichier et je tente de faire que lorsque l'utilisateur double click sur le résultat de la recherche une message box s'ouvre et demande confirmation pour ouvrir le document et puise l'hyperlink dans le champ 2 afin de l'ouvrir.

Après plusieurs tentative de concaténer la valeur de mon champ 2 avec "#" ou autres chemin tortueux je bloque...

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
Private Sub ListeRecours_DblClick(Cancel As Integer)
MsgBox "Souhaitez-vous ouvrir le documents " & Me.ListeRecours.Value, vbYesNo
If vbYes Then
            Application.FollowHyperlink "#" & Me.ListeRecours.Column(2).Value & "#"
Else
End If
End Sub

Le fichier :
Recherche2.zip

Je suis passé par pas mal d'étape et d'erreur '94' ou '424' ainsi que sur le FAQ du forum et suis encore débutant en VBA et même en ACCESS.

D'avance merci pour votre aide !

[madefemere]

Bonjour,

Attention, la numérotation des colonnes dans une liste déroulante commence à partir de 0.
Donc la propriété Column(2) fait référence à la 3ème colonne de ta liste déroulante.

@+

[sharivary]

Encore merci à toi!
Logiquement tout roule maintenant