| Home |
| Search |
| Today's Posts |
|
#1
Posted to microsoft.public.excel.misc
|
|||
|
|||
Select Option button unhide row
Hello in Row 33 I have two option buttons created using control tool
box. What I want to do is if the second option button is selected to unhide rows 34 thru 36. thanks |
|
#2
Posted to microsoft.public.excel.misc
|
|||
|
|||
|
Select Option button unhide row
Try using the following line of code:
Rows("34:36").EntireRow.Hidden = False -- Kevin Backmann "Wanna Learn" wrote: Hello in Row 33 I have two option buttons created using control tool box. What I want to do is if the second option button is selected to unhide rows 34 thru 36. thanks |
|
#3
Posted to microsoft.public.excel.misc
|
|||
|
|||
|
Select Option button unhide row
Thanks Kevin I must be doing something wrong . it does not work. please
clarify thanks "Kevin B" wrote: Try using the following line of code: Rows("34:36").EntireRow.Hidden = False -- Kevin Backmann "Wanna Learn" wrote: Hello in Row 33 I have two option buttons created using control tool box. What I want to do is if the second option button is selected to unhide rows 34 thru 36. thanks |
|
#4
Posted to microsoft.public.excel.misc
|
|||
|
|||
|
Select Option button unhide row
Try this.
Press Alt + F11 to open the VBE, click INSERT on the menu and select MODULE. In the new Module enter the following sub, changing the worksheet index number to the sheet you want to unhide the rows in. You can also use the name as as string Sheets("WorksheetName") Sub Unhide() Dim ws As Worksheet Set ws = ThisWorkbook.Sheets(1) ws.Rows("34:36").EntireRow.Hidden = False Set ws = Nothing End Sub Click file in the menu and select CLOSE AND RETURN TO EXCEL. In the worksheet where the button is located, open the CONTROL TOOLBOX toolbar and click the DESIGN MODE button. Right click the command button and select VIEW CODE and enter the name of sub UNHIDE, without parenthesis. Click file in the menu and select CLOSE AND RETURN TO EXCEL. Turn DESIGN MODE off, save your workbook and give it a test drive -- Kevin Backmann "Wanna Learn" wrote: Thanks Kevin I must be doing something wrong . it does not work. please clarify thanks "Kevin B" wrote: Try using the following line of code: Rows("34:36").EntireRow.Hidden = False -- Kevin Backmann "Wanna Learn" wrote: Hello in Row 33 I have two option buttons created using control tool box. What I want to do is if the second option button is selected to unhide rows 34 thru 36. thanks |
|
#5
Posted to microsoft.public.excel.misc
|
|||
|
|||
|
Select Option button unhide row
Again Thanks - forgive my ignorance.. the name of the worksheet is Form.
exactly where do I enter the name of the sheet Thsnks again "Kevin B" wrote: Try this. Press Alt + F11 to open the VBE, click INSERT on the menu and select MODULE. In the new Module enter the following sub, changing the worksheet index number to the sheet you want to unhide the rows in. You can also use the name as as string Sheets("WorksheetName") Sub Unhide() Dim ws As Worksheet Set ws = ThisWorkbook.Sheets(1) ws.Rows("34:36").EntireRow.Hidden = False Set ws = Nothing End Sub Click file in the menu and select CLOSE AND RETURN TO EXCEL. In the worksheet where the button is located, open the CONTROL TOOLBOX toolbar and click the DESIGN MODE button. Right click the command button and select VIEW CODE and enter the name of sub UNHIDE, without parenthesis. Click file in the menu and select CLOSE AND RETURN TO EXCEL. Turn DESIGN MODE off, save your workbook and give it a test drive -- Kevin Backmann "Wanna Learn" wrote: Thanks Kevin I must be doing something wrong . it does not work. please clarify thanks "Kevin B" wrote: Try using the following line of code: Rows("34:36").EntireRow.Hidden = False -- Kevin Backmann "Wanna Learn" wrote: Hello in Row 33 I have two option buttons created using control tool box. What I want to do is if the second option button is selected to unhide rows 34 thru 36. thanks |
|
#6
Posted to microsoft.public.excel.misc
|
|||
|
|||
|
Select Option button unhide row
Set ws = ThisWorkbook.Sheets("Form")
Wanna Learn wrote: Again Thanks - forgive my ignorance.. the name of the worksheet is Form. exactly where do I enter the name of the sheet Thsnks again "Kevin B" wrote: Try this. Press Alt + F11 to open the VBE, click INSERT on the menu and select MODULE. In the new Module enter the following sub, changing the worksheet index number to the sheet you want to unhide the rows in. You can also use the name as as string Sheets("WorksheetName") Sub Unhide() Dim ws As Worksheet Set ws = ThisWorkbook.Sheets(1) ws.Rows("34:36").EntireRow.Hidden = False Set ws = Nothing End Sub Click file in the menu and select CLOSE AND RETURN TO EXCEL. In the worksheet where the button is located, open the CONTROL TOOLBOX toolbar and click the DESIGN MODE button. Right click the command button and select VIEW CODE and enter the name of sub UNHIDE, without parenthesis. Click file in the menu and select CLOSE AND RETURN TO EXCEL. Turn DESIGN MODE off, save your workbook and give it a test drive -- Kevin Backmann "Wanna Learn" wrote: Thanks Kevin I must be doing something wrong . it does not work. please clarify thanks "Kevin B" wrote: Try using the following line of code: Rows("34:36").EntireRow.Hidden = False -- Kevin Backmann "Wanna Learn" wrote: Hello in Row 33 I have two option buttons created using control tool box. What I want to do is if the second option button is selected to unhide rows 34 thru 36. thanks -- Dave Peterson |
| Reply |
| Thread Tools | Search this Thread |
| Display Modes | |
|
|
Similar Threads
|
||||
| Thread | Forum | |||
| How to Disable Unhide Sheet menu option | Excel Worksheet Functions | |||
| hide or unhide rows with button | Excel Discussion (Misc queries) | |||
| Using Hide, Unhide, and auto filter - select all on a protected sh | Excel Worksheet Functions | |||
| Hide/Unhide Option - Need to consider all options! | Excel Discussion (Misc queries) | |||
| keep source formatting is not an option in paste option button | Excel Discussion (Misc queries) | |||
Linear Mode
