Discussion :

[PenPen_lepingouin]

Bonjour, je me permets de recourir à une âme charitable pour m'aider à résoudre un problème auquel je me trouve confronté. Je reçois tous les jours un fichier "source" concernant les sauvegardes effectuées durant la nuit. Chaque ligne de ce fichier excel comporte le nom de l'application concernée, le nom de l'étape de la sauvegarde, la date de début et celle de fin. Le but étant de créer une/des macros afin de :
- Calculer les durées de sauvegardes de chaque applis (je que j'ai réussi à faire, c'est ma Macro1).
- Créer un onglet pour chaque application où se trouvera un tableau des durées de sauvegardes journalières, et un graphique pour représenter l'évolution de ces durées (Macro2).
Mon problème apparait sur ce deuxième point car la macro que j'ai faite crée automatiquement les onglets et les tableaux (j'ai pris le parti de faire les graphiques à la main, ne comprenant pas comment automatiser la création de ces derniers), et ce quelque soit le nombre de jours de sauvegardes. Cela marche donc très bien si on fournit à la macro les sauvegardes de tout une semaine/un mois/une année.
Mais on me fourni le fichier source chaque jour, et du coup, la macro devrait juste mettre à jour le tableaux (et donc le graphique) de l'onglet correspondant à l'application visée. Et c'est là que je bloque sur mon code, car il semble que le code tente de recréer des ongletsau lieu de mettre à jour ceux existants.
Si une bonne âme voulait bien jeter un coup d'oeil pr me donner une piste, car n'étant pas développeur, je dois avouer que je rame sévère !!!
Je vous joint le fichier excel, que je reçois avec les macros que j'ai faites.

D'avance merci pour votre investissement.

[J.Michel]

Bonjour,

Sans décortiquer complètement ton code, je vois déjà une petite anomalie:
Sheet.Count te donne le nombre de feuilles de ton classeur et pas le nom de chacune des feuilles.
Donc pour savoir si une feuille existe déjà tu peux faire une boucle du style

Code :

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

1
2
3
4
5
6
7
8
 
   For i = 1 to Sheets.Count
      If Sheets(i).Name = Sheets("Feuil1").Cells(k, 10).Value then
           'La feuille existe déjà
           'Utilisation par exemple d'un flag booleen
           FeuilExist = True
      End If
   Next i

Après tu traites ton flag pour savoir si tu dois créer un onglet ou s'il existe déjà.

Je ne suis pas allez plus loin dans l'étude de ton code. Si tu as d'autres problème je pourrais toujours approfondir