For each ne s'arrête pas si la condition n'est pas respectée..

Thomus -  
pijaku Messages postés 13513 Statut Modérateur -
Bonjour,

J'aimerais faire tourner le code suivant sur une plage entière de cellules.
Le problème est que la condition s'arrête dès qu'elle n'est pas respectée or j'aimerais la faire tourner sur toute la plage car sinon il s'arrête sur la cellule du bas et ne se poursuit pas sur les autres colonnes...
Je ne sais pas si c'est très clair mais voici le code :

Sub MettreAJourAgenda()
Dim MyRange As Range
Dim Cell As Range
Set MyRange = ActiveSheet.Range("K11:P14")

For Each Cell In MyRange
If Cell.End(xlToLeft).Value = "103" Then
Cell.Value = "thib"
End If
Next Cell
End Sub




Merci d'avance
A voir également:

1 réponse

pijaku Messages postés 13513 Statut Modérateur 2 763
 
Bonjour,

Je viens de tester et la macro que tu utilises fait exactement ce qu'est censé faire ce code...
Donc...
Peux tu nous dire ce que tu souhaites faire, ainsi que nous donner une description plus approfondie de tes données...
0