Excel: Hide blank rows on each page excel

Ye I mean Blank not Black Hi I have used the below VB code and i can get it to work to hide blank rows on sheet 1 where the contents in A is blank However I need to get it to run for all pages in the workbook. of which there are 4 Private Sub Worksheet_Change(ByVal Target As Range) 'Updateby Extendoffice 20160913 Dim xRg As Range Application.ScreenUpdating = False For Each xRg In Range("A1:A70") If xRg.Value = "" Then xRg.EntireRow.Hidden = True Else xRg.EntireRow.Hidden = False End If Next xRg Application.ScreenUpdating = True End Sub Any help would be great..

This question generated 16 answers. To proceed to the answers, click here.

This thread is current as of February 05, 2018.

For more resources for Microsoft Excel