nico62370
XLDnaute Nouveau
Bonjour,
Je souhaiterais affecter un type d'erreur (1004) à une boite de dialogue. Lorsque je valide la ligne on error(1004)... Excel m'indique "erreur de compilation/ attentu : goto ou resume". Merci de m'aider, je vous donne une copie du code VBA.
Private Sub CommandButton1_Click()
On Error(1004) GoTo gester
choix = ComboBox1.Value
Workbooks.Open Filename:="D:\facture\archivage\" & choix & ""
Application.Visible = True
menu.Hide
gester:
MsgBox "CE FICHIER N'EST PAS DISPONIBLE", vbCritical, "ANNULATION"
End Sub
Je souhaiterais affecter un type d'erreur (1004) à une boite de dialogue. Lorsque je valide la ligne on error(1004)... Excel m'indique "erreur de compilation/ attentu : goto ou resume". Merci de m'aider, je vous donne une copie du code VBA.
Private Sub CommandButton1_Click()
On Error(1004) GoTo gester
choix = ComboBox1.Value
Workbooks.Open Filename:="D:\facture\archivage\" & choix & ""
Application.Visible = True
menu.Hide
gester:
MsgBox "CE FICHIER N'EST PAS DISPONIBLE", vbCritical, "ANNULATION"
End Sub