Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

[RESOLU] Fermer la macro avant la fin

  • Initiateur de la discussion Initiateur de la discussion jsl72
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

J

jsl72

Guest
Bonjour à tous,

Le code suivant me permet de lancer une boite de dialogue pour sélectionner un fichier *. trc à ouvrir.

Dim strFileName As Variant
Stop
strFileName = Application.GetOpenFilename(filefilter:="Fichier *.trc (*.trc),*.trc", _
Title:="Sélectionnez le fichier à ouvrir")
'si un fichier a été sélectionné, celui-ci est ouvert
If strFileName <> False Then
Workbooks.Open strFileName
End If


Si je valide l'ouverture du fichier choisi, le code renvoie "true" et la macro continue à se dérouler --> NORMAL

Si j'annule l'ouverture du fichier choisi, le code renvoie "False" et la macro doit s'arrêter.
mais ce n'est pas le cas la macro continue à se dérouler.

Merci de concentrer votre recherche sur le code manquant pour atteindre "End sub".lorsque le code renvoie False.

Merci pour votre dévouement.
Bonne soirée.
Joël
 
Dernière modification par un modérateur:
Re : Fermer la macro avant la fin

Bonjour Joël

avec ceci:
Code:
'si un fichier a été sélectionné, celui-ci est ouvert
If strFileName <> False Then
Workbooks.Open strFileName
Else
Exit Sub
End If
à+
Philippe
 
Re : Fermer la macro avant la fin

Bonjour à tous,

Pas certain d'avoir compris :

VB:
Option Explicit

Sub Test()
Dim strFileName As Variant


Stop
strFileName = Application.GetOpenFilename(filefilter:="Fichier *.trc (*.trc),*.trc", Title:="Sélectionnez le fichier à ouvrir")


'si un fichier a été sélectionné, celui-ci est ouvert
If strFileName <> False Then
Workbooks.Open strFileName
Else: Exit Sub
End If
End Sub

A + à tous

Edition : Salut Philippe. Alors la Retraite...
 
Re : Fermer la macro avant la fin

Bonjour Philippe,

J'ai peine eu le temps d'exposer ma problématique que j'avais déjà la réponse!!

C'est trop TOP.

Merci pour ton efficience.

Joël.


PROBLEME RESOLU
 
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD
Assurez vous de marquer un message comme solution pour une meilleure transparence.

Discussions similaires

Réponses
15
Affichages
2 K
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…