delete Autofilter Field resullt using the header Name

by

I tried to always use an autofilter to find the empty cells before removing them but I’m stuck with it . instead i used SpecialCells function Since i want to delete the Empty cells. So it Works but if I want to delete other celles dipending other special criteria than blank or somting that is not specified in SpecialCells Methode , i will have a problem but So far here is a solution. i Hope that will help some one. Here is a code. If you have a solution using Autofilter please share. Thanks 

Sub data()

 Dim Wrksh As Worksheet, DurtyRows As Range, LstRw As Long


Set WorkSh = Sheets("feuil2")

    With WorkSh
    LstRw = .Cells(.Rows.Count, "A").End(xlUp).Row
    Set DurtyRows = .Range("A1:A" & LstRw).SpecialCells(xlCellTypeBlanks)
    DurtyRows.EntireRow.Delete
    .AutoFilterMode = False
  End With

End Sub

More Related Contents:

  1. How do I get values from a hidden worksheet using VBA [closed]
  2. Get all dates between 2 dates in vba
  3. Different languages issue when inserting formula from VBA
  4. vba: get unique values from array
  5. Unprotect VBProject from VB code
  6. Can VBA Reach Across Instances of Excel?
  7. Excel VBA – Delete empty rows
  8. Efficient way to delete entire row if cell doesn’t contain ‘@’ [duplicate]
  9. Building Undo Into an Excel VBA Macro
  10. Excel vba add code to sheet module programmatically
  11. Best workaround for VBA Transpose array length limit?
  12. How to Lock the data in a cell in excel using vba
  13. How to use Events with Option Button Controls on Userform [duplicate]
  14. How to send files via HTTP_POST with Excel using VBA?
  15. How do I use variables to set properties in VBA (Excel)
  16. VBA: Else without If Error
  17. VBA to open Excel hyperlink does not work when hyperlink generated with a formula
  18. Workbooks.Open Method in VBA
  19. Windows().Activate works on every computer except one
  20. How to highlight a cell using the hex color value within the cell?
  21. Convert RTF (Rich Text Format) code into plain text in Excel
  22. lastrow and excel table.
  23. Set a cell value from a function
  24. Open a workbook from VBA and disable Workbook_Open() code?
  25. Creating form programmatically in the module using vba
  26. How to filter listbox values based on a Textbox value
  27. Find and FindNext for Excel VBA
  28. How do I get a list of unique values from a range in Excel VBA?
  29. How to get selected value in multicolumn listbox
  30. Query my excel worksheet with VBA

Leave a Comment