Supprimer la page pour la remplacer

epiouf

XLDnaute Nouveau
comment faire pour supprimer le graphique "graph_06_04_08" existant et remplacer par celui crée le meme jour mais plus tard. Lorsque j'essaye de faire ca me plante on me disant que la page existe deja avec le meme nom
j'essaye de faire avec ChartObjects.Delete
mais je n'arrive pas :(
voici le fichier ci-joint
 

Pièces jointes

  • test.xls
    43 KB · Affichages: 76
  • test.xls
    43 KB · Affichages: 80
  • test.xls
    43 KB · Affichages: 79
Dernière édition:

Cousinhub

XLDnaute Barbatruc
Re : Supprimer la page pour la remplacer

Re-,

essaie avec ce code, qui te supprime toutes les feuilles du jour

A toi d'adapter

Code:
Application.DisplayAlerts = False
For Each sh In Sheets
    If Right(sh.Name, 8) = Format(Date, "dd_mm_yy") Then
    Sheets(sh.Name).Delete
    End If
    Next sh
 

Discussions similaires

Statistiques des forums

Discussions
312 527
Messages
2 089 355
Membres
104 136
dernier inscrit
redzzo