Impossible de définir la propriété XValues de la classe Series (70000 valeurs)
scyhoman63
Messages postés8Date d'inscriptionmercredi 27 juillet 2005StatutMembreDernière intervention 9 juillet 2006
-
8 mars 2006 à 17:57
michelxld
Messages postés402Date d'inscriptionvendredi 6 août 2004StatutMembreDernière intervention12 octobre 2008
-
8 mars 2006 à 18:27
Bonjour à tous voilà un petit problème de graphique sous excel:
Bref un graphique y=f(x) avec 70000 valeurs
Erreur d'execution 1004
impossible de définir la propriété XValues de la classe Series
Sans parler des problèmes de capacités
Sub truc()
Dim i As Single
Dim Tableau(70000) As Integer, Tableau2(70000) As Integer
For i = 1 To 70000 'tableau abscsisses
Tableau(i) = i * 2
Next i
For i = 1 To 70000 'tableau ordonnées
Tableau2(i) = Int((50 * Rnd) + 1)
Next i
Charts.Add
ActiveChart.Location _
Where:=xlLocationAsObject, Name:="Feuil1"
With ActiveChart
.SeriesCollection.NewSeries
.SeriesCollection(1).XValues = Tableau()
.SeriesCollection(1).Values = Tableau2()
.ChartType = xlXYScatterSmoothNoMarkers
End With
End Sub
Merci pour votre aide.
A voir également:
Impossible de définir la propriété visible de la classe worksheet