Some times when I step through or run the code below it works but majority of the time, I will the error message stated in the title. When I make a selection with the combobox and watch the code, there is nothing set in the rEmpIniValue and rEmpIniValue.select turns yellow. But there is a value in the combobox. So why does this code some times work and other times it doesn't?
Private Sub ComboBox1_Change() Dim rEmpIniValue As Range Worksheets("SD_Employee_List").Activate With ActiveSheet.Range("A:A") Set rEmpIniValue = .Find(what:=Me.ComboBox1.Value, lookat:=xlWhole, LookIn:=xlValues) rEmpIniValue.Select Label1.Caption = ActiveCell.Offset(, 1) End With End Sub