lege cellen verwijderen tussen verschillende waarden.

[nelson602]

Goede middag,

In de bijlage heb ik een voorbeeld gemaakt van mijn probleem. In kolom B staan verschillende waarden met verschillende lege cellen er tussen. Deze lege cellen moeten verwijderd worden, zoals in kolom D staat, maar verder mag er niks veranderd worden. Dit wil ik graag zonder VB laten doen. Ik krijg dit niet voor elkaar.

Ik hoop dat ik het duidelijk verwoord heb en dat jullie mij kunnen helpen om het probleem op te lossen.

met vriendelijke groet,

Niels

Bekijk bijlage 195895

 

[HSV]

Zonder Vba wordt het zoiets.

Selecteer het gebied in kolom B.
Druk F5 → Speciaal → Lege waarden → OK.
Rechtermuisknop → Verwijderen → Cellen naar boven → OK.

 

[nelson602]

Oke hsv. Ik ga het proberen. Alvast bedankt

 

[nelson602]

Dank je. Het werkt, is het ook mogelijk om dit met een code te doen met bijvoorbeeld een als-statement en horizontaal zoeken. Graag zou ik het automatisch willen doen?
is dat mogelijk?

 

[HSV]

Met formules kan je geen cellen verwijderen.
Er kan wel een formule gemaakt worden zodat de getallen net als in D2: D6 staan, maar dan moeten de getallen in kolom B blijven staan.

Anders wordt het toch Vba.

Druk Alt+F11, voeg een module toe, en plak onderstaande code erin.
Maak een knop op het blad, en koppel de macro daaraan.

Sub hsv()
Dim i As Long
For i = Sheets("Blad3").Cells(1).CurrentRegion.Rows.Count To 2 Step -1
   If Cells(i, 2) = vbNullString Then Cells(i, 2).Delete
 Next i
End Sub

 

[nelson602]

Dat de getallen uit kolom b verplaatst worden dat mag, zolang de overige getallen op zijn plaats blijven staan.

 

[HSV]

Het zijn matrixformules.

 

[nelson602]

Dank je wel Harry,

Ik ga het morgen even uittesten en dan zal ik het bericht op afvinken zetten.
Ontzettend bedankt alvast.

Vr. gr. Niels

 

[nelson602]

Als ik het bereik in deze formule aanpast dat krijgt ik de waarde getal#. Ik krijg het niet voor elkaar om de formule op de juiste manier toe te passen.

 

[Haije]

nelson,

het betreft matrix-formules, dwz afsluiten met Ctrl+Shift+Enter

 

[nelson602]

oke dank je