| Home |
| Search |
| Today's Posts |
|
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Multiple (ByVal Target As Range) Cancel each other out, as written
My initial test of the paramenter worked out great!!
Then I added the other paramaters. When putting a "1" in cell called TR1_AUG, into parameter 1 parameter 2 obviously cancels it out, so that no ranges are hidden. I currently have 5 parameters of which only ONE may be selected at any time. That one selection causes 8 ranges to be hidden. (although more ranges to hide will likely be required) It is imperative that the DE-selection of the given cell does UN-hide any previously hidden ranges. Can this be done in one go? if so, how? OR should it be set up as 5 independant subs? How would that have to be done? Thank-you If Range("TR1_AUG") = 1 Then 'Single Cell Rows.EntireRow.Hidden = False Range("TR2_PAD_S, TR3_FP16_S, TR4_FP26_S, TR5_FP36_S, Disch2_PAD_S, Disch3_FD16_S, Disch4_FD26_S, Disch5_FD36_S").EntireRow.Hidden = True Else Rows.EntireRow.Hidden = False End If If Range("TR2_PAD") = 1 Then Rows.EntireRow.Hidden = False Range("TR1_AUG_S, TR3_FP16_S, TR4_FP26_S, TR5_FP36_S, Disch1_AUG_S, Disch3_FD16_S, Disch4_FD26_S, Disch5_FD36_S").EntireRow.Hidden = True Else Rows.EntireRow.Hidden = False End If If Range("TR3_FP16") = 1 Then Rows.EntireRow.Hidden = False Range("TR1_AUG_S, TR2_PAD_S, TR4_FP26_S, TR5_FP36_S, Disch1_AUG_S, Disch2_PAD_S, Disch4_FD26_S, Disch5_FD36_S").EntireRow.Hidden = True Else Rows.EntireRow.Hidden = False End If |
|
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
|
Multiple (ByVal Target As Range) Cancel each other out, as written
It would be easier to offer a suggestion if you could explain what you are
trying to accomplish as an end objective. "BEEJAY" wrote: My initial test of the paramenter worked out great!! Then I added the other paramaters. When putting a "1" in cell called TR1_AUG, into parameter 1 parameter 2 obviously cancels it out, so that no ranges are hidden. I currently have 5 parameters of which only ONE may be selected at any time. That one selection causes 8 ranges to be hidden. (although more ranges to hide will likely be required) It is imperative that the DE-selection of the given cell does UN-hide any previously hidden ranges. Can this be done in one go? if so, how? OR should it be set up as 5 independant subs? How would that have to be done? Thank-you If Range("TR1_AUG") = 1 Then 'Single Cell Rows.EntireRow.Hidden = False Range("TR2_PAD_S, TR3_FP16_S, TR4_FP26_S, TR5_FP36_S, Disch2_PAD_S, Disch3_FD16_S, Disch4_FD26_S, Disch5_FD36_S").EntireRow.Hidden = True Else Rows.EntireRow.Hidden = False End If If Range("TR2_PAD") = 1 Then Rows.EntireRow.Hidden = False Range("TR1_AUG_S, TR3_FP16_S, TR4_FP26_S, TR5_FP36_S, Disch1_AUG_S, Disch3_FD16_S, Disch4_FD26_S, Disch5_FD36_S").EntireRow.Hidden = True Else Rows.EntireRow.Hidden = False End If If Range("TR3_FP16") = 1 Then Rows.EntireRow.Hidden = False Range("TR1_AUG_S, TR2_PAD_S, TR4_FP26_S, TR5_FP36_S, Disch1_AUG_S, Disch2_PAD_S, Disch4_FD26_S, Disch5_FD36_S").EntireRow.Hidden = True Else Rows.EntireRow.Hidden = False End If |
|
#3
Posted to microsoft.public.excel.programming
|
|||
|
|||
|
Multiple (ByVal Target As Range) Cancel each other out, as wri
You're so right. Not clear at all.
I have two groups of 5 ranges each. The first group determines which of the 2nd group MAY be required. ie: Group 1, Range 1, "matches" Group 2, Range 1. When one of the first 5 ranges is required/selected, the corresponding Group 2 Range is also to stay available. The other 4 Ranges, in group 1 and Group 2 to be hidden. A DE-Select of the selected Range must un-hide all. PRIMARY SECONDARY Group 1 Group 2 Range 1-1 Range 2-1 Range 1-2 Range 2-2 Range 1-3 Range 2-3 Range 1-4 Range 2-4 Range 1-5 Range 2-5 Let Select Range 1-1. Then all except Range 1-1 and Range 2-1 to be hidden. If Range 1-1 is De-Selected, Than ALL Ranges to be Un-Hidden. I hope this is somewhat clearer. Thanks for your efforts to help me out with this. "JLGWhiz" wrote: It would be easier to offer a suggestion if you could explain what you are trying to accomplish as an end objective. "BEEJAY" wrote: My initial test of the paramenter worked out great!! Then I added the other paramaters. When putting a "1" in cell called TR1_AUG, into parameter 1 parameter 2 obviously cancels it out, so that no ranges are hidden. I currently have 5 parameters of which only ONE may be selected at any time. That one selection causes 8 ranges to be hidden. (although more ranges to hide will likely be required) It is imperative that the DE-selection of the given cell does UN-hide any previously hidden ranges. Can this be done in one go? if so, how? OR should it be set up as 5 independant subs? How would that have to be done? Thank-you If Range("TR1_AUG") = 1 Then 'Single Cell Rows.EntireRow.Hidden = False Range("TR2_PAD_S, TR3_FP16_S, TR4_FP26_S, TR5_FP36_S, Disch2_PAD_S, Disch3_FD16_S, Disch4_FD26_S, Disch5_FD36_S").EntireRow.Hidden = True Else Rows.EntireRow.Hidden = False End If If Range("TR2_PAD") = 1 Then Rows.EntireRow.Hidden = False Range("TR1_AUG_S, TR3_FP16_S, TR4_FP26_S, TR5_FP36_S, Disch1_AUG_S, Disch3_FD16_S, Disch4_FD26_S, Disch5_FD36_S").EntireRow.Hidden = True Else Rows.EntireRow.Hidden = False End If If Range("TR3_FP16") = 1 Then Rows.EntireRow.Hidden = False Range("TR1_AUG_S, TR2_PAD_S, TR4_FP26_S, TR5_FP36_S, Disch1_AUG_S, Disch2_PAD_S, Disch4_FD26_S, Disch5_FD36_S").EntireRow.Hidden = True Else Rows.EntireRow.Hidden = False End If |
| Reply |
| Thread Tools | Search this Thread |
| Display Modes | |
|
|
Similar Threads
|
||||
| Thread | Forum | |||
| Using Worksheet_Change(ByVal Target As Range) | Excel Programming | |||
| Why _Change(ByVal Target As Range) | Excel Programming | |||
| Ranges:Target in Worksheet_SelectionChange(ByVal Target As Range) | Excel Programming | |||
| ByVal Target As Range | Excel Programming | |||
| what does (ByVal Target As Range) mean | Excel Programming | |||
Linear Mode
