Delete Row in a table if column/cell "s" is blank

[BODYCOTE]

ive tried the following vba to delete empty cells but it does not complete anything, is it because its a table? if so what is the vba for tables.

the goal is to have my pivot table refresh with out the blank cells from the table

Sub DeleteRowIfCellBlank() On Error Resume Next Columns("A").SpecialCells(xlCellTypeBlanks).EntireRow.Delete End Sub