Creation graphe VBA avec Range variable

G

Guest

Invité
Bonjour,

Petit probleme dont la reponse m'echappe malgre moultes recherches et tentatives (en plus je suis sur que c'est assez simple :-s) !

Je voudrais ecrire une macro qui creerait un graphe (type bar chart) mais dont le range est variable. En gros, dependant de la base de donnee qu'on m'enverra, ca peut donner, par exemple, B2:C20 ou B2:C45 ou B2:C98 ou ...

Voici ce que j'ai jusqu'a present et en rouge ce qui ne va pas :

Sheets("Tables").Select
Range("B2").Select 'B2 et C2 sont les titres de mes colonnes
Range(Selection, Selection.End(xlToRight)).Select
Range(Selection, Selection.End(xlDown)).Select
Charts.Add
ActiveChart.ChartType = xlBarClustered
ActiveChart.SetSourceData Source:=Sheets("Tables").Range("B2:C20"), PlotBy _
:=xlColumns
ActiveChart.Location Where:=xlLocationAsNewSheet, Name:="Country Graph"
With ActiveChart
.HasTitle = True
.ChartTitle.Characters.Text = "Country Allocation"
.Axes(xlCategory, xlPrimary).HasTitle = False
.Axes(xlValue, xlPrimary).HasTitle = False
End With
ActiveChart.HasLegend = False
ActiveChart.HasDataTable = False

Si quelqu'un savait m'aider ce serait vraiment super.

Un tout grand merci d'avance... :)
 

zeb

Modérateur
Salut,

Plutôt que de mettre en rouge, désigne-nous tes lignes de code qui posent problème par leur numéro.
Pour ce faire, respecte le règlement - que je t'invite à relire, et utilise la balise [code].

Merci.
 
G

Guest

Invité
No souci, c'est note pour une prochaine fois : j'viens de trouver la reponse !

--> http://peltiertech.com/WordPress/dynamic-chart-source-data/

++
 

zeb

Modérateur
C'est bête que tu ne veuilles pas accepter ce règlement.
On aurait critiqué et discuté de ton code.
Tu aurais pu apprendre deux/trois trucs utiles.

En plus, une solution aurait fait pas mal à côté de ta question.
Car ce petit probleme dont la réponse t'échappait malgré moultes recherches et tentatives aurait maintenant été facilement trouvable par une simple recherche.

Il semble que tu n’aies pas compris l'esprit d'un forum d'entraide.

En espérant me tromper.


_________
EDIT: Oups, le fait de revenir donner un lien est quand même une marque d'un certain état d'esprit et rien que pour ça, merci.
 
Vous devez vous inscrire ou vous connecter pour répondre ici.
Derniers messages publiés
Statistiques globales
Discussions
730 098
Messages
6 717 055
Membres
1 586 282
Dernier membre
Yannick3553
Partager cette page
Haut