Bonjour,
Je viens vers vous pour pouvoir m'aider concernant l'optimisation de ce code. le code fonctionne mais le temps de l'execution n'est pas à mon goût ( 61 secondes).
Pouvez-vous m'aider à améliorer ce code ?
Je vous joins le fichier Excel. et j'aimerais que les données de la colonne...
Bonjour tout le monde,
J'espère sincèrement que vous allez bien.
Je me demandais si l'un d'entre vous a une idée de comment on peut condenser ce genre de morceaux de code comme suit :
'Mise en forme
With F_ECOULEMENT.Range(Cells(6, 10), Cells(7, 9 + ((Nm + 1) * 2)))
With...
Bonjour le Forum,
Pourrez-vous m’aider à optimiser mon code ci-dessous s’il vous plait
Notamment le fichier exemple ci-joint, merci d’avance
Sub ctrl()
Dim repense As Integer
If Feuil1.Range("B4") = "" Then
Feuil1.Range("B4").Interior.ColorIndex = 3
repense = MsgBox("Champ de...