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.
Bonjour le forum,
J'ai un dictionnaire et je veux faire un graphique des valeurs en fonction des clefs donc je les stocke dans 2 tableaux l'un pour les clefs l'autre les valeurs et que mon code ne marche pas je n'obtiens pas de graphique. Voici le code en question
Option Explicit
Sub...
Voici une partie de mon code pour que vous comprenez mieux. C'est une macro qui sur un autre fichier ouvert contient un tableau et fait des graphiques du tableau pour l'instant ça marchait pour les nombres mais là avec le dictionnaire c'est dans le cas où la colonne est composée de texte que je...
Bonjour le forum,
J'ai une question qui serait si avec une new collection il serait possible ( avec une formule que je n'ai pas trouvé ou autre ) de prendre toutes les valeurs pour les utiliser en abscisses sur un graphique et les clés en ordonnées par exemple ? En ne connaissant pas le nombre...
Merci pour le if Err et le titre de la feuille du graphique c'est que pour les 2 cas avec ' client A' dans le tableau qui fait que le titre de la feuille n'a pas le nom ...'client A' mais graphique6 ou graphique4 par exemple mais c'est bon pour contrer ça j'ai mis un titre aux graphiques.
Merci...
merci beaucoup Dranreb c'est bon ça marche juste pour les titres de page de graphique quand on a dans le tableau par exemple
Document 'Client A' ça met graphique 4 par exemple. Il y a un moyen pour éviter cela quand un titre à des apostrophes ?
D'accord merci voilà mon code j'ai une erreur de compilation end with sans with
For Col = 1 To RngTit.Columns.Count
If Col <> ColDate Then
Set Cht = Wbk.Charts.Add
With Cht.SeriesCollection
If .Count > 0 Then
Set Sér =...
La boucle do while se place où par rapport à la modification du set sér
For Col = 1 To RngTit.Columns.Count
If Col <> ColDate Then
Set Cht = Wbk.Charts.Add
Do While Cht.SeriesCollection.Count > 1: Cht.SeriesCollection(1).Delete: Loop
Set Sér =...
J'avais un problème des fois comme ça mais juste que je supprimais le code que j'avais copié juste avant je le recoller et enregistrer et c'était bon mais là non ça marchait plus.
Je n'avais pas utilisé de case else mais pour les valeurs inférieurs à 7 donc pour le reste des valeurs qui équivaut donc au else et en fait pour le type de graphique ca allait juste les valeurs dedans étaient pas celle attendues (message avant d'avoir lu le #28)
Je vais essayer cette boucle et...
le test1 c'est ce que j'obtiens avec la macro et le test2 c'est ce que je voudrais et que j'ai du modifié manuellement les graphiques après avoir utilisé la macro
Bonjour,
Ce que j'aimerais c'est qu'à partir du tableau avec un graphique avec en abscisse la date s'il y a sinon la première colonne et en ordonnée une autre colonne et ainsi avoir autant de graphique que de colonne en ne comptant pas la colonne pour les abscisses. Quand j'ai seulement ce code...
Ce site utilise des cookies pour personnaliser le contenu, adapter votre expérience et vous garder connecté si vous vous enregistrez.
En continuant à utiliser ce site, vous consentez à notre utilisation de cookies.