Ambil Ulang

Private Sub txtREALISASI_Exit(ByVal Cancel As MSForms.ReturnBoolean)
'Ambil ulang value nya
With Sheet2.Range("A:A")
    Set c = .Find(ComboBox1.Value, lookin:=xlValues)
    If Not c Is Nothing Then
        AnggaranAwal = c.Offset(0, 3).Value
    End If
End With
if txtREALISASI.value > AnggaranAwal then
    'kalau masih error coba conver ke long jadi
    'if Clng(txtINPUT.value) > AnggaranAwal then
    msgbox "MOHON DIPERIKSA KEMBALI HASIL INPUTAN MELEBIHI ANGGARAN"
end if
end Sub