Bonsoir
J'ai écrit la macro suivante pour la création d'un graphe, mais j'ai le
mesage d'erreur :
"Erreur d'execution 1004. La méthode Cells de l'objet global a échoué"
C'est la ligne ActiveChart.SetSourceData qui est en cause
Si quelqu'un peut m'aider, par avance merci.
jcp
Sub Macro1()
k = 25
Range(Cells(2, 2), Cells(3, k)).Select
Charts.Add
ActiveChart.ChartType = xlLineMarkers
ActiveChart.SetSourceData Source:=Sheets("Graphe").Range(Cells(2, 2),
Cells(3, k)), PlotBy:= _
xlRows
End Sub
Ci-dessus Cells n'étant pas précédé d'un nom de feuille, renvoie les cellules de la feuille active c'est à dire les cellules d'un graphique...d'ou erreur. Pour éviter cela stocke ta plage source dans un variable avant de créer ton graphique.
"jcp66" a écrit dans le message de news: 468c1b0a$0$5102$
Bonsoir J'ai écrit la macro suivante pour la création d'un graphe, mais j'ai le mesage d'erreur : "Erreur d'execution 1004. La méthode Cells de l'objet global a échoué" C'est la ligne ActiveChart.SetSourceData qui est en cause
Si quelqu'un peut m'aider, par avance merci.
jcp
Sub Macro1() k = 25 Range(Cells(2, 2), Cells(3, k)).Select Charts.Add ActiveChart.ChartType = xlLineMarkers ActiveChart.SetSourceData Source:=Sheets("Graphe").Range(Cells(2, 2), Cells(3, k)), PlotBy:= _ xlRows End Sub
Bonsoir,
Charts.Add
Suite à cette instruction, un nouveau graphique est activé.
Ci-dessus Cells n'étant pas précédé d'un nom de feuille, renvoie les
cellules de la feuille active c'est à dire les cellules d'un
graphique...d'ou erreur. Pour éviter cela stocke ta plage source dans un
variable avant de créer ton graphique.
"jcp66" <jcp66@wanadoo.fr> a écrit dans le message de news:
468c1b0a$0$5102$ba4acef3@news.orange.fr...
Bonsoir
J'ai écrit la macro suivante pour la création d'un graphe, mais j'ai le
mesage d'erreur :
"Erreur d'execution 1004. La méthode Cells de l'objet global a échoué"
C'est la ligne ActiveChart.SetSourceData qui est en cause
Si quelqu'un peut m'aider, par avance merci.
jcp
Sub Macro1()
k = 25
Range(Cells(2, 2), Cells(3, k)).Select
Charts.Add
ActiveChart.ChartType = xlLineMarkers
ActiveChart.SetSourceData Source:=Sheets("Graphe").Range(Cells(2, 2),
Cells(3, k)), PlotBy:= _
xlRows
End Sub
Ci-dessus Cells n'étant pas précédé d'un nom de feuille, renvoie les cellules de la feuille active c'est à dire les cellules d'un graphique...d'ou erreur. Pour éviter cela stocke ta plage source dans un variable avant de créer ton graphique.
"jcp66" a écrit dans le message de news: 468c1b0a$0$5102$
Bonsoir J'ai écrit la macro suivante pour la création d'un graphe, mais j'ai le mesage d'erreur : "Erreur d'execution 1004. La méthode Cells de l'objet global a échoué" C'est la ligne ActiveChart.SetSourceData qui est en cause
Si quelqu'un peut m'aider, par avance merci.
jcp
Sub Macro1() k = 25 Range(Cells(2, 2), Cells(3, k)).Select Charts.Add ActiveChart.ChartType = xlLineMarkers ActiveChart.SetSourceData Source:=Sheets("Graphe").Range(Cells(2, 2), Cells(3, k)), PlotBy:= _ xlRows End Sub
jcp66
Merci beaucoup. Ca marche cdlt jcp
"tissot.emmanuel" a écrit dans le message de news: %
Bonsoir,
Charts.Add
Suite à cette instruction, un nouveau graphique est activé.
Ci-dessus Cells n'étant pas précédé d'un nom de feuille, renvoie les cellules de la feuille active c'est à dire les cellules d'un graphique...d'ou erreur. Pour éviter cela stocke ta plage source dans un variable avant de créer ton graphique.
"jcp66" a écrit dans le message de news: 468c1b0a$0$5102$
Bonsoir J'ai écrit la macro suivante pour la création d'un graphe, mais j'ai le mesage d'erreur : "Erreur d'execution 1004. La méthode Cells de l'objet global a échoué" C'est la ligne ActiveChart.SetSourceData qui est en cause
Si quelqu'un peut m'aider, par avance merci.
jcp
Sub Macro1() k = 25 Range(Cells(2, 2), Cells(3, k)).Select Charts.Add ActiveChart.ChartType = xlLineMarkers ActiveChart.SetSourceData Source:=Sheets("Graphe").Range(Cells(2, 2), Cells(3, k)), PlotBy:= _ xlRows End Sub
Merci beaucoup.
Ca marche
cdlt
jcp
"tissot.emmanuel" <tissot.emmanuel@free.fr> a écrit dans le message de news:
%23nSKFWqvHHA.3356@TK2MSFTNGP03.phx.gbl...
Bonsoir,
Charts.Add
Suite à cette instruction, un nouveau graphique est activé.
Ci-dessus Cells n'étant pas précédé d'un nom de feuille, renvoie les
cellules de la feuille active c'est à dire les cellules d'un
graphique...d'ou erreur. Pour éviter cela stocke ta plage source dans un
variable avant de créer ton graphique.
"jcp66" <jcp66@wanadoo.fr> a écrit dans le message de news:
468c1b0a$0$5102$ba4acef3@news.orange.fr...
Bonsoir
J'ai écrit la macro suivante pour la création d'un graphe, mais j'ai le
mesage d'erreur :
"Erreur d'execution 1004. La méthode Cells de l'objet global a échoué"
C'est la ligne ActiveChart.SetSourceData qui est en cause
Si quelqu'un peut m'aider, par avance merci.
jcp
Sub Macro1()
k = 25
Range(Cells(2, 2), Cells(3, k)).Select
Charts.Add
ActiveChart.ChartType = xlLineMarkers
ActiveChart.SetSourceData Source:=Sheets("Graphe").Range(Cells(2, 2),
Cells(3, k)), PlotBy:= _
xlRows
End Sub
Ci-dessus Cells n'étant pas précédé d'un nom de feuille, renvoie les cellules de la feuille active c'est à dire les cellules d'un graphique...d'ou erreur. Pour éviter cela stocke ta plage source dans un variable avant de créer ton graphique.
"jcp66" a écrit dans le message de news: 468c1b0a$0$5102$
Bonsoir J'ai écrit la macro suivante pour la création d'un graphe, mais j'ai le mesage d'erreur : "Erreur d'execution 1004. La méthode Cells de l'objet global a échoué" C'est la ligne ActiveChart.SetSourceData qui est en cause
Si quelqu'un peut m'aider, par avance merci.
jcp
Sub Macro1() k = 25 Range(Cells(2, 2), Cells(3, k)).Select Charts.Add ActiveChart.ChartType = xlLineMarkers ActiveChart.SetSourceData Source:=Sheets("Graphe").Range(Cells(2, 2), Cells(3, k)), PlotBy:= _ xlRows End Sub
