How to delete bottom rows in excel

[Dhanajay]

I want to delete bottom rows in excel. I saved my data till 198 rows in excel rest of the rows i want to delete can anyone know how delete bottom rows in excel ?

Thanks

[Fanchon]

Drag from row 198 and drag until the last row. Then right-click one of the numbers on the left, click Delete. It will delete everything from bottom rows.

[Conrad]

• Copy the following Code.
  

  Option Explicit 
   
  Sub TrimAllSheets() 
       
      Dim cs As String 
      cs = ActiveSheet.Name 
      Dim y As Integer 
      y = Application.InputBox("How many bottom rows do you wish to delete?", _ 
      Default:=3, Type:=1) 'Change default number (3) if desired.
      If MsgBox("Are you sure you wish to delete " & y & " rows from the bottom of ALL sheets?", _ 
      vbYesNo, "Trim ALL Sheets") = vbNo Then Exit Sub 
      Application.ScreenUpdating = False 
      Dim r As Range, s As Range 
      Dim ws As Worksheet 
      On Error Resume Next 'Error handler
      For Each ws In ThisWorkbook.Worksheets 
          ws.Activate 
          Set r = ActiveSheet.Range("A65536").End(xlUp).Offset(-y + 1) 
          Set s = ActiveSheet.Range("A65536").End(xlUp) 
          If ActiveCell.Row < 10 Then Goto circumv 'Not to delete Headers
          Range(r, s).EntireRow.Delete 
  circumv: 
      Next ws 
      Sheets(cs).Activate 
      Application.ScreenUpdating = True 
       
  End Sub

• Open any workbook.
• Press Alt + F11 to open the Visual Basic Editor (VBE).
• From the Menu, choose Insert-Module.
• Paste the code into the right-hand code window.
• Close the VBE, save the file if desired.

Source : vbaexpress