Discussion :

[sabotage]

Bonjour,

J'ai une combox (lstAnnee) qui selon la valeur qu'elle prend, modifie la mise en page de la page

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
Private Sub lstAnnee_Change()
Call formatage
End Sub

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
Private Sub formatage()
Dim Annee As Integer
Annee = Sheets("Releve").lstAnnee.Value
Range("A19:E49").ClearContents
...  
End Sub

Tout marchait bien jusqu'a ce qu'un de mes collegues fasse "fichier - quitter" au lieu d'utiliser la croix windows.
Quand on procède comme lui on obtient une erreur "erreur d'execution 1004 - la méthode sheets de l'objet '_global' a échoué" sur la ligne "Annee = Sheets("Releve").lstAnnee.Value"

Je suppose que cela est du au fait qu'en fermant le fichier de cette facon, excel execute le lstAnnee_change et essai de recuperer la valeur de la combox qui n'existe plus puisque le fichier est fermé.

Qu'est ce que j'ai mal fait pour obtenir ce comportement ?

Merci de votre aide.

[Commodore]

peut-on avoir le code de l'évènement Fichier/Quitter ?

[sabotage]

Il n'y a pas d'evenement a la fermeture.

[Commodore]

il n'y a pas d'evenement a l'evenement "fermeture"... fermer qqch est un evenement en soi

[ouskel'n'or]

Chuis comme le psychopathe ci-dessus... dans l'espectative
où se trouve ta combo ? dans une feuille de calculs ?
où se trouve ta sub "Private Sub lstAnnee_Change()" ?
de quel bouton fichier/quitter parles-tu ? Du menu d'Excel ?
de quel croix Windows parles-tu ? Celle de l'application Excel ?

A question nébuleuse, réponse oiseuse... comme je dis souvent

[sabotage]

Bonjour,

La combox est dans une feuille de calcul.
La sub est dans un module.

"Fichier - Quitter" est effectivement celui du menu excel - l'erreur se produit egalement quand on utilise "la croix" de l'application excel mais pas quand on utilise "la croix" de la feuille excel ou le menu "Fichier - Fermer".