R
ranswert
I am trying to hide a range when a sheet is selected.
Private Sub Worksheet_Activate()
Dim drw As String
drw = ActiveSheet.Range("currentdraw").Value
Range(drw & "rng").Select
Selection.Hidden = True
ActiveWindow.Zoom = 85
End Sub
I get an error when this is run. What am I doing wrong?
Thanks
Private Sub Worksheet_Activate()
Dim drw As String
drw = ActiveSheet.Range("currentdraw").Value
Range(drw & "rng").Select
Selection.Hidden = True
ActiveWindow.Zoom = 85
End Sub
I get an error when this is run. What am I doing wrong?
Thanks