Bonjour,
je me permets de vous soliciter afin de trouver une erreur qui je pense est mineure mais que je n'arrive pas à résoudre depuis un petit moment. J'obtiens à chaque fois la même erreur avec le code suivant :
Sub Graph_Evol_Alloc()
'
' Graph_Evol_Alloc Macro, creation du graph de l'alloc pour chaque asset
'
'variables pour l'affichage
Dim fichier, onglet, cell_debut, cell_fin, plage As String
fichier = Range("'Graphiques'!$C$6").Value
onglet = Range("'Graphiques'!$C$11").Value
cell_debut = Range("'Graphiques'!$D$12").Value
cell_fin = Range("'Graphiques'!$D$13").Value
plage = cell_debut & ":" & cell_fin
ActiveSheet.Shapes.AddChart.Select
ActiveChart.SetSourceData Source:=Workbooks("fichier").Sheets("onglet").Range("plage")
ActiveChart.ChartType = xlAreaStacked100
ActiveChart.ApplyLayout (3)
End Sub
Ce dernier a pour but d'afficher un graphique dans mon fichier excel en prenant comme paramètre les différentes variables plus haut. Le fichier ou les informations sont stockées est bien ouvert et j'ai regardé en faisant un "watch" sur chaque variable afin de m'assurer que je recupère bien les bonnes valeurs. Néanmoins j'ai tjrs cette erreur.
Elle se produit lorsque le code arriver sur la ligne :
" ActiveChart.SetSourceData Source:=Workbooks("fichier").Sheets("onglet").Range("plage") "
J'ai émis l'idée que chaque variable récupére mes données avec des "" et que je rajoute aussi des "" au niveau de ma ligne Source pour chaque variable, est-ce que cela ne ferait pas doublon ?
Merci d'avance de votre aide, cordialement.
je me permets de vous soliciter afin de trouver une erreur qui je pense est mineure mais que je n'arrive pas à résoudre depuis un petit moment. J'obtiens à chaque fois la même erreur avec le code suivant :
Sub Graph_Evol_Alloc()
'
' Graph_Evol_Alloc Macro, creation du graph de l'alloc pour chaque asset
'
'variables pour l'affichage
Dim fichier, onglet, cell_debut, cell_fin, plage As String
fichier = Range("'Graphiques'!$C$6").Value
onglet = Range("'Graphiques'!$C$11").Value
cell_debut = Range("'Graphiques'!$D$12").Value
cell_fin = Range("'Graphiques'!$D$13").Value
plage = cell_debut & ":" & cell_fin
ActiveSheet.Shapes.AddChart.Select
ActiveChart.SetSourceData Source:=Workbooks("fichier").Sheets("onglet").Range("plage")
ActiveChart.ChartType = xlAreaStacked100
ActiveChart.ApplyLayout (3)
End Sub
Ce dernier a pour but d'afficher un graphique dans mon fichier excel en prenant comme paramètre les différentes variables plus haut. Le fichier ou les informations sont stockées est bien ouvert et j'ai regardé en faisant un "watch" sur chaque variable afin de m'assurer que je recupère bien les bonnes valeurs. Néanmoins j'ai tjrs cette erreur.
Elle se produit lorsque le code arriver sur la ligne :
" ActiveChart.SetSourceData Source:=Workbooks("fichier").Sheets("onglet").Range("plage") "
J'ai émis l'idée que chaque variable récupére mes données avec des "" et que je rajoute aussi des "" au niveau de ma ligne Source pour chaque variable, est-ce que cela ne ferait pas doublon ?
Merci d'avance de votre aide, cordialement.