Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.worksheet.functions
|
|||
|
|||
Is there away to shorten
Hello from Steved
Is their away please to shorten the below part off the code thankyou. ("K1:L1,N1:O1,Q1:R1,T1:U1,W1:X1,Z1:AA1,AC1:AD1,AF1 :AG1,AI1:AJ1,AL1:AM1,AO1:AP1") Private Sub CheckBox1_Click() Dim r As Range Set r = Range("K1:L1,N1:O1,Q1:R1,T1:U1,W1:X1,Z1:AA1,AC1:AD 1,AF1:AG1,AI1:AJ1,AL1:AM1,AO1:AP1") r.EntireColumn.Hidden = Not r.EntireColumn.Hidden End Sub |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
Can I shorten this any? | Excel Worksheet Functions | |||
Shorten a formula | Excel Discussion (Misc queries) | |||
Shorten Formula | Excel Worksheet Functions | |||
Any way to shorten this up? | Excel Worksheet Functions | |||
Shorten A Name | Excel Discussion (Misc queries) |