ouverture de fichier

[gildas lechat]

Bonjour le forum,

J'ai une macro qui après recheche, m'indique le chemin du ficher dans un label

Private Sub CommandButton1_Click()

DossierRapportDeMicrosection = "P:\xxxxx\"
NOMREP = Dir(DossierRapportDeMicrosection & TextBox1.Value & "\a-*")
If NOMREP = "" Then
Label3.Caption = "Pas de dossier correspondant au nom specifie"
Else
Label3.Caption = "P:\xxxxx\" & TextBox1.Value & "\" & NOMREP
End If

End Sub

Quel est le code pour ouvrir le dossier afficher dans le label3?

Merci d'avance
Gildas

 

[Etienne2323]

Re : ouverture de fichier

Salut gildas lechat,
pour ouvrir un classeur en fonction de ce qui est écrit dans le label3, vous pouvez utiliser un code comme celui-ci :

Workbooks.Open Me.Label3.Caption

Cordialement,

Étienne

 

[gildas lechat]

Re : ouverture de fichier

Bonjour Étienne

Merci, c'est tout bon
Gildas