millhouse123
Active Member
- Joined
- Aug 22, 2006
- Messages
- 335
Can you set set different values to 2 different variables using the select case statment? An example of what I was trying is below. It runs but it seems that the Max value is not picked up.
Range1 = ActiveCell.Offset(0, 4).Value
Range2 = Worksheets("Results").Range("V1").Value
Range3 = Range1 & Range2
Select Case Range3
Case "StableCash Equivalents"
Min = 0 And Max = 1
Case "IncomeCash Equivalents"
Min = 0 And Max = 0.2
Case "Income with GrowthCash Equivalents"
Min = 0 And Max = 0.2
Case "BalancedCash Equivalents"
Min = 0 And Max = 0.2
Case "Growth with IncomeCash Equivalents"
Min = 0 And Max = 0.2
Case "GrowthCash Equivalents"
Min = 0 And Max = 0.2
Case "OtherCash Equivalents"
Min = 0 And Max = 0.2
End Select
Range1 = ActiveCell.Offset(0, 4).Value
Range2 = Worksheets("Results").Range("V1").Value
Range3 = Range1 & Range2
Select Case Range3
Case "StableCash Equivalents"
Min = 0 And Max = 1
Case "IncomeCash Equivalents"
Min = 0 And Max = 0.2
Case "Income with GrowthCash Equivalents"
Min = 0 And Max = 0.2
Case "BalancedCash Equivalents"
Min = 0 And Max = 0.2
Case "Growth with IncomeCash Equivalents"
Min = 0 And Max = 0.2
Case "GrowthCash Equivalents"
Min = 0 And Max = 0.2
Case "OtherCash Equivalents"
Min = 0 And Max = 0.2
End Select