Robert Smidt
Gebruiker
- Lid geworden
- 26 mei 2009
- Berichten
- 901
Beste Helpmij'ers,
Kan iemand mij helpen met een code die gevulde regels (binnen een bereik) onder elkaar zet wanneer er lege regels tussen staan, zonder dat de regels verwijderd worden? Bovendien dient de volgorde in stand blijven.
Ik heb al een opzetje gemaakt.
Alvast hartelijk dank.
RobertBekijk bijlage Opschuiven.xlsm
Kan iemand mij helpen met een code die gevulde regels (binnen een bereik) onder elkaar zet wanneer er lege regels tussen staan, zonder dat de regels verwijderd worden? Bovendien dient de volgorde in stand blijven.
Ik heb al een opzetje gemaakt.
Code:
Sub test()
For Each cl In Range("C1:C17")
If cl.Value = "" Then cl.Value = .......: Exit For
Next cl
End Sub
Alvast hartelijk dank.
RobertBekijk bijlage Opschuiven.xlsm
Laatst bewerkt: