• Privacywetgeving
    Het is bij Helpmij.nl niet toegestaan om persoonsgegevens in een voorbeeld te plaatsen. Alle voorbeelden die persoonsgegevens bevatten zullen zonder opgaaf van reden verwijderd worden. In de vraag zal specifiek vermeld moeten worden dat het om fictieve namen gaat.

excel formule 'cellen leegmaken' in macro verwerken?

Status
Niet open voor verdere reacties.

katja19800

Nieuwe gebruiker
Lid geworden
2 okt 2018
Berichten
1
Hallo,

Ik heb een macro gemaakt van een dump bestand, nu wil ik dat hij 'automatisch alle rijen leegmaakt waarvan de eerste cel leeg is. Ik weet niet hoe ik dit in een formule in een macro kan verwerken?
Ik weet namelijk nooit vooraf vanaf welke rij de 1e cel leeg zal zijn bij een dump dus ik zou dat in de macro in een formule willen verwerken.

Bijv:

Als cel A5 leeg is maak dan rij 5 helemaal leeg.

Weet iemand hoe ik dit voor elkaar krijg?
 
Hoi,
test deze
(naam van het blad aanpassen;))
Code:
Sub dotch()
With Worksheets("Blad1") 
LastRow = .UsedRange.SpecialCells(xlCellTypeLastCell).Row
    For i = 1 To LastRow
    If .Cells(i, 1).Value = "" Then .Cells(i, 1).EntireRow.Delete
    Next i
End With
End Sub
 
Als de rijen verwijderd moeten worden (.delete), dan beter van onder naar boven werken:
Code:
For i = LastRow To 1 Step -1
Code:
Indien rij alleen leeg gemaakt moet worden: .ClearContents
 
Is een filter op lege cellen in kolom A niet veel effectiever dan regel voor regel checken?
 
Met zoeken speciaal en dan lege cellen selecteren. Of met een macro

Code:
Sub VenA()
  On Error Resume Next 'voor als er geen lege cellen zijn.
  Sheet1.Columns(1).SpecialCells(4).EntireRow.Delete
End Sub
 
Status
Niet open voor verdere reacties.

Nieuwste berichten

Terug
Bovenaan Onderaan