Loop i Excel

For x = 1 To 10
  Ark1.Cells(1, x) = "a"
Next

Hej

Hvad skal jeg gøre med det?

Sætte det rundt om min nuværende makro?
Når jeg optager at jeg sætter det første punkt ind, får jeg:

Sub Eksempel1()
'
' Eksempel1 Macro
'

'
    ActiveSheet.ChartObjects("Chart 5").Activate
    ActiveSheet.ChartObjects("Chart 5").Activate
    ActiveChart.SeriesCollection.NewSeries
    ActiveChart.SeriesCollection(1).Name = "='Ark1'!$A$4"
    ActiveChart.SeriesCollection(1).XValues = "='Ark1'!$B$4"
    ActiveChart.SeriesCollection(1).Values = "='Ark1'!$C$4"
End Sub

Har lige læst mit første indlæg igennem. Der er selvfølgelig tale om en graf.. Kan se jeg har skrevet grad??

Beklager hvis dette har skabt forviring!

Har fundet andre løsninger