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