Insérer variable String dans une formule

[vashh]

Bonjour a tous, je vous écirs car j'ai un problème avec une variable string que j'aimerais incorporer dans une formule de graphique.

Mon but est de mettre dans une variable string le nom de ma page pour ensuite m'en servir dans une formule de graphique permettant de sélectionner les données sources.

Voilà donc le code que j'utilise, le problème est qu'il ne fonctionne pas.

Sub Macro()

Dim nomfeuille as String
nomfeuille = ActiveSheet.Name

ActiveSheet.ChartObjects("Graphique 2").Activate
ActiveChart.PlotArea.Select
ActiveChart.SeriesCollection(1).Values = "='" & nomfeuille & "'!R" & Target.Row & "C12:R" & Target.Row & "C18"

End Sub

Merci d'avance

 

[Robert]

Re : Insérer variable String dans une formule

Bonjour Vashh, bonjour le forum,

Ne manquerait-il pas une virgule ou un point virgule quelquepart ?

ActiveChart.SeriesCollection(1).Values = "='" & nomfeuille & "'!R" & Target.Row & "[B][COLOR=red];[/COLOR][/B]C12:R" & Target.Row & "C18"

 

[tototiti2008]

Re : Insérer variable String dans une formule

Bonjour Vashh, Bonjour Robert,

Ton code ne définit pas Target
Que vaut Target ?

 

[vashh]

Re : Insérer variable String dans une formule

Ah pardon normalement Taget est défini mais la j'ai voulu faire simple, attendez je me corrige

Sub Macro()

Dim nomfeuille as String
nomfeuille = ActiveSheet.Name

ActiveSheet.ChartObjects("Graphique 2").Activate
ActiveChart.PlotArea.Select
ActiveChart.SeriesCollection(1).Values = "='" & nomfeuille & "'!R2C12:R2C18"

End Sub

 

[tototiti2008]

Re : Insérer variable String dans une formule

Bonjour,

Et il plante où ?

Si j'ai un graphique existant Graphique 2 qui a déjà un série 1 de définie avec des valeurs, le code fonctionne trés bien chez moi

As-tu un Graphique 2 ?
As-tu une série 1 ?
La série 1 a-t-elle déjà des valeurs définies ?

 

[vashh]

Re : Insérer variable String dans une formule

Oui j'ai deja un graphique et des valeurs pour ma série. Lorsque je lance ma macro, Excel m'affiche un mesasge d'erreur indiquant :

Erreur d'execution 1004 :

Impossible de définir la propriété Values de la classe Séries

Je ne vois vraiment pas ou est le probleme