Delete all data rows from an Excel table (apart from the first)

by

This is how I clear the data:

Sub Macro3()
    With Sheet1.ListObjects("Table1")
        If Not .DataBodyRange Is Nothing Then
            .DataBodyRange.Delete
        End If
    End With
End Sub

More Related Contents:

  1. How to add a custom Ribbon tab using VBA?
  2. filter out multiple criteria using excel vba
  3. Closing Excel Application using VBA
  4. How to add parameters to an external data query in Excel which can’t be displayed graphically?
  5. Cannot VBA write data to cells in Excel 2007/2010 within a function
  6. VBA equivalent to Excel’s mod function
  7. Excel VBA to match and line up rows
  8. Excel: the Incredible Shrinking and Expanding Controls [closed]
  9. Excel Date Conversion from yyyymmdd to mm/dd/yyyy
  10. How to programmatically code an ‘undo’ function in Excel-Vba? [duplicate]
  11. How to check whether certain sheets exist or not in Excel-VBA? [duplicate]
  12. How to do a “Save As” in vba code, saving my current Excel workbook with datestamp?
  13. excel vba compare & copy worksheets from 2 excel files
  14. How to avoid using Select in Excel VBA
  15. How to return a result from a VBA function
  16. Cycle through sub-folders and files in a user-specified root directory [duplicate]
  17. Convert Text to Date?
  18. Loop through each cell in a range of cells when given a Range object
  19. Checking for #N/A in Excel cell from VBA code
  20. Non-web SQL Injection
  21. Is there a way to slow down a Web Scraper so it will pick up the code?
  22. Create a folder and sub folder in Excel VBA
  23. One-dimensional array from Excel Range
  24. Renaming Files with Excel VBA
  25. Is there a way to import data from .csv to active excel sheet?
  26. Break out of a While…Wend loop
  27. How to make safe API Timers in VBA?
  28. How to extract groups of numbers from a string in vba
  29. How to implement custom iterable class in VBA
  30. How to find Number of Occurences of Slash from a strings

Leave a Comment