Automatisch naar boven laten opschuiven van een cel met inhoud.

[PIET0000]

Hoe kun je een reeks onder elkaar geplaatste cellen met in elke cel een naam, automatisch allemaal een plaatsje laten opschuiven naar boven toe wanneer er een naam wordt gedeletet? De bedoeling is om te zorgen dat de namen automatisch onder elkaar blijven staan zonder lege cellen ertussen.
Ik heb in 1 kolom 3 verschillende lijstjes met 10 namen en zo zijn er 6 kolommen (A, B, C, D, E, F). Het is dus een tabel met 18 lijstjes, in 6 kolommen en per kolom 3 lijstjes met 10 namen. Elke lijst vertegenwoordigt een afzonderlijke afdeling.

 

[MDN111]

Dag PIET0000 !

Wat ik mij moet voorstellen met "in 1 kolom 3 verschillende lijstjes", is mij niet echt duidelijk, maar probeer het bestand in bijlage eens. Het zijn 6 kolommen met 30 namen in iedere kolom. Als je een cel leeg maakt, schuiven de cellen daaronder allen een cel naar omhoog. De macro staat in de code van Sheet1. Van daaruit kan je misschien verder borduren.

Grtz,
MDN111.

 

[PIET0000]

Bedankt MDN111,

Mijn vraag is voldoende beantwoord.

Vriendelijke groeten,

Piet0000.