Невозможно получить данные на основе значения поля со списком

Question

Ниже приведен мой код пользовательской формы Excel vba, в котором я сравниваю значение combobox1 и вставляю значение той же строки, но следующего столбца, в другие текстовые поля. Программа работает, но не дает никакого значения.

Private Sub verify_Click()
    Dim i As Long    
    For i = 2 To 5    
        If Me.ComboBox1.Value = Sheets("sheet11").Cells(i, "A").Value Then
            Me.date_receipt = Sheets("sheet11").Cells(i, "B").Value
            Me.Subject = Sheets("sheet11").Cells(i, "C").Value
            Me.Branch = Sheets("sheet11").Cells(i, "D").Value
            Me.dispatch_date = Sheets("sheet11").Cells(i, "E").Value    
        End If
    Next i
End Sub