Hello,
Ma macro génère un graphique.
Ce graphique est ensuite déplacé dans son propre onglet
Si je répète la macro, il doit en premier lieu effacer l'onglet "Gantt-Chart" (sinon il plante).
=> je lui fais faire une boucle sur tous les onglets de mon classeur et s'il voit "Gantt-Chart" il doit l'effacer:
Problème, il ne reconnait pas l'onglet "Gantt Chart". Si je lui fais lister les onglets qu'il croise, il les indique tous sauf celui-ci.
Quelqu'un saurait-il pourquoi et surtout comment résoudre ce problème ?
Merci d'avance et bon après-midi.
Fab
Ma macro génère un graphique.
Ce graphique est ensuite déplacé dans son propre onglet
Code:
ActiveChart.Location Where:=xlLocationAsNewSheet, Name:="Gantt-Chart"Si je répète la macro, il doit en premier lieu effacer l'onglet "Gantt-Chart" (sinon il plante).
=> je lui fais faire une boucle sur tous les onglets de mon classeur et s'il voit "Gantt-Chart" il doit l'effacer:
Code:
Dim Sh As Variant
For Each Sh In Worksheets
If Sh.Name = "Gantt-Chart" Then
If MsgBox("Delete previous chart?", vbYesNo, "Gantt Chart") = vbYes Then
Sheets("Gantt-Chart").Select
ActiveWindow.SelectedSheets.Delete
Sheets("Gantt-Task").Select
End If
End If
NextProblème, il ne reconnait pas l'onglet "Gantt Chart". Si je lui fais lister les onglets qu'il croise, il les indique tous sauf celui-ci.
Quelqu'un saurait-il pourquoi et surtout comment résoudre ce problème ?
Merci d'avance et bon après-midi.
Fab