Prev Previous Post   Next Post Next
  #1   Report Post  
Brent E
 
Posts: n/a
Default VBA Question

Good morning everybody,

I noticed that periodically, code (specifically macro code in
Excel) that was working flawlessly in the past suddenly starts to error out.
For example, in making a line-graph, macro code will add data series to a
chart and assign values but suddenly it draws an error when it hits code to
name the data series. But if I move that line of code above the line in front
of it and rerun the procedure that line works fine but then it errors out on
the data series a couple lines down so I don't think the problem is the code.
This is some example code.

Charts.Add
ActiveChart.ChartType = xlLine
ActiveChart.SetSourceData Source:=Sheets("TRAD FEES EMPLOYEE
STATS").Range( _
"B2"), PlotBy:=xlRows
ActiveChart.SeriesCollection.NewSeries
ActiveChart.SeriesCollection.NewSeries
ActiveChart.SeriesCollection.NewSeries
ActiveChart.SeriesCollection.NewSeries
ActiveChart.SeriesCollection.NewSeries

ActiveChart.SeriesCollection(1).XValues = _
"={""JAN"","" FEB"","" MAR"","" APR"","" MAY"","" JUN"","" JUL"",""
AUG"","" SEP"","" OCT"","" NOV"","" DEC""}"
ActiveChart.SeriesCollection(3).Name = "=""Riverside"""
ActiveChart.SeriesCollection(4).Values = _
"='TRAD EXPENSES_EMPLOYEE_STATS'!R3C39:R3C50"
ActiveChart.SeriesCollection(2).Name = "=""Corona"""
ActiveChart.SeriesCollection(1).Values = "='TRAD
EXPENSES_EMPLOYEE_STATS'!R3C2:R3C13"
ActiveChart.SeriesCollection(1).Name = "=""Anaheim Hills"""
ActiveChart.SeriesCollection(2).XValues = _
"={""JAN"","" FEB"","" MAR"","" APR"","" MAY"","" JUN"","" JUL"",""
AUG"","" SEP"","" OCT"","" NOV"","" DEC""}"
ActiveChart.SeriesCollection(4).Name = "=""Moreno Valley"""
ActiveChart.SeriesCollection(2).Values = _
"='TRAD EXPENSES_EMPLOYEE_STATS'!R3C51:R3C62"
ActiveChart.SeriesCollection(5).Name = "=""Yorba Linda"""

ActiveChart.SeriesCollection(3).Values = _
"='TRAD EXPENSES_EMPLOYEE_STATS'!R3C27:R3C38"

These data series were in sequential order mostly except when the errors
started occuring I move some of them around to see if that effected the error
so now they aren't in order. I currently get an error on line:

ActiveChart.SeriesCollection(4).Name = "=""Moreno Valley"""

but this error was occuring on this line before I moved this up a few lines:
ActiveChart.SeriesCollection(2).Name = "=""Corona"""


Why is this erroring out? I believe this is because of some sort of data
corruption, but I am not sure what is causing the data corruptions, and is
there any way to rebuild the flawed data or recompile so that I don't have to
rewrite the entire thing or record a macro all over again to rebuild? Thanks.

Cordially,

 
Thread Tools Search this Thread
Search this Thread:

Advanced Search
Display Modes

Posting Rules

Smilies are On
[IMG] code is On
HTML code is Off
Trackbacks are On
Pingbacks are On
Refbacks are On


Similar Threads
Thread Thread Starter Forum Replies Last Post
Inserting Rows w/formulas question Buckwheat Excel Worksheet Functions 4 May 7th 05 10:05 PM
Hints And Tips For New Posters In The Excel Newsgroups Gary Brown Excel Worksheet Functions 0 April 15th 05 05:47 PM
Question about combining data from multiple workbooks into one rep BookOpenandUpright Excel Discussion (Misc queries) 2 February 19th 05 12:37 PM
An easy macro question and one I believe to be a little more diffi TroutKing Excel Worksheet Functions 3 January 18th 05 09:17 PM
conditional formatting question chris Excel Worksheet Functions 2 January 5th 05 03:51 PM


All times are GMT +1. The time now is 02:16 PM.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
Copyright ©2004-2025 ExcelBanter.
The comments are property of their posters.
 

About Us

"It's about Microsoft Excel"