Bonjour,
Je veux programmer un bouton Parcourir en VB.NET permettant de donner la possibilité d'ouvrir un fichier EXCEL, mais j'arrive pas à réussir toujours il me donne l'erreur citée dans l'image ci_dessous :
Merci Mr NHenry pour votre réponse ,
J'ai déclaré le bouton parcourir comme suit :
Private Sub ButtonParcourir_Click(sender As Object, e As EventArgs) Handles ButtonParcourir.Click
Dim ofd As New OpenFileDialog()
If (ofd.ShowDialog = Windows.Forms.DialogResult.OK) Then
MsgBox(ofd.FileName)
End If
ofd.Dispose()
End Sub
Alors le résultat est quand je clique sur le Bouton Parcourir il m'ouvre une boite de dialogue du mon ordinateur mais le problème est :
quand je sélectionne un fichier pour l'ouvrir il me donne seulement le chemin de remplacement de fichier j'arrive pas à ouvrir le fichier.
et Merci
Dim chemin As String
Dim ofd As New OpenFileDialog()
If (ofd.ShowDialog = Windows.Forms.DialogResult.OK) Then
chemin = ofd.FileName
Process.Start(chemin) 'ouvre le fichier dans son programme par défaut
End If
ofd.Dispose()
Merci infiniment Mr cs_Le Pivert et Mr NHenry pour votre aide le problème d'ouvrir un fichier en cliquant sur le bouton est résolu et voici le code que j'ai testé et ça marche :
Private Sub ButtonParcourir_Click(sender As Object, e As EventArgs) Handles ButtonParcourir.Click
Dim ofd As New OpenFileDialog()
If (ofd.ShowDialog = Windows.Forms.DialogResult.OK) Then
Dim msg As String
msg = (ofd.FileName)
TextBox1.Text = msg
Process.Start(msg) 'ouvre le fichier dans son programme par défaut
End If
ofd.Dispose()
End Sub
il me reste comment spécifier le type de fichier ( dans ce cas un fichier Excel) à ouvrir ainsi comment l'afficher dans DatGRidView et comment le gérer : c'est à dire Ajouter, supprimer, représenter les données en graphique.
J'ai déclaré le bouton parcourir comme suit :
Private Sub ButtonParcourir_Click(sender As Object, e As EventArgs) Handles ButtonParcourir.Click
Dim ofd As New OpenFileDialog()
If (ofd.ShowDialog = Windows.Forms.DialogResult.OK) Then
MsgBox(ofd.FileName)
End If
ofd.Dispose()
End Sub
Alors le résultat est quand je clique sur le Bouton Parcourir il m'ouvre une boite de dialogue du mon ordinateur mais le problème est :
quand je sélectionne un fichier pour l'ouvrir il me donne seulement le chemin de remplacement de fichier j'arrive pas à ouvrir le fichier.
et Merci