Member Avatar for yilin2008

Hi, All:

I am getting crazy about this error. I tried everything but no help at all. Here is the simple task I want to do: adding a chart. The code is as below:

Charts.Add
ActiveChart.ChartType = xlXYScatterLines
Set myrange = Worksheets("Sheet1").Range("B16:B18")
ActiveChart.SetSourceData Source:=myrange, PlotBy:=xlColumns
ActiveChart.Location where:=xlLocationAsObject, Name:="Rates"

It always stops at line 3 and complaining about "Subscript out of range". But B16-B18 in sheet1 have data. Please anybody can help me? Thanks a lot!

  • 3 Contributors
  • 3 Replies
  • 173 Views
  • 2 Years Discussion Span
  • Latest Post Latest Post by lhxndd

Recommended Answers

All 3 Replies

Member Avatar for lhxndd

You have tried to activate the Source Data and assign it to the "myrange" array, but the "myrange" array is just the range only, it should there be VALUE of the range!

commented: Rather late than never, thanks.:) +6
Member Avatar for AndreRet

I'm sure the OP has found a solution since 2008, but no harm in adding an answer since there was no solution posted, thanks lhxndd.:)

Member Avatar for lhxndd

I don't know whether or not yilin2008 could have found the solution for this, so I posted the solution for him!
Anyway, thanks everyone!

Do not hesitate to contact me and post question to daniweb.com. Thanks again!

My gmail is: [email snipped]

Edited by WaltP because: Never post email messages on the forums
Be a part of the DaniWeb community

We're a friendly, industry-focused community of developers, IT pros, digital marketers, and technology enthusiasts meeting, networking, learning, and sharing knowledge.