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

Thomus -  
pijaku Messages postés 12263 Date d'inscription   Statut Modérateur Dernière intervention   -
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 12263 Date d'inscription   Statut Modérateur Dernière intervention   2 761
 
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