rij verwijderen

[patje8]

Is het mogelijk dat als er in een bepaalde kolom F in een cel een 0 staat de rij gewist wordt?

 

[richard1970]

Beste Patje,

Ja, dat is mogelijk.
Selecteer kolom F, of een reeks rijen in deze kolom. Vervang via Ctrl+H de nullen door niets (vink eerst "Identieke celinhoud", of "alleen hele cellen" aan), en klik op OK. Druk dan op Ctrl+G (Bewerken - Ga naar), klik op Speciaal, en vink 'Lege waarden' aan. Klik op OK.
Klik vervolgens op Bewerken - Verwijderen - hele rij. OK.

Hiermee verwijder je alle rijen waarvan de cel in kolom F leeg is.

Groeten,

Richard

 

[patje8]

Ik zou dat graag in de macro hebben maar doet dit niet met onderstaande code.

Sub Macro6()
    Columns("F:F").Select
    Selection.Replace What:=".", Replacement:=",", LookAt:=xlPart, _
        SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _
        ReplaceFormat:=False
    Columns("F:F").Select
    Selection.Replace What:="0", Replacement:="", LookAt:=xlWhole, _
        SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _
        ReplaceFormat:=False
    Selection.SpecialCells(xlCellTypeBlanks).Select
    Selection.EntireRow.Delete
End Sub

 

[richard1970]

Beste patje,

Jouw macro doet bij mij exact wat het zou moeten doen, namelijk inkolom F de cellen met een 0 leeg maken en die rij verwijderen.
Je kunt een macro ook stap voor stap uitvoeren via F8, dan kun je zien wat er eventueel fout gaat.
Je kunt ook een voorbeeldbestand hier gezipt neerzetten zodat we kunnen kijken wat er niet klopt. Kan het zijn dat een cel met een 0 ook nog spaties bevat?

Groeten,

Richard

 

[franç]

Patje, je hebt in je macro 2 keer een vervanging doorgevoerd.
Als je het maar 1 keer doet, dan komt hij (als je hem met de recorder opneemt) er zo uit te zien:

Sub Macro4()
Columns("F:F").Select
Selection.Replace What:="0", Replacement:="", LookAt:=xlWhole, _
SearchOrder:=xlByColumns, MatchCase:=False
Range("A1").Select
End Sub

Deze macro wist alleen de nullen in kolom F. Is het dat wel wat je wou?
Want in je vraag schrijf je dat - als er in kolom F een 0 voorkomt - de hele rij gewist moet worden, wat dus bv. zou betekenen dat als F5 gelijk is aan 0, de inhoud van A5:IV256 gewist zou moeten worden.

 

[patje8]

Het is inderdaad de bedoeling dat als er een nul in kolom F voorkomt de hele rij verwijderd wordt.

 

[franç]

Het is inderdaad de bedoeling dat als er een nul in kolom F voorkomt de hele rij verwijderd wordt.

En moet dat automatisch gebeuren zodra er in de F-kolom een 0 verschijnt,
of wil je er zelf opdracht voor geven?

 

[patje8]

Het is me reeds gelukt hoor.

Bedankt voor je moeite.