Hello,
How do I make the following macro run for all sheets in my workbook? I
tried selecting all sheets, but it dosen't work. THanks.


Sub frmt()
Dim cell As Range
Application.ScreenUpdating = False


With ActiveSheet.UsedRange
ActiveSheet.Name = Range("e61").Value
End With

With ActiveSheet.UsedRange
.Rows.Hidden = False
For Each cell In .Columns("h").SpecialCells(xlCellTypeFormulas)
If cell.Text = "dlt" Then cell.EntireRow.Hidden = True
Next cell
End With
End Sub