Discussion :

[GADENSEB]

Bonjour,

Je construit une bdd, les données sont saisies par le biais d'un userform
Je cherche à :
- construire un bouton pour pointer sur fichier (pdf) présent dans un dossier.
- récupérer cette adresse de lien hypertexte
- l'affecter, à l'incorporation des données dans la bdd, dans une cellule remplie dans le userform

..... je sèche j'avoue.

qqn aurait une idée ?
Merci
Seb

[Invité]

Bonjour

..... je sèche j'avoue.

A quel niveau ? As-tu commencé à faire quelque chose ?

Philippe

[GADENSEB]

Je commmence avec

Code :

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

Application.Dialogs(xlDialogInsertHyperlink).Show

sur le bouton qui pointe sur le fichier
mais aprés je ne sais pas quel axe attaquer.....

j'avance un peu mais je reste bloqué à

Code :

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

1
2
3
Application.Dialogs(xlDialogInsertHyperlink).Show
MyLink = ActiveCell.Hyperlinks(1).Address
ActiveSheet.Hyperlinks.Add Anchor:=Selection, Address:=MyLink, TextToDisplay:=CANDIDATURE

as-tu une idée ?

[GADENSEB]

j'ai trouvé

Code :

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

1
2
3
4
5
6
'Génére le lien hypertexte vers le fihier PDF
Dim FileName As String
FileName = Application.GetOpenFilename
ActiveSheet.Hyperlinks.Add Anchor:=Range("AM" & L), Address:= _
FileName, _
TextToDisplay:="ANNONCE"

Range("AM" & L) étant la ligne remplie par le biais de l'userform

thanks