Bonjours à toutes et à tous,

J'ai rencontré une difficulté en créant une macro, ceci parce que je ne comprends pas comment coder une boucle. (j'ai essayé avec "for i = 10 to 9500", mais j'ai surement fais plein de fautes)

En simple, je cherche à mettre la valeur "0" dans la case d'à coté de celles qui contiennent "Terminer"

Exemple : A2 = "terminer" alors B2 = "0"

je pourrais évidemment copier coller ma condition if mais comme j'ai un tableau qui fait plusieurs milliers de lignes je vais perdre beaucoup de temps.

Voici mon code :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
 
 
Private Sub Worksheet_Change(ByVal Target As Range)
 
'Macro -> Si demande temrinée (traitée), alors le nombre de potelets est changé à 0.
 
  Application.EnableEvents = False 'éviter une boucle sans fin
 
 
  'Si demande terminée et classée alors nombre de potelets = 0, ceci pour pouvoir additioner et anticiper les besoins
 
 
If [E10].Text = "Terminer" Then
 
 [E10].Offset(0, 1) = 0
 
 End If
 
 
If [E11].Text = "Terminer" Then
 
 [E11].Offset(0, 1) = 0
 
 
End If
  Application.EnableEvents = True 'éviter une boucle sans fin
 
 
End Sub
comment éviter de devoir copier coller et changer les n°de lignes 1000x ?

Je vous remercie d'avance pour le temps accordé à mon souci.

Cordialement,

Lucien