Blank cell not recognised as blank

Hi all,

So I have a table in Cells BA25:BD33.


The top row is the headers, with data being copied into BA26:BB33 - the others columns are generated with match formulas based on what is copied into BA and BB.


The data copied into BB is from a PIVOT table, so there could be 1 number copied into BB or 8 numbers.

However, the issue i have is when running this code:

Private Sub CommandButton21_Click()

Worksheets("Sheet6").Activate

Dim Rng As Range
   
   For Each Rng In Range("BB26:BB33").SpecialCells(xlBlanks).Areas
      Rng.Offset(, -1).Resize(, 4).Delete xlUp
   Next Rng

End Sub

If there is only one number copied into BB, not all of the rows are deleted from the table as there is always one value in BB that is not recognised as blank, because a blank cell from the pivot table is copied into the table.

Is there a way to amend my code so that Excel recognises the "empty" cell as blank?