 <p>You need to loop over the sheets in the workbook and manipulate each one individually:</p> <pre><code>Dim sheet As Worksheet For Each sheet In ActiveWorkbook.Worksheets sheet.Columns("A").SpecialCells(xlCellTypeBlanks).EntireRow.Delete Next </code></pre>