Re : Besoin d'aide, d'astuce et de conseil pour un projet.
Sinon je crée mon premier bouton me permettant d'accéder à l'emplacement du fichier. Le second boutton me reprend le chemin du premier bouton pour accéder directement au dossier est ce possible?
Private Sub CommandButton7_Click()
Dim finput As FileDialog
Set finput = Application.FileDialog(msoFileDialogFilePicker)
finput.Show
If finput.SelectedItems.Count = 0 Then Exit Sub
With Worksheets("Feuil1")
If Not finput Is Nothing Then
.Cells(1, 1).Hyperlinks.Add .Cells(1, 1), Address:=finput.SelectedItems(1)
End If
End With
End sub
Et après un second boutton pour utiliser Address
Mais cela se sauvegarde? Comme ça l'utilisateur pourra accéder au dossier directement.