Bonjour j'ai tappé du code. Seulement celui ci ne fonctionne pas et quand j'utilise le pas a pas détaillé il ne lit pas toute les lignes de 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 Sub tt() For i = 2 To i = 38 If Cells(i, 1).Value = "12 / 4 / 2012" Then If Cells(i, 2).Value = "Fille" Then If Cells(i, 3).Value = "Blonde" Then Cells(i, 5).Value = "oki" End If End If End If Next Merci End Sub
Partager