Sub ConstruireGraph(var, var2, var3)
Dim ch As ChartObject
Set ch = Worksheets(3).ChartObjects.Add(10, 10, 345, 198)
ch.Chart.SetSourceData source:=Worksheets(2).Range("A" & var & ":C" & var &
"")
ch.Chart.ChartType = xl3DColumn
End Sub
peut on, au lieu d'afficher le graph en page 3 , l'afficher dans une form
VB.
merci
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Jean Yves SÉVENO
Bonjour.
On peut le copier dans un contrôle Image ou Picture.
J'ai un fichier un excel qui contient les procédures nécessaires en VBA si ça t'intéresse.
Cordialement.
Jean Yves
"[aicfr]" a écrit dans le message de news:c67u6p$5j0$
bonjour, voici mon code:
Sub ConstruireGraph(var, var2, var3) Dim ch As ChartObject Set ch = Worksheets(3).ChartObjects.Add(10, 10, 345, 198) ch.Chart.SetSourceData source:=Worksheets(2).Range("A" & var & ":C" & var
&
"") ch.Chart.ChartType = xl3DColumn End Sub
peut on, au lieu d'afficher le graph en page 3 , l'afficher dans une form VB. merci
[aicfr]
Bonjour.
On peut le copier dans un contrôle Image ou Picture.
J'ai un fichier un excel qui contient les procédures nécessaires en VBA si
ça t'intéresse.
Cordialement.
Jean Yves
"[aicfr]" <kheraud@cartolux-thiers.com> a écrit dans le message de
news:c67u6p$5j0$1@s1.read.news.oleane.net...
bonjour,
voici mon code:
Sub ConstruireGraph(var, var2, var3)
Dim ch As ChartObject
Set ch = Worksheets(3).ChartObjects.Add(10, 10, 345, 198)
ch.Chart.SetSourceData source:=Worksheets(2).Range("A" & var & ":C" & var
&
"")
ch.Chart.ChartType = xl3DColumn
End Sub
peut on, au lieu d'afficher le graph en page 3 , l'afficher dans une form
VB.
merci
On peut le copier dans un contrôle Image ou Picture.
J'ai un fichier un excel qui contient les procédures nécessaires en VBA si ça t'intéresse.
Cordialement.
Jean Yves
"[aicfr]" a écrit dans le message de news:c67u6p$5j0$
bonjour, voici mon code:
Sub ConstruireGraph(var, var2, var3) Dim ch As ChartObject Set ch = Worksheets(3).ChartObjects.Add(10, 10, 345, 198) ch.Chart.SetSourceData source:=Worksheets(2).Range("A" & var & ":C" & var
&
"") ch.Chart.ChartType = xl3DColumn End Sub
peut on, au lieu d'afficher le graph en page 3 , l'afficher dans une form VB. merci
[aicfr]
[aicfr]
Oui, votre fichier excel m'interesse. Je vous remercie d'avance.
Cordialement, [aicfr]
"Jean Yves SÉVENO" a écrit dans le message de news:c686v4$n4s$
Bonjour.
On peut le copier dans un contrôle Image ou Picture.
J'ai un fichier un excel qui contient les procédures nécessaires en VBA si ça t'intéresse.
Cordialement.
Jean Yves
"[aicfr]" a écrit dans le message de news:c67u6p$5j0$ > bonjour, > voici mon code: > > Sub ConstruireGraph(var, var2, var3) > Dim ch As ChartObject > Set ch = Worksheets(3).ChartObjects.Add(10, 10, 345, 198) > ch.Chart.SetSourceData source:=Worksheets(2).Range("A" & var & ":C" &
var
& > "") > ch.Chart.ChartType = xl3DColumn > End Sub > > peut on, au lieu d'afficher le graph en page 3 , l'afficher dans une
form
> VB. > merci > > [aicfr] > >
Oui, votre fichier excel m'interesse. Je vous remercie d'avance.
Cordialement,
[aicfr]
"Jean Yves SÉVENO" <jyseveno@wanadoo.fr> a écrit dans le message de
news:c686v4$n4s$1@news-reader1.wanadoo.fr...
Bonjour.
On peut le copier dans un contrôle Image ou Picture.
J'ai un fichier un excel qui contient les procédures nécessaires en VBA si
ça t'intéresse.
Cordialement.
Jean Yves
"[aicfr]" <kheraud@cartolux-thiers.com> a écrit dans le message de
news:c67u6p$5j0$1@s1.read.news.oleane.net...
> bonjour,
> voici mon code:
>
> Sub ConstruireGraph(var, var2, var3)
> Dim ch As ChartObject
> Set ch = Worksheets(3).ChartObjects.Add(10, 10, 345, 198)
> ch.Chart.SetSourceData source:=Worksheets(2).Range("A" & var & ":C" &
var
&
> "")
> ch.Chart.ChartType = xl3DColumn
> End Sub
>
> peut on, au lieu d'afficher le graph en page 3 , l'afficher dans une
Oui, votre fichier excel m'interesse. Je vous remercie d'avance.
Cordialement, [aicfr]
"Jean Yves SÉVENO" a écrit dans le message de news:c686v4$n4s$
Bonjour.
On peut le copier dans un contrôle Image ou Picture.
J'ai un fichier un excel qui contient les procédures nécessaires en VBA si ça t'intéresse.
Cordialement.
Jean Yves
"[aicfr]" a écrit dans le message de news:c67u6p$5j0$ > bonjour, > voici mon code: > > Sub ConstruireGraph(var, var2, var3) > Dim ch As ChartObject > Set ch = Worksheets(3).ChartObjects.Add(10, 10, 345, 198) > ch.Chart.SetSourceData source:=Worksheets(2).Range("A" & var & ":C" &
var
& > "") > ch.Chart.ChartType = xl3DColumn > End Sub > > peut on, au lieu d'afficher le graph en page 3 , l'afficher dans une
form
> VB. > merci > > [aicfr] > >
Jean Yves SÉVENO
OK.
Envoyé sur ta BAL.
Jean Yves
"[aicfr]" a écrit dans le message de news:c68io8$huq$
Oui, votre fichier excel m'interesse. Je vous remercie d'avance.
Cordialement, [aicfr]
"Jean Yves SÉVENO" a écrit dans le message de news:c686v4$n4s$ > Bonjour. > > On peut le copier dans un contrôle Image ou Picture. > > J'ai un fichier un excel qui contient les procédures nécessaires en VBA
si
> ça t'intéresse. > > Cordialement. > > Jean Yves > > > > "[aicfr]" a écrit dans le message de > news:c67u6p$5j0$ > > bonjour, > > voici mon code: > > > > Sub ConstruireGraph(var, var2, var3) > > Dim ch As ChartObject > > Set ch = Worksheets(3).ChartObjects.Add(10, 10, 345, 198) > > ch.Chart.SetSourceData source:=Worksheets(2).Range("A" & var & ":C" & var > & > > "") > > ch.Chart.ChartType = xl3DColumn > > End Sub > > > > peut on, au lieu d'afficher le graph en page 3 , l'afficher dans une form > > VB. > > merci > > > > [aicfr] > > > > > >
OK.
Envoyé sur ta BAL.
Jean Yves
"[aicfr]" <kheraud@cartolux-thiers.com> a écrit dans le message de
news:c68io8$huq$1@s1.read.news.oleane.net...
Oui, votre fichier excel m'interesse. Je vous remercie d'avance.
Cordialement,
[aicfr]
"Jean Yves SÉVENO" <jyseveno@wanadoo.fr> a écrit dans le message de
news:c686v4$n4s$1@news-reader1.wanadoo.fr...
> Bonjour.
>
> On peut le copier dans un contrôle Image ou Picture.
>
> J'ai un fichier un excel qui contient les procédures nécessaires en VBA
si
> ça t'intéresse.
>
> Cordialement.
>
> Jean Yves
>
>
>
> "[aicfr]" <kheraud@cartolux-thiers.com> a écrit dans le message de
> news:c67u6p$5j0$1@s1.read.news.oleane.net...
> > bonjour,
> > voici mon code:
> >
> > Sub ConstruireGraph(var, var2, var3)
> > Dim ch As ChartObject
> > Set ch = Worksheets(3).ChartObjects.Add(10, 10, 345, 198)
> > ch.Chart.SetSourceData source:=Worksheets(2).Range("A" & var & ":C" &
var
> &
> > "")
> > ch.Chart.ChartType = xl3DColumn
> > End Sub
> >
> > peut on, au lieu d'afficher le graph en page 3 , l'afficher dans une
form
> > VB.
> > merci
> >
> > [aicfr]
> >
> >
>
>
"[aicfr]" a écrit dans le message de news:c68io8$huq$
Oui, votre fichier excel m'interesse. Je vous remercie d'avance.
Cordialement, [aicfr]
"Jean Yves SÉVENO" a écrit dans le message de news:c686v4$n4s$ > Bonjour. > > On peut le copier dans un contrôle Image ou Picture. > > J'ai un fichier un excel qui contient les procédures nécessaires en VBA
si
> ça t'intéresse. > > Cordialement. > > Jean Yves > > > > "[aicfr]" a écrit dans le message de > news:c67u6p$5j0$ > > bonjour, > > voici mon code: > > > > Sub ConstruireGraph(var, var2, var3) > > Dim ch As ChartObject > > Set ch = Worksheets(3).ChartObjects.Add(10, 10, 345, 198) > > ch.Chart.SetSourceData source:=Worksheets(2).Range("A" & var & ":C" & var > & > > "") > > ch.Chart.ChartType = xl3DColumn > > End Sub > > > > peut on, au lieu d'afficher le graph en page 3 , l'afficher dans une form > > VB. > > merci > > > > [aicfr] > > > > > >
