Try it this way (it will hide the process from the user and keep the current
worksheet active)....

Sub TurnGridLinesOff()
Dim WS As Worksheet, SN As String
Application.ScreenUpdating = False
SN = ActiveSheet.Name
For Each WS In Worksheets
WS.Activate
ActiveWindow.DisplayGridlines = False
Next
Worksheets(SN).Activate
Application.ScreenUpdating = True
End Sub

--
Rick (MVP - Excel)


"Steve" wrote in message
...
Morning all.
I have multiple worksheets that are displaying the gridlines. This appears
to be fairly common across numerous workbooks, so I'd like to make a macro
that will turn off the display gridlines.
I recorded a macro that turned off the grid lines for a single worksheet,
now I need to put in a for loop to iterate through all of the sheets in
the
file.
I tried the following and it hangs up on the "If sh.DisplayGridlines =
True
Then" statement, stating it cannot perform this task-- "object does not
support this property or method" a 438 error.
Any ideas on how to make one that does work?
Thank you.

Sub Grids()
'
' grids Macro
' turn off grid lines
'
For Each sh In ActiveWorkbook.Worksheets
If sh.DisplayGridlines = True Then
sh.DisplayGridlines = False

End If
Next
' ActiveWindow.DisplayGridlines = False

End Sub