Créer macro et modifier
Re,
Un soupçon de Power Query, Un TCD (Power Pivot) avec des mesures (fonctions).
Si l'objectif est de créer des boîtes à moustache, il faut faire le tri dans tes données.
Il faut comme même un nombre de données conséquent. Ne peux-tu pas intégrer les continents ?
Il faut aussi déterminer les données nécessaires pour les graphiques!...
A te relire.
Cdlt.
Nota : je n'ai pas trouvé une fonction MODE satisfaisante pour Power Pivot !
Salut Stat,
Salut l'équipe,
je n'ai aucun problème à reconnaître le travail de (vrai) pro de Jean-Eric
Double-clic n'importe où dans la feuille 'Test...' pour démarrer la macro
A+
Re,
Un soupçon de Power Query, Un TCD (Power Pivot) avec des mesures (fonctions).
Si l'objectif est de créer des boîtes à moustache, il faut faire le tri dans tes données.
Il faut comme même un nombre de données conséquent. Ne peux-tu pas intégrer les continents ?
Il faut aussi déterminer les données nécessaires pour les graphiques!...
A te relire.
Cdlt.
Nota : je n'ai pas trouvé une fonction MODE satisfaisante pour Power Pivot !
cela te dérange de me faire un mini tuto car j'ai d'autres fichiers et je n'arrive pas à refaire ce que tu as fait, et ton fichier est beaucoup plus joli que le mien
ah mais c'est un truc payant power query non?
Re,
Quelle est ta version Excel (question demandée ?).
La dernière version est Excel 2016 (ou 365) !...
Power Query (Power Pivot) est intégré à 2016. C'est un complément (add-in) gratuit à télécharger pour 2010 et 2013.
Si tu disposes de 365, je pense que Power Query n'est pas disponible (Il faut 365 ++).
A te relire.
Cdlt.
Re,
Quelle est ta version Excel (question demandée ?).
La dernière version est Excel 2016 (ou 365) !...
Power Query (Power Pivot) est intégré à 2016. C'est un complément (add-in) gratuit à télécharger pour 2010 et 2013.
Si tu disposes de 365, je pense que Power Query n'est pas disponible (Il faut 365 ++).
A te relire.
Cdlt.
j'ai installé power pivot, tu peux me dire ensuite comment je dois procéder pour les requêtes?
désolée d'être pénible mais je n'ai pas l'habitude d'excel
Re,
Tu n'as toujours pas communiqué ta version d'Excel !...
Dans le Ruban (menu), Données, as-tu Récupérer et transformer ?
Cdlt.
Salut Stat,
Salut l'équipe,
je n'avais pas (encore!) fait attention à la deuxième feuille!
Je l'ai renommée 'GRAPH', y affiche le résumé des résultats par pays et y ai ajouté une MFC pour souligner les valeurs "inférieure" en [E].
Toujours un double-clic pour démarrer la macro en feuille 'Test...'.
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean) ' Dim tData, tExtract, tData1(), tData2() Dim iIdx% ' Cancel = True Application.ScreenUpdating = False ' tData = Range("E1:H" & Range("E" & Rows.Count).End(xlUp).Row + 1).Value Range("I2:P" & Range("E" & Rows.Count).End(xlUp).Row).ClearContents tExtract = Range("I1:P" & Range("E" & Rows.Count).End(xlUp).Row + 1).Value ' For x = 2 To UBound(tData, 1) If tData(x, 1) <> tData(x - 1, 1) Then If lStart > 0 Then iIdx = iIdx + 1 tExtract(lStart, 1) = lTotal / (x - lStart) tExtract(lStart, 2) = "=QUARTILE(H" & lStart & ":H" & x - 1 & ";4)" tExtract(lStart, 3) = "=QUARTILE(H" & lStart & ":H" & x - 1 & ";0)" tExtract(lStart, 4) = "=MEDIANE(H" & lStart & ":H" & x - 1 & ")" tExtract(lStart, 5) = IIf(x - lStart = 1, "=" & tData(x - 1, 4), "=MODE(H" & lStart & ":H" & x - 1 & ")") tExtract(lStart, 6) = "=QUARTILE(H" & lStart & ":H" & x - 1 & ";1)" tExtract(lStart, 7) = "=QUARTILE(H" & lStart & ":H" & x - 1 & ";2)" tExtract(lStart, 8) = "=QUARTILE(H" & lStart & ":H" & x - 1 & ";3)" lTotal = 0 End If lStart = x End If lTotal = lTotal + tData(x, 4) Next Range("I1:P" & UBound(tExtract, 1)).FormulaLocal = tExtract tData = Range("E2:P" & Range("I" & Rows.Count).End(xlUp).Row).Value ' ReDim tData1(iIdx, 4) ReDim tData2(iIdx, 4) iIdx = 0 For x = 1 To UBound(tData, 1) If tData(x, 5) <> "" Then iIdx = iIdx + 1 For y = 1 To 4 tData1(iIdx - 1, y - 1) = IIf(y = 1, tData(x, 1), tData(x, y + 4)) tData2(iIdx - 1, y - 1) = tData(x, y + 8) Next End If Next With Worksheets("GRAPH") .Range("A3").Resize(iIdx, 4).ClearContents .Range("F3").Resize(iIdx, 4).ClearContents .Range("A3").Resize(iIdx, 4) = tData1 .Range("F3").Resize(iIdx, 4) = tData2 .Activate End With Application.ScreenUpdating = True ' End SubCurieux de connaître le bilan d'un test grandeur nature...
A+
désolée mais je n'arrive pas à l'exécuter
ici, c'est un forum pour Excel et VBA ; y'a p't'être un forum pour R ?
(tu peux aussi regarder si y'a un forum Statistiques)
dhany
Mais, Stat, un double-clic ??? Trop simple ??
Qu'essaies-tu exactement? Raconte par le menu !
A+
Bonjour,
Une nouvelle fois, je demande ta version Excel.
Ruban, Fichier, Compte.
Tu dois avoir ce type d'information :
ou peut-être dans :
bouton Office (=menu Fichier), bouton « Options Excel »
à gauche : onglet Ressources ; à droite et en bas :
« à propos de Microsoft Office Excel 2007 »
dhany
Mais, Stat, un double-clic ??? Trop simple ??
Qu'essaies-tu exactement? Raconte par le menu !
A+
Je reprends depuis le début : j'ai de nombreux fichiers pour les marques et les brevets, en fonction de chaque catégorie et je dois calculer pour chaque pays une boîte à moustache (moyenne, médiane et les quartiles). Le but final est de voir sous combien de jour on doit relancer le client de manière automatisée. voilà. le problème c'est que en attendant je n'ai trouvé que la fonction sous.total qui me permet de calculer la moyenne et la médiane directement quand je change mes filtres. j'aimerais avoir tout dans un même tableau pour pouvoir comparer les pays entre eux.
J'ai power pivot, mais je n'arrive pas à exécuter vos codes.
Je suis un peu embêtée car mon stage se finit bientôt et j'aurais aimé terminé cette partie proprement.
En attendant je suis obligée de faire calcul par calcul.
Je prends toute proposition, j'ai aussi essayé avec R (que je maîtrise normalement......................
Bonjour,
Je regarderai ma proposition en ne travaillant qu'avec Power Pivot (ce soir !?).
Je crois que je t'avais proposé de travailler avec les continents et pays (pour dégrossir un peu la chose)) : pas de réponse.
Sinon, un graphique à moustache demande un nombre de données conséquents. Faut-il traiter tous les données ?
J'enverrai le tout avec les informations nécessaires à la compréhension.
Cdlt.
Nota : Si Chris lit ce message, j'aimerai savoir s'il a une mesure (Fonction) fiable pour calculer le Mode.
Bonjour,
Aucun retour ?
Cdlt.
Bonjour,
Une nouvelle proposition à étudier (Power Pivot).
Je passe par cjoint.fr car la taille du fichier est supérieure à 1Mo.
Les barres d'erreurs sont calculées avec le coef. 1.5 de l'écart interquartile Q3-Q1 (visibilté graphique).
Si le résultat est probant, on pourra voir pour un Top 5, 10, etc...
A te relire.
Cdlt.