PDA

View Full Version : ComboBox



halimi1306
08-19-2011, 10:49 AM
Hi,

I have a problem with a code because Im getting a runtime error (Activate method of Range class failed)

Option Explicit
Private Sub ComboBox1_change()
Dim c As Integer
c = Application.WorksheetFunction.Match(ComboBox1.Value, Range("A4:BX4"), 0)
Cells(4, c).Activate
End Sub

Bob Phillips
08-19-2011, 11:08 AM
Can't reproduce. What value did you select that gave this?

halimi1306
08-19-2011, 11:18 AM
Hi Bob,

U can see the value in column I202:I222 in my ws