Re : gestion de données
Re,
Aolrs, le plus simple est de faire comme ça :
tu arrête le pas à pas...
Dans le code, dans la Sub ListePlan, tu recherche l'expression
If ExisteDansAncienneListe(Liste(1, i)) = 0 Then
et tu sélectionne
ExisteDansAncienneListe(Liste(1, i)) = 0
Menu Débogage - Ajouter un espion
Type d'espion : Arrêt si la valeur est vraie
OK
tu cherches l'expression
ElseIf Liste(2, i) <> AncienneListe(ExisteDansAncienneListe(Liste(1, i)), 2) Then
et tu sélectionnes
Liste(2, i) <> AncienneListe(ExisteDansAncienneListe(Liste(1, i)), 2)
Menu Débogage - Ajouter un espion
Type d'espion : Arrêt si la valeur est vraie
OK
ensuite tu éxecute normalement le code (avec le bouton si tu veux)
normalement, il devrait s'arrêter sur l'une des 2 lignes en jaune (s'il s'arrête avant, tu utilises le bouton Continuer (flèche verte))
ensuite tu regarde dans le volet espions (en bas) pour voir lequel des 2 espions est vrai
si c'est le premier, c'est qu'il considère qu'il y a un nouveau plan qui n'existait pas avant
si c'est le deuxième, c'est qu'il considère q'une version a changé
avec le pointeur de la souris, va sur la variable i et regarde sa valeur : c'est le numéro du plan concerné dans la liste de la feuille Excel...
en espérant que ça puisse te mettre sur la voie...