koster1984
Gebruiker
- Lid geworden
- 4 jul 2012
- Berichten
- 337
Goedemorgen beste experts,
Ik wil graag met een 'for each' loop, obv variabele voorwaarden, een bewerking doen. Ik dacht dat ik met onderstaande in de buurt kwam, maar niet helemaal dus.
Ik voeg een simpel voorbeeldje bij, zou iemand mij op weg kunnen helpen?
Ik wil graag met een 'for each' loop, obv variabele voorwaarden, een bewerking doen. Ik dacht dat ik met onderstaande in de buurt kwam, maar niet helemaal dus.
Ik voeg een simpel voorbeeldje bij, zou iemand mij op weg kunnen helpen?
Code:
Sub test()
Dim it As Range
For Each it In Range("A2:A10")
If it.Offset(, 1) <> Array("ab", "ae", "ag") Then it.Offset(, 2) = "v"
Next
End Sub