Lien hypertexte sur toute une colonne

Bonjour à toutes et à tous,

Je bloque sur la mise en place d'un lien hypertexte dans un formulaire.

Je souhaite mettre un lien vers un fichier qui se trouve dans l'ordinateur (jusque là tout va bien) et qu'il soit cliquable (là je bloque).

Malgré mes recherches et tests, pas moyen de le faire. Auriez-vous une idée ?

Merci d'avance pour vos réponses.

Private Sub CommandButton3_Click()

'recherche dans ordinateur d'un fichier

    With Application.FileDialog(msoFileDialogOpen)
        .AllowMultiSelect = False
        .Show
        Nouveau.TBCV = .SelectedItems(1)

'fichier cliquable

    End With
End Sub

Bonjour Samath, le forum,

Un essai:

• Un double-clic dans la cellule déclenche la macro.
• Tu sélectionnes ton fichier
• Le lien hypertexte est crée dans la cellule

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)

   myfile = Application.GetOpenFilename(, , "Browse for workbook")

        ActiveSheet.Hyperlinks.Add Anchor:=Selection, Address:= _
        myfile, _
        TextToDisplay:= _
        myfile

End Sub

Cordialement,