Empêcher message Microsoft

[isa44]

Bonsoir , lorsque j'exécute un code qui copie et colle des valeurs j'ai une boite de message de Microsoft Excel qui s'affiche : Voulez vous remplacer le contenu des cellules de destination ?

Comment empêcher l'apparition de ce message ?

 

[Victor21]

Re : Empêcher message Microsoft

Bonjour, isa44

Au vu du fichier et du code associé, je regarderais du côté de DisplayAlerts = 0

 

[isa44]

Re : Empêcher message Microsoft

J'avais bien mis Application.DisplayAlerts = false
Et j'ai quand même cette fenêtre embêtante !!!

 

[isa44]

Re : Empêcher message Microsoft

Bonjour , voici la fenêtre que j'ai :

 

[Misange]

Re : Empêcher message Microsoft

Bonjour
Regarde dans les options d'excel et décoche "alerte avant remplacement".

 

[JCGL]

Re : Empêcher message Microsoft

Bonjour,

Voir cette option sous XL 2003 :



A+ à tous

Edition : Oups... Pour agrémenter la réponse de Misange...

 

[Misange]

Re : Empêcher message Microsoft

Hello Jean Claude
j'avais plus 2003 sous la main pour lui indiquer où c'était exactement 🙂

 

[Dranreb]

Re : Empêcher message Microsoft

Bonjour.
Tiens. Étrange. Je crois bien que je ne l'avais jamais vue celle la: En VBA :

Application.AlertBeforeOverwriting = False

C'est peut être parce qu'il semblerait que ça ne concerne que des cellules coupées et non copiées.
Cordialement.

 

[Misange]

Re : Empêcher message Microsoft

Bonjour.
Tiens. Étrange. Je crois bien que je ne l'avais jamais vue celle la: En VBA :

Application.AlertBeforeOverwriting = False

C'est peut être parce qu'il semblerait que ça ne concerne que des cellules coupées et non copiées.
Cordialement.

Excellent, je ne connaissais pas non plus. Visiblement ça concerne le drag and drop effectivement et quand le drop est dans une cellule non vide
Application.AlertBeforeOverwriting Property - Excel - Office.com

 

[isa44]

Re : Empêcher message Microsoft

Bonjour , je me débat avec ce problème de fenêtre qui s'affiche toujours. Ci joint le fichier pour voir en réalité ce que cela fait

 

[Dranreb]

Re : Empêcher message Microsoft

Bonjour.
j'ai eu le message dans Copie_BUS_Feuilles_R_V_B_J
j'ai stoppé la macro pour voir que c'était là. Curieusement en l'écrivant plus simplement :

Application.[BUS_OPTH1].Copy
ActiveSheet.[C6:C26].PasteSpecial Paste:=xlPasteAllExceptBorders

je ne l'ai plus eu en déroulant pas à pas.
Par contre est-il normal que ça provoque l'exécution de la Worksheet_Change de la feuille active ?
Si ce n'est pas désiré mettre devant : Application.EnableEvents = False
Et si le message revient : Application.AlertBeforeOverwriting = False
Je crois que vous allez bientôt écrire un With Application !
Cordialement.