Excel cesse de fonctionner

Bonsoir steve,

True est implicite et automatique avant la sortie d'une sub,

Ton assertion est très sujette à caution car ce n'est pas ce que dit Microsoft

https://docs.microsoft.com/fr-fr/office/vba/api/excel.application.screenupdating?redirectedfrom=MSDN
Une fois l'exécution de la macro terminée, songez à redéfinir la propriété ScreenUpdating sur True.

Je te confirme d'ailleurs que si tu oublies de le remettre tu risques dans certains cas de chercher longtemps pourquoi tu n'as pas de résultat.

Ce code pseudo-optimisé est loin d'être aussi bien écrit que celui de gbinforme (bonsoir à toi).

Quand on code proprement on évite tout ce qui est implicite !!!

Steve, pour le ScreenUpdating, regardes ce post :
https://forums.commentcamarche.net/forum/affich-33931181-bug-affichage-suite-a-l-execution-du-code

@gbinforme 
Bonsoir gbinforme,

Tu as écris : « Ton assertion est très sujette à caution ».

J'ai commencé à apprendre Excel avec la version 5.0b (bien avant la 2003),
qui était incluse dans Microsoft Office Professionnel Edition (avec Access).

À l'époque, la documentation était en plusieurs gros manuels papier Microsoft,
et c'est dans le manuel Microsoft Excel qu'il était clairement noté ce que j'ai
écrit en NB : « Application.ScreenUpdating = True est implicite et automatique
avant la sortie d'une sub ».

-----------------------------------------------------

J'ai suivi ton lien sur l'article Microsoft ; juste sous le titre, il y a la version :
« Office 2013 et versions ultérieures » ; puis plus bas, il y a effectivement
cette phrase :

Une fois l'exécution de la macro terminée, songez à redéfinir la propriété
ScreenUpdating sur True.

1) L'exemple VBA qui est donné en dessous impose de le mettre car il y a
une MsgBox qui affiche le temps d'exécution de la sub, et à ce moment-là,
l'utilisateur doit pouvoir voir sur la feuille, à l'arrière-plan, des données
correctes (donc actualisées) ; ça ferait mauvais effet, sinon : l'utilisateur
penserait que la sub n'a pas fait son travail ! sans ce MsgBox, l'instruction
« Application.ScreenUpdating = True » est inutile.

2) Pourquoi alors Microsoft a-t-il marqué la phrase du lien ci-dessus ? Je pense
qu'il a juste voulu simplifier l'explication, pour éviter d'avoir à trop détailler :
voir l'exemple du point 1) ci-dessus, qui est aussi ton « dans certains cas ».

En conséquence, je maintiens mon assertion ; après, chacun est libre de
choisir comme bon lui semble ; moi, du moment que ça marche, je vais
continuer à faire de la même façon.  ;)

-----------------------------------------------------

En pratique :

Dans la grande majorité des cas, je n'ai jamais besoin de mettre explicitement
Application.ScreenUpdating = True avant la sortie d'une sub : comme disait le manuel, c'est fait implicitement juste avant la sortie d'une sub, donc une fois
l'exécution de la sub terminée, je vois bien tous les résultats attendus :
l'écran est correctement actualisé.

Dans les autres rares cas (comme l'exemple de Microsoft), c'est là que je mets
explicitement Application.ScreenUpdating = True.

J'ai toujours fait ainsi jusqu'à maintenant sans que ça me pose aucun souci,
pour ma version actuelle d'Excel 2007 (et toutes les versions antérieures).

-----------------------------------------------------

Peut-être que ça a changé dans les versions ultérieures ? fais donc l'essai
de ne pas mettre Application.ScreenUpdating = True avant la fin de la sub,
et si les résultats affichés à l'écran sont ceux attendus, alors ce ne sera
donc pas la peine de le mettre ; sauf si tu tiens absolument à écrire
explicitement quelque chose d'implicite, et c'est ton droit : chacun
est libre de programmer comme il préfère.  ;)

Cordialement
 

@Patrice33740 
Bonsoir Patrice33740,

