Hi DotchieJack,
Bedankt voor de code, het werkt goed. De tweede mbt Oplossing_Invoegen krijg ik een error melding bij:
ActiveCell.Rng.Insert Shift:=xlDown, CopyOrigin:=xlFormatFromLeftOrAbove
kan je hier nog naar kijken a.u.b.
Alvast bedankt.
mvg,
Team Roy