View Single Post
  #1   Report Post  
Posted to microsoft.public.excel.programming
DEE DEE is offline
external usenet poster
 
Posts: 250
Default Select Named Range in Worksheet

Hi,

I'm trying to add code to an option button on a worksheet that hides rows on
its worksheet, plus hides columns on another worksheet, plus hides rows on
another worksheet.

I have named my ranges, which I refer to in the code. I tried many
variations that I have found in the last few hours in this group and other
places in the Internet, but as soon as I try to hide the columns/rows on a
worksheet other than the active one that contains the option button, I end up
with errors.

Here is my code: Any help is really appreciated!

Private Sub OptionButton1_Click()

Application.ScreenUpdating = False

With ThisWorkbook.Worksheets("Data")
Range("FebtoDec").Select
Selection.EntireRow.Hidden = True
End With

With Worksheets("Distribution").Range("DistributionFebt oDec")
.EntireColumn.Hidden = True
End With

With Worksheets("Summary").Range("SummaryFebtoDec")
.EntireRow.Hidden = True
End With

Application.ScreenUpdating = True

End Sub