'On vérifie que la durée de remboursement soit bien un entier, elle ne doit contenir ni point ni virgule
If InStr(ZT3_DureeRemb, "," & ".") Then
MsgBox ("Erreur Durée de remboursement, Entier obligatoire"), vbCritical 'Elle ne doit contenir ni point ni virgule
Exit Sub