Inhoud opschuiven.

[MarioSapata]

Hallo,

Hoe wordt een formule als men bovenaan een kolom een waarde in een bepaalde cel delete, de onderste inhoud van de cel(len) automatisch naar boven gaat?

En...

Hoe wordt een formule als men links in cel een waarde in een bepaalde cel delete, de rechtse inhoud van de cel(len) automatisch naar rechts gaat?

Alvast bedankt,

Mario

 

[popipipo]

Een .XLS voorbeeldje zonder gevoelige informatie verduidelijkt je vraag.

 

[danny147]

Beste MarioSapata

Heb je een voorbeeldbestandje ?

Groetjes Danny. :thumb:

 

[MarioSapata]

Hallo,
Cel A1 = 1
Cel B1 = 2
C1 = 3
D1 = 4

Als ik nu de inhoud van cel A1 verwijder schuiven de inhouden van B1 tot D1 automatisch
naar boven.
Dan worden de waarden:
A1 = 2
B1 = 3
C1 = 4
D1 = LEEG

mvg, Mario

 

[richard1970]

Dit gaat niet met een formule. Het kan met VBA, maar ook via:
Rechter muisknop in de cel > Verwijderen... > kies voor 'Cellen naar links verplaatsen' of voor 'Cellen naar boven verplaatsen' > OK.

Richard

 

[popipipo]

Hallo,
Cel A1 = 1
Cel B1 = 2
C1 = 3
D1 = 4

Als ik nu de inhoud van cel A1 verwijder schuiven de inhouden van B1 tot D1 automatisch
naar boven.
Dan worden de waarden:
A1 = 2
B1 = 3
C1 = 4
D1 = LEEG

mvg, Mario

Hoe wil je het dan hebben?

Daarom nogmaals een .XLS bestandje dan zien we hoe je het allemaal hebt staan.

 

[Wigi]

Dit gaat niet met een formule. Het kan met VBA, maar ook via:
Rechter muisknop in de cel > Verwijderen... > kies voor 'Cellen naar links verplaatsen' of voor 'Cellen naar boven verplaatsen' > OK.

Richard

Inderdaad. Vermijd het gebruik (en coderen en onderhouden) van VBA-code als er gemakkelijke alternatieven zijn in de user interface (Excel zelf).

 

[MarioSapata]

Hallo Wigi,
Weet ik :
"Kies voor 'Cellen naar links verplaatsen' of voor 'Cellen naar boven verplaatsen'

Maar hoe kan ik dat automatisch laten gebeuren?

Mvg, Mario

 

[Wigi]

Als er dan toch zonodig een macro geschreven moet worden:

Sub opschuiven()
    Selection.Delete xlToLeft
End Sub

Hang daar bvb. een sneltoetscombinatie aan vast, Ctrl-q gebruik ik wel vaker.

Dan hoef je enkel cellen te selecteren en Ctrl-q te drukken.

Of dit veel oplevert in de praktijk weet ik niet, hopelijk ben je er wat mee.

Wigi