Vous utilisez un navigateur obsolète. Il se peut que ce site ou d'autres sites Web ne s'affichent pas correctement. Vous devez le mettre à jour ou utiliser un navigateur alternatif.
XL 2019Qui peut m'expliquer comment faire ce graphique pas à pas dans un classeur vierge... ?
Boostez vos compétences Excel avec notre communauté !
Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force.
Apprenez, échangez, progressez – et tout ça gratuitement !
👉 Inscrivez-vous maintenant !
Si ta demande est toujours d'actualité, j'ai reconstitué le graphique donné en exemple et j'ai ajouté une feuille "PAS A PAS" avec les explications.
J'ai ajouté une macro pour mieux adapter l'axe des dates lorsque l'on change d'unité (7 jours, 1 Mois) :
Enrichi (BBcode):
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = Me.[VueGraphique].Address Then
With Me.ChartObjects("Suivi de perte de poids").Chart.Axes(xlCategory)
Select Case Target.Value
Case Is = "HEBDOMADAIRE"
.MajorUnitScale = xlDays
.MajorUnit = 7
Case Is = "MENSUELLE"
.MajorUnitScale = xlMonths...
Si ta demande est toujours d'actualité, j'ai reconstitué le graphique donné en exemple et j'ai ajouté une feuille "PAS A PAS" avec les explications.
J'ai ajouté une macro pour mieux adapter l'axe des dates lorsque l'on change d'unité (7 jours, 1 Mois) :
Enrichi (BBcode):
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = Me.[VueGraphique].Address Then
With Me.ChartObjects("Suivi de perte de poids").Chart.Axes(xlCategory)
Select Case Target.Value
Case Is = "HEBDOMADAIRE"
.MajorUnitScale = xlDays
.MajorUnit = 7
Case Is = "MENSUELLE"
.MajorUnitScale = xlMonths
.MajorUnit = 1
End Select
End With
End If
End Sub
J'ai collé à l'exemple donné, il y a des possibilités d'amélioration mais comme on dit : le mieux est l'ennemi du bien ...
Amicalement
Alain
Pièces jointes
Expliquer comment faire ce graphique pas à pas dans un classeur vierge.xlsm
- Navigue sans publicité - Accède à Cléa, notre assistante IA experte Excel... et pas que... - Profite de fonctionnalités exclusives Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel. Je deviens Supporter XLD