Rejet du else

Bonjour
j'ai déclaré plusieurs integer , avec msgBox pour comparaison :
i2 = i_dernière_facture - i_Nouvelle_facture
MsgBox i2

If i_dernière_facture = i_Nouvelle_facture Then
MsgBox "ERREUR , VOTRE PRECEDENTE FACTURE N' A PAS ETE VALIDEE" & vbCr & " VOUS DEVEZ D'ABORD VALIDEZ CETTE FACTURE OU L' ANNULER " & vbCr & _
" OU VEUILLEZ VERIFIER VOTRE COMPTEUR FACTURE "
GoTo fin 'exit sub
'comme on transfert,

Else: ActiveSheet.Shapes.Range(Array("plaque tranfert devis")).Select
Selection.Delete
Sheets("Synthèse").Select
ActiveSheet.Shapes.Range(Array("plaque devis transféré !")).Select
Selection.Copy
Sheets(6).Select
Range("J21").Select
ActiveSheet.Select
ActiveSheet.Shapes.Range(Array("plaque tranfert devis")).Select
Selection.OnAction = ""
ActiveSheet.Paste
Range("J39").Select
End If

Décidément je vois pourquoi rien ne fonctionne, mes msgbox me renvoie bien les bonnes valeurs et pourtant les résultats sont bien différents, et me renvoie la réponse comme si la 1ère condition était remplie !
Pourtant ça me parait si simple et basique
Si quelqu'un peut m'éclairer, un grand merci d' avance