Bonjour cher forum!
j'ai eu beau chercher sur le forum la solution, mais je galère..
Voici : Je voudrais en VBA que pour chaque cellule dans le range G9:G1000, que excel vérifie ne nombre de caractère de chaque cellule. Si la cellule a 13 caractères, j'aimerais que la cellule à côté d'elle (H9) soit effacé. Si elle n'a pas 13 caractères, ne rien faire.
-----
Voici mon code :
Sub Test_SAP()
Range("G9").Select
For Each Cell In Range("G9:G1000")
If Len(Cell.Value) = 13 Then
ActiveCell.Offset(0, 1).Value = ""
End If
Next
End Sub
malheureusement, cela ne fonctionne pas. Le code va à G9, et efface H9 peut importe le nombre de caractère, et en plus, elle ne va pas vérifier G10 et les suivantes..
Quelqu'un a la solution?
Merci de votre aide !
j'ai eu beau chercher sur le forum la solution, mais je galère..
Voici : Je voudrais en VBA que pour chaque cellule dans le range G9:G1000, que excel vérifie ne nombre de caractère de chaque cellule. Si la cellule a 13 caractères, j'aimerais que la cellule à côté d'elle (H9) soit effacé. Si elle n'a pas 13 caractères, ne rien faire.
-----
Voici mon code :
Sub Test_SAP()
Range("G9").Select
For Each Cell In Range("G9:G1000")
If Len(Cell.Value) = 13 Then
ActiveCell.Offset(0, 1).Value = ""
End If
Next
End Sub
malheureusement, cela ne fonctionne pas. Le code va à G9, et efface H9 peut importe le nombre de caractère, et en plus, elle ne va pas vérifier G10 et les suivantes..
Quelqu'un a la solution?
Merci de votre aide !