Hi All,
In U26:X200 is my data like below.
W has a number and color. The number can be one or
two digits. (eg. Vo4, GREEN or Vo53, PINK).
SA 2 Vo4, GREEN Mon
SA 4 Vo3, Pale GREEN Wed
VB 7 Vo1, BLACK Tues
HB 8 Vo4, Dark BLUE Mon
I have a combo box which gets the first two columns
Of data from my range and puts the result in G11 and H11.
So G11 is SA and H11 is 2.
This is the combo code that does this.
Code:
Option Explicit
Private Sub ComboBox4_Change()
With Me.ComboBox4
If .ListIndex > -1 Then
Me.Cells(11, "G") = .Value
'Me.Cells(11, "H") = Me.Cells(.ListIndex + 26, "v")
Me.Cells(11, "H") = Val(.List(.ListIndex, 1))
End If
End With
End Sub
However, I wish to also get the NUMBER ONLY in columnW
And insert this in cell J7. So say in the third record as example
G11=VB, H11=7 and J7=1.
Can anyone help me to do this.
Thankyou in advance.
RC
In U26:X200 is my data like below.
W has a number and color. The number can be one or
two digits. (eg. Vo4, GREEN or Vo53, PINK).
SA 2 Vo4, GREEN Mon
SA 4 Vo3, Pale GREEN Wed
VB 7 Vo1, BLACK Tues
HB 8 Vo4, Dark BLUE Mon
I have a combo box which gets the first two columns
Of data from my range and puts the result in G11 and H11.
So G11 is SA and H11 is 2.
This is the combo code that does this.
Code:
Option Explicit
Private Sub ComboBox4_Change()
With Me.ComboBox4
If .ListIndex > -1 Then
Me.Cells(11, "G") = .Value
'Me.Cells(11, "H") = Me.Cells(.ListIndex + 26, "v")
Me.Cells(11, "H") = Val(.List(.ListIndex, 1))
End If
End With
End Sub
However, I wish to also get the NUMBER ONLY in columnW
And insert this in cell J7. So say in the third record as example
G11=VB, H11=7 and J7=1.
Can anyone help me to do this.
Thankyou in advance.
RC