Morning All,
Firstly, can I say thank you too all who have helped me and assisted me through my VBA baptism by fire.
In particular, Richard Buttery and Xlnitwit, who I feel have showed immense tolerance towards me. Thank you All.
One little question. I have the code below and on the second "If" argument I would like to insert
"A", "R", "X", "GG", "HH" rather than just "A"
I'm Ok with case insertion but not sure how to insert with an "If" command.
Can anyone Help? Much appreciated
Private Sub ComboBox3_Change()
If bInitial = True Then Exit Sub
Select Case Me.ComboBox3.Value
Case "STANDARD"
If ComboBox4.Value = "160X35" And ComboBox7.Value = "C" Then
Me.ComboBox26.Value = "409272.005"
Me.ComboBox27.Value = "409272.005"
End If
If ComboBox4.Value = "200X50" And ComboBox7.Value = "A" Then
Me.ComboBox26.Value = "520079.004"
Me.ComboBox27.Value = "520079.004"
End If
End Select
End Sub
Bookmarks