Discussion :

[alrolive]

Bonjour,
J'ai un problème avec un fichier Excel contenant des Macros.
Mon fichier contient des macros avec des évémenents qui permettent l'affichage d'informations se trouvant dans des listes déroulantes
la selection d'une information se trouvant dans la liste déroulante XXX entraine la mise à jour des informations se trouvant dans les autres listes.
j'effectue un ensemble d'opérations dans la fonction

Code :

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

1
2
Private Sub XXX_Change()
End Sub

Mon problème est le suivant:
- Lorsque j'enregistre le fichier avec fichier - Enregistrer --> pas de problème
- Lorsque j'utilise fichier - Enregistrer Sous, ma fonction Private Sub XXX_Change() est automatiquement lancée et les valeurs pas défaut sont remises.
Je ne comprends pas comment cela est possible...
Avez vous une idée
Merci

[Elstak]

Perso j'ai pas trop d'idée...

quand tu fait des "enregistrer" tu le fait manuellement, je veux dire tu fais pas de "Save" dans ta macro?

sinon montre toujours ton code !

[Vesta]

Lors d'un enregistrement "sous" il restitue l'ancien contenu de ton fichier excel avant modifications et crée un nouveau (nom du fichier entré). En fesant cela, je pense qu'il recalcule automatiquement le classeur... Je m'explique, il 'réactualise les listes' ce qui est compris par excel comme des changements dans celles ci

Tu n'as qu'a poser une condition avant d'effectuer cette fonction, genre, lors de la sauvegarde du classeur

Code :

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

DoNotChangeList = true

Et alors tu teste cette valeur avant d'executer les changements, de telle sorte que ca ne calcule les champs que quand tu le veux...

Code :

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

1
2
3
Private Sub XXX_Change()
   if DoNotChangeList = true then exit sub 
End Sub

Et un

Code :

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

DoNotChangeList = False

Quand tu es sur que c'est terminé...

[AlainTech]

Juste un petit truc de correction d'écriture...

Prenez l'habitude d'écrire la vérification d'une variable booléenne sous la forme:

Code :

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

If DoNotChangeList then exit sub

Pas de "= True"

[Vesta]

ok noté...