Comment avoir le chemin d'un fichier dans un text box
Résolu
r4944
Messages postés
136
Statut
Membre
-
r4944 Messages postés 136 Statut Membre -
r4944 Messages postés 136 Statut Membre -
Bonjour,
je cherche une fonction qui peut m'aider à parcourir des fichiers word à travers un boutton (parcourir ) et afficher le path du fichier selectionné dans un textbox qui se trouve juste à coté du boutton parcourir ,
j'ai commencé avec ce code ci dessus mais il fait juste l'ouverture du fichier selectionné alors que c'est pas vraiment ce que je cherche.
Merci
je cherche une fonction qui peut m'aider à parcourir des fichiers word à travers un boutton (parcourir ) et afficher le path du fichier selectionné dans un textbox qui se trouve juste à coté du boutton parcourir ,
j'ai commencé avec ce code ci dessus mais il fait juste l'ouverture du fichier selectionné alors que c'est pas vraiment ce que je cherche.
Merci
Dim vaFiles As Variant
Dim i As Long
vaFiles = Application.GetOpenFilename _
(FileFilter:="Excel Filer (*.xls),*.xls", _
Title:="Open File(s)", MultiSelect:=True)
If Not IsArray(vaFiles) Then Exit Sub
With Application
.ScreenUpdating = False
For i = 1 To UBound(vaFiles)
Workbooks.Open vaFiles(i)
Next i
.ScreenUpdating = True
End With
1 réponse
-
Bonjour,
Je crois ne pas très bien avoir compris, mais j'ai réaliser ceci.
Public Class Form1
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim Excel As New OpenFileDialog
Excel.Filter = "Excel Filer .xls|*.xls"
If Excel.ShowDialog() = 1 Then
TextBox1.Text = Excel.FileName
Else
End If
End Sub
End Class
Aaron.
