aide pour macro

[gege21]

bonjours a tous

j'ai une code qui me crée un graphique la tout marche bien
je veux l'envoyer dans un userform via une image GIF
et la sa ne marche plus
ou ai-je fais une erreur 😕

 

[gege21]

Re : aide pour macro

ficher xls pour ceux qui n'ont 2007

 

[Modeste]

Re : aide pour macro

Bonjour gege21,

J'ai jeté un oeil en passant à ton code ... Il s'exécute jusqu'au bout lorsque "décembre" (par exemple) est écrit de la même manière partout dans ton code 🙄
Si tu demandes à Excel de comparer "décembre" et "Déscembre", il me semble normal que rien ne se passe (attention à la casse également! ... Je parle ici des majuscules/minuscules uniquement)
Quant à savoir si le résultat obtenu est celui que tu attendais et si le code est optimisé ... vois d'abord si des noms de mois identiques règlent ton premier souci.

 

[gege21]

Re : aide pour macro

bonjour Modeste

une foie tous remis a l'identique sa marche toujours pas

 

[Modeste]

Re : aide pour macro

Re-bonjour,

tous remis a l'identique

... à l'identique entre quoi et quoi? Tu as rectifié les noms des mois dans ton module, mais le contenu de ton combobox "mois1" dans ton UserForm, quel est son contenu? (tant que tu y seras, vérifie les 2e, 8e et 12e mois de l'année)

 

[gege21]

Re : aide pour macro

bonjour modeste

😡 y faut vraiment que j'hachette des lunette moi 😉😉
et forcement maintenant sa marche
merci quand même 😱

 

[Modeste]

Re : aide pour macro

Bonjour,

Si tu repasses par ici, j'avais aussi évoqué un code pas nécessairement optimisé (mais tu n'as pas du le voir, sans les lunettes 😉)
Dans ton module, tu récupères le contenu de ta ComboBox "mois", en écrivant:

Select Case UserForm1.mois1.Value
Case "Janvier"
mois = 1
Case "Février"
mois = 2

[...]

End Select

L'expérience récente permet de constater que cette écriture t'expose aux risques d'une erreur d'encodage et représente 25 lignes de code. Peux-tu tester ce que donnerait

mois = UserForm1.mois1.ListIndex + 1

... à la place des 25 lignes en question? Le seul cas qu'il faut tester en plus est celui où rien n'est sélectionné dans la liste (ListIndex= -1)