OuvrirFich et bouton annuler

[tactic6]

Bonjour le forum
j'ai une macro avec :

OuvrirFich = Application.Dialogs(xlDialogOpen).Show

j'aimerais arrêter la macro si je clic sur le bouton annuler de la fenêtre ouvrir
mais je ne sais pas comment faire
quelqu'un sait ?
Merci pour votre lumière et bon Dimanche à tous

 

[Pierrot93]

Re : OuvrirFich et bouton annuler

Bonjour tactic

essaye peut être ainsi :

Dim ouvrirfich As Variant
ouvrirfich = Application.GetOpenFilename
If VarType(ouvrirfich) = vbBoolean Then Exit Sub
Workbooks.Open ouvrirfich

libre adaptation d'un code de Michelxld🙂, merci à lui.

bon dimanche
@+

 

[Pierrot93]

Re : OuvrirFich et bouton annuler

Re

ah les multi post....

https://www.excel-downloads.com/threads/manque-un-bout-de-code.116320/

 

[tactic6]

Re : OuvrirFich et bouton annuler

Merci Pierrot93
Pour ce qui est du multi post c'est pas du tout la même question
je l'ai fait pour différentier les réponses et pour ne pas avoir (comme je l'ai déja eu 🙂 ) mais c'est quoi ta question ?
Désolé pour le dérangement (à tous ceux qui lisent ce post il n'y a aucun problème, aucune agressivité, aucun sous entendu je le précise car il suffit qu'un membre soupçonne une virgule de travers pour que d'autres y voient la même chose et que la discution ne dégénère )
parenthèse fermée et bon WE à tous