Discussion :

[viscere]

Bonjour,

j'ouvre des classeurs de la facon suivante :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
 
 
Set ChefDeServiceWorkbook = Application.Workbooks.Open(Application.GetOpenFilename, , True)

je voudrais sortir de mon programme si l'utilisateur clique sur le bouton annuler.

je n'ai pas trouvé ce que renvoyait la fonction Open dans ce cas la.

[mordrhim]

le test devra se faire sur GetOpenFilename

un conseil, fait comme suit :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
Dim CheminOuverture as String
 
CheminOuverture = Application.GetOpenFilename()
If CheminOuverture  <> "Faux" then
    Set ChefDeServiceWorkbook = Application.Workbooks.Open(CheminOuverture , , True)
Else 
    Exit Sub 'Là ça va TOUT arrêter
End If

[viscere]

Ok merci beaucoup!