If this is your first visit, be sure to check out the FAQ by clicking the link above. You may have to register before you can post: click the register link above to proceed. To start viewing messages, select the forum that you want to visit from the selection below. |
|
|
Thread Tools | Display Modes |
#1
|
|||
|
|||
check box for hiding columns
The script can be made shorter:
Private Sub CheckBox1_Click() if checkbox1.value = true then Range("A4:A10").EntireRow.Hidden = true Else Range("A4:A10").EntireRow.Hidden = false End Sub Also this should be more comprehensible for somebody that just started working with VBA. --- Message posted from http://www.ExcelForum.com/ |
#2
|
|||
|
|||
check box for hiding columns
Sorry, forgot the "end if" command.
Private Sub CheckBox1_Click() if checkbox1.value = true then Range("A4:A10").EntireRow.Hidden = true Else Range("A4:A10").EntireRow.Hidden = false End if End Sub --- Message posted from http://www.ExcelForum.com/ |
Thread Tools | |
Display Modes | |
|
|