Message box qui s'ouvre toute seule lors de ma macro

Re : Message box qui s'ouvre toute seule lors de ma macro

bonjour womancox

A tester

encadrer ta macro par

Re : Message box qui s'ouvre toute seule lors de ma macro

Franchement, un grand MERCI.
Car ça marche!! ça m'aide beaucoup.
Bonne journée.

Re : Message box qui s'ouvre toute seule lors de ma macro

Bonjour,

Regarde quand même un peu le code de ta macro.
Parce que la solution de Pierrejean "chuinte" juste le msgbox...
Si la personne qui a réalisée cette macro y a placé un msgbox il y avait surement des traitements à réaliser de temps en temps...
Selon la complexité de ton outil, cela peut avoir des conséquences...
De plus, cela "chuinte" tous les autres msgbox système (mettre à jour une liaison ou autre...)

Comme ta macro a l'air de vouloir enregistrer le classeur, tu peux faire sauter la ligne :
ActiveWorkbooks.save
en rajoutant un ' devant ta ligne de code par ex.

Si c'est en fermant le classeur,
ActiveWorkbooks.Close (0) te permet de le fermer sans enregistrer...

En espérant que cela complètera la réponse de PJ

Re : Message box qui s'ouvre toute seule lors de ma macro

C'est vrai que ça peut parait plus raisonnable.
en effet, c'est quand je dis dans ma macro de fermer le classeur où j'ai pris toutes les infos voulues qu'il m'affichait ça. donc pas inscrite dans ma macro.

Merci beaucoup

Re : Message box qui s'ouvre toute seule lors de ma macro

ActiveWorkbooks.Close (0) est la solution parfaite alors...
Il ne posera plus la question de l'enregistrement !

Bonne journée à toi

Re : Message box qui s'ouvre toute seule lors de ma macro

Bonjour à tous, PierreJean

Pour info, sans "s" "ActiveWorkbook", c'est un seul objet et non une collection, représente le classeur actif... Avec un "s" renvoie un message d'erreur...

bonne journée
@+

Re : Message box qui s'ouvre toute seule lors de ma macro

Autant pour moi ou au temps pour moi selon les goûts

Je tapote un poil trop vite sur le forum
J'utilise d'ailleurs plus souvent :

Workbooks("nomdufichier.xls").Close (0)