Bonjour,
Dans un fichier je souhaite tester les différentes valeur d'une colonne (B) de données et suivant la valeur donner une valeur dans la cellule correspondante dans la colonne E.
J'ai donc essayer de faire une boucle, le résultat n'étant pas concluant je me permets de soliciter vos lumières.
Mon code :
Dim i As Integer
Dim b As Long
'Defini la dernière valeur a tester
d = Range("A65536").End(xlUp).Row
'Boucle pour tester les différentes cellules de ma colonne
For i = 3 To d Step 1
If Cells(i, 2) = "Baffier Marie-France" Then
Cells(i, 5) = "MdMS"
If Cells(i, 2) <> "Baffier Marie-France" Then
Cells(i, 5) = "Pas MdMS "
End If
Next
End Sub
Voila n'hésiter pas à me demander des précision car je ne sais pas si c'est très clair.
Je vous remercie par avance.
Bonne journée
Dans un fichier je souhaite tester les différentes valeur d'une colonne (B) de données et suivant la valeur donner une valeur dans la cellule correspondante dans la colonne E.
J'ai donc essayer de faire une boucle, le résultat n'étant pas concluant je me permets de soliciter vos lumières.
Mon code :
Dim i As Integer
Dim b As Long
'Defini la dernière valeur a tester
d = Range("A65536").End(xlUp).Row
'Boucle pour tester les différentes cellules de ma colonne
For i = 3 To d Step 1
If Cells(i, 2) = "Baffier Marie-France" Then
Cells(i, 5) = "MdMS"
If Cells(i, 2) <> "Baffier Marie-France" Then
Cells(i, 5) = "Pas MdMS "
End If
Next
End Sub
Voila n'hésiter pas à me demander des précision car je ne sais pas si c'est très clair.
Je vous remercie par avance.
Bonne journée