Since Y/A truncated you column headings, I infer that the column you wish to evaluate is column F. If so, you can use this macro to delete all rows containing '0'.
Copy the following macro to the clipboard:
Sub DeleteRows()
Dim i, LastRow
LastRow = Range("F" & Rows.Count).End(xlUp).Row
For i = LastRow To 1 Step -1
If Cells(i, "F").Value = 0 Then
Cells(i, "F").EntireRow.Delete
End If
Next
End Sub
Press ALT + F11
In the menus at the top of the VBE, select INSERT > MODULE
Paste the macro into the editing area to the right.
Still in the VBE, go to Tools > Macros and select this macro. Click 'Run'.
Note: if you column F values are actually 'Average Grade 0', then change this line in the macro:
If Cells(i, "F").Value = 0 Then
to:
If Cells(i, "F").Value = "Average Grade 0" Then