Logo GNT
Actualités Tests & Guides Bons Plans
GTA 6 iPhone 17 Copilot Switch 2 Temu ChatGPT Tesla
OVH Cloud OVH Cloud
Entraide Applications Microsoft Office Excel graphique dynamique

graphique dynamique

4 réponses
Avatar
Patrick
Bonjour,

Mes données sont disposées comme ceci :

Date Nom Prenom Temps Estimation
01/01/2001 Albert Tony 10:34 234
. . . . .
. . . . .
. . . . .

08/11/2005 Parker Tony 5:32 560

J'ai besoin d'afficher un graphique dynamique sur un userform mais je ne
sais pas comment m'y prendre

Pour etre precis on doit saisir 2 dates :
ex: Du 10/11/2001 Au 01/01/2002

On selectionne la plage correspondant à l'intervalle de temps
ca devrait etre une fonction du type
Function plage_entre_date (debut As Date, Fin As date)

Puis des fonctions qui calcule la moyenne des estimations et du temps de la
plage et trace un graphique des estimations entre l'intervalle de temps
Je pense du type
calcul_moyenne (plage)
trace_graphique(plage)

Vous pouvez m'aider ?
Me donner quelques pistes de reflexion ou des sites qui m'aideraient

Merci beaucoup
Signaler un problème avec ce contenu

4 réponses

Supprimer
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire

Veuillez sélectionner un problème

Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Avatar
jb
Bonjour,

Voici un exemple simple de graphe dynamique affiché dans un Useform(1
point mobile)

http://cjoint.com/?lgivnt8Ha3

Cordialement JB
Avatar
jb
Bonjour (bis)

Ceci est une version avec 2 points mobiles (mois de début,Mois de fin)
On choisit les mois en I1 et J1 (1,2,..,12)

http://cjoint.com/?lgiZNgBXKi

Ca2004
Janvier 100
Février 110
Mars 120
Avril 130
Mai 140
Juin 141
Juillet 142
Août 143
Septembre 144
Octobre 145
Novembre 146
Décembre 147

1- Créer le graphe
2- Nommer le champ A2:A13 Mois et le champ B2:B13 Caf2004 avec
Insertion/Nom/Définir

ÞCALER(Feuil1!$A$2;Feuil1!$I$2-1;0;Feuil1!$J$2-Feuil1!$I$2+1)
ÞCALER(Feuil1!$B$2;Feuil1!$I$2;0;Feuil1!$J$2-Feuil1!$I$2+1)

3-Sélectionner le graphe:
Dans la barre de formule, remplacer les champs par Mois et CAF2004
=SERIE(GrapheDyn!$B$1;NomChampVariable.xls!Mois;NomChampVariable.xls!CAF2 004;1)

Pour le graphe dans le formulaire:
Créer un champ Image1 du type image

Private Sub UserForm_Initialize()
Set g = Sheets("Feuil1").ChartObjects(1).Chart
fichier = ActiveWorkbook.Path & "" & "graphe.gif"
g.Export Filename:=fichier, FilterName:="GIF"
Image1.Picture = LoadPicture(fichier)
End Sub

Cordialement JB
Avatar
Patrick
Je te remercie "jp"

J'essaye ça et te tiens au courant



"jb" a écrit dans le message de news:

Bonjour (bis)

Ceci est une version avec 2 points mobiles (mois de début,Mois de fin)
On choisit les mois en I1 et J1 (1,2,..,12)

http://cjoint.com/?lgiZNgBXKi

Ca2004
Janvier 100
Février 110
Mars 120
Avril 130
Mai 140
Juin 141
Juillet 142
Août 143
Septembre 144
Octobre 145
Novembre 146
Décembre 147

1- Créer le graphe
2- Nommer le champ A2:A13 Mois et le champ B2:B13 Caf2004 avec
Insertion/Nom/Définir

ÞCALER(Feuil1!$A$2;Feuil1!$I$2-1;0;Feuil1!$J$2-Feuil1!$I$2+1)
ÞCALER(Feuil1!$B$2;Feuil1!$I$2;0;Feuil1!$J$2-Feuil1!$I$2+1)

3-Sélectionner le graphe:
Dans la barre de formule, remplacer les champs par Mois et CAF2004
=SERIE(GrapheDyn!$B$1;NomChampVariable.xls!Mois;NomChampVariable.xls!CAF2004;1)

Pour le graphe dans le formulaire:
Créer un champ Image1 du type image

Private Sub UserForm_Initialize()
Set g = Sheets("Feuil1").ChartObjects(1).Chart
fichier = ActiveWorkbook.Path & "" & "graphe.gif"
g.Export Filename:=fichier, FilterName:="GIF"
Image1.Picture = LoadPicture(fichier)
End Sub

Cordialement JB
Avatar
jb
Voici une 3eme version qui doit se rapprocher de votre cas:

http://cjoint.com/?lgqRyT5Owj

Cordialement JB