Erreur d'exécution '13' Incompatibilité de type

[guijone]

Bonjour,

lorsque j'appuie sur le bouton Annuler de ma fenêtre (Feuille2), j'ai l'erreur suivante qui apparait: Erreur d'exécution '13' Incompatibilité de type.

J'ai bien essayé de bidouiller mais je n'ai pas réussi à la résoudre. Auriez vous une idée d'où ça pourrait venir?

Je joins mon fichier, de manière à ce que vous puissiez voir l'erreur par vous même.

Merci d'avance

 

[pierrejean]

Re : Erreur d'exécution '13' Incompatibilité de type

bonjour guijone

Ta variable MonMois est declarée en integer
Or l'appui sur la croix veut lui attribuer "" (qui est String)
Solution: Declarer MonMois en Variant
Ensuite controle si "" (dans ce cas sortir de la Sub)
Eventuellement si tu tiens a l'integer faire MonMois=Cint(Monmois)
Vois le fichier joint

 

[guijone]

Re : Erreur d'exécution '13' Incompatibilité de type

Merci beaucoup Pierrejean!

Plus d'erreur maintenant