Dans mon message du 17 juillet à 22:50, j'avais bien précisé d'emblée :
« Voici une version légèrement optimisée du code de gbinforme ».

Contrairement à ce que tu penses, je n'ai pas fait une pseudo-optimisation,
et je prouve les améliorations apportées :

1) Ligne 4 : on sort de suite de la sub si Target.column <> 4 (donc si l'utilisateur
n'a pas cliqué sur une cellule de la colonne D) ; avantage : inutile de faire tout
ce qui suit (y compris les instructions Application.xxx).

2) J'ai volontairement enlevé l'instruction Application.ScreenUpdating = True
qui était inutile : lis mon message à gbinforme du 18 juillet à 1:07 ; je ne vais
pas réécrire ce que j'ai amplement démontré !

3) J'ai remplacé 2 .Offset(1, 0) par .Offset(1) ; en effet, quand un paramètre
vaut 0 (pour cette instruction), c'est inutile de le mettre ; même si c'est pour
la colonne ; exemple : .Offset(, 1) ; note bien la virgule juste après "(" ! et si
Microsoft avait voulu absolument qu'on mette les 2 paramètres, ils seraient
obligatoires et pas facultatifs ; attention : sur une feuille Excel, l'instruction
DECALER() correspondante exige bien les 2 paramètres ; pas en VBA.

4) Lignes 11 à 13 : j'ai modifié l'ordre des 3 .Offset() pour les mettre dans
un ordre plus naturel (car de gauche à droite) : on efface d'abord Dxx,
puis Fxx:Gxx, puis Jxx (où xx est le bon n° de ligne).

===============================

Tu as écris : « Quand on code proprement on évite tout ce qui est implicite !!! » ;
tu as ta façon de programmer et j'ai la mienne ; je considère qu'à condition de
bien savoir ce que l'on fait, on peut éviter de mettre des choses explicites.

Exemple : rien n'interdit d'écrire cette référence explicite complète :
MsgBox Workbooks("Classeur X").Worksheets("Feuil").Range("B2")

Mais si on lance toujours la macro à partir de Feuil1 du Classeur X,
c'est inutile et il suffit de mettre : MsgBox Range("B2") ; et même,
en utilisant la notation abrégée, ça donne : MsgBox [B2] (qui est
strictement équivalent) ; quelle est l'instruction la plus courte et
la plus clairement lisible ? c'est : MsgBox [B2]

-------------------------------------------------------

Pour être sûr qu'une macro se lance depuis la bonne feuille, ici "Feuil1",
mettre en début de macro : If ActiveSheet.Name <> "Feuil1" Then Exit Sub
ou carrément (selon les cas), mettre : Worksheets("Feuil1").Select

S'il y a plusieurs classeurs, alors ajouter un test pour vérifier si on est sur
le bon classeur.

Mais effectivement, il y a des fois où même en procédant à ma façon, je dois
quand même préciser explicitement la feuille ou le classeur à utiliser.

-------------------------------------------------------

Encore une fois, à chacun sa façon de programmer ; en aucun cas tu n'as
le droit de chercher à me dicter la mienne ; et inversement, je n'ai pas à
exiger que tu programmes à ma façon.

Aussi, ta remarque bien péremptoire « Quand on code proprement »
est tout à fait déplacée !

Cordialement
 

UN gros merci, sa semble avoir régler mon problème !

Merci à tous.

PS: Où puis-je apprendre à coder efficacement sous vba ?

@will_1234« Où puis-je apprendre à coder efficacement sous vba ? »
Avec du temps, beaucoup d'erreurs et de la rigueur.

Comme tu as pu le constater, les erreurs proviennent très souvent d'une forme de codage qui manque de rigueur.
Sur le web on trouve de très nombreux cours VBA, Malheureusement, je n'en connais aucun qui s'affranchisse de l'utilisation de forme de code implicite (simplifié) dans les apprentissages initiaux.

Voici un des meilleurs cours (un peu ancien mais toujours d'actualité) :
ftp://ftp-developpez.com/bidou/Cours/VBA/formationVBA.pdf

Cdt
Patrice