The following typical code will crash Excel 2007 SP2 if the active sheet has
a large amount of data (I have in excess of 300 cols and 1000 rows)

Dim chObj as ChartObject
Set chObj = ActiveSheet.ChartObjects.Add(xLeft, xTop, xWidth, xHeight)

To solve the problem select a subset of the active sheet prior to creating
the chart.

ActiveSheet.Range("A1:A2").Select
Set chObj = ActiveSheet.ChartObjects.Add(xLeft, xTop, xWidth, xHeight)

This seems to produce a clean chart without any data series which can be
added later.

The other typical code for creating a chart with shapes has the same problem:

Dim MyChart as Chart
Set myChart = ActiveSheet.Shapes.AddChart(xLeft, xTop, xWidth, xHeight).Chart

and is corrected the same way

ActiveSheet.Range("A1:A2").Select
Set myChart = ActiveSheet.Shapes.AddChart(xLeft, xTop, xWidth, xHeight).Chart
myChart.SeriesCollection(1).Delete

Unfortunately, this method plots the selected data. The
SeriesCollection(1).Delete cleans the chart that is now ready to have the
data series added programmatically.

----------------
This post is a suggestion for Microsoft, and Microsoft responds to the
suggestions with the most votes. To vote for this suggestion, click the "I
Agree" button in the message pane. If you do not see the button, follow this
link to open the suggestion in the Microsoft Web-based Newsreader and then
click "I Agree" in the message pane.

http://www.microsoft.com/office/comm...excel.charting

From Excel 2007 Help (search with "specifications" )
QUOTE
Data series in one chart 255

Data points in a data series for 2-D charts 32,000

Data points in a data series for 3-D charts 4,000

Data points for all data series in one chart 256,000
END QUOTE
best wishes

--
Bernard V Liengme
Microsoft Excel MVP
http://people.stfx.ca/bliengme
remove caps from email


"cctrader2000" wrote in message
...
The following typical code will crash Excel 2007 SP2 if the active sheet
has
a large amount of data (I have in excess of 300 cols and 1000 rows)

Dim chObj as ChartObject
Set chObj = ActiveSheet.ChartObjects.Add(xLeft, xTop, xWidth, xHeight)

To solve the problem select a subset of the active sheet prior to creating
the chart.

ActiveSheet.Range("A1:A2").Select
Set chObj = ActiveSheet.ChartObjects.Add(xLeft, xTop, xWidth, xHeight)

This seems to produce a clean chart without any data series which can be
added later.

The other typical code for creating a chart with shapes has the same
problem:

Dim MyChart as Chart
Set myChart = ActiveSheet.Shapes.AddChart(xLeft, xTop, xWidth,
xHeight).Chart

and is corrected the same way

ActiveSheet.Range("A1:A2").Select
Set myChart = ActiveSheet.Shapes.AddChart(xLeft, xTop, xWidth,
xHeight).Chart
myChart.SeriesCollection(1).Delete

Unfortunately, this method plots the selected data. The
SeriesCollection(1).Delete cleans the chart that is now ready to have the
data series added programmatically.

----------------
This post is a suggestion for Microsoft, and Microsoft responds to the
suggestions with the most votes. To vote for this suggestion, click the "I
Agree" button in the message pane. If you do not see the button, follow
this
link to open the suggestion in the Microsoft Web-based Newsreader and then
click "I Agree" in the message pane.

http://www.microsoft.com/office/comm...excel.charting

Additional data to original post. From Microsoft site under Excel 2007
workshhet and workbook specifications and limits:
Open workbooks Limited by available memory and system resources
Worksheet size 1,048,576 rows by 16,384 columns
Column width 255 characters
Row height 409 points
Page breaks 1,026 horizontal and vertical
Total number of characters that a cell can contain 32,767 characters
Characters in a header or footer 255
Sheets in a workbook Limited by available memory (default is 3 sheets)


"cctrader2000" wrote:

The following typical code will crash Excel 2007 SP2 if the active sheet has
a large amount of data (I have in excess of 300 cols and 1000 rows)

Dim chObj as ChartObject
Set chObj = ActiveSheet.ChartObjects.Add(xLeft, xTop, xWidth, xHeight)

To solve the problem select a subset of the active sheet prior to creating
the chart.

ActiveSheet.Range("A1:A2").Select
Set chObj = ActiveSheet.ChartObjects.Add(xLeft, xTop, xWidth, xHeight)

This seems to produce a clean chart without any data series which can be
added later.

The other typical code for creating a chart with shapes has the same problem:

Dim MyChart as Chart
Set myChart = ActiveSheet.Shapes.AddChart(xLeft, xTop, xWidth, xHeight).Chart

and is corrected the same way

ActiveSheet.Range("A1:A2").Select
Set myChart = ActiveSheet.Shapes.AddChart(xLeft, xTop, xWidth, xHeight).Chart
myChart.SeriesCollection(1).Delete

Unfortunately, this method plots the selected data. The
SeriesCollection(1).Delete cleans the chart that is now ready to have the
data series added programmatically.

----------------
This post is a suggestion for Microsoft, and Microsoft responds to the
suggestions with the most votes. To vote for this suggestion, click the "I
Agree" button in the message pane. If you do not see the button, follow this
link to open the suggestion in the Microsoft Web-based Newsreader and then
click "I Agree" in the message pane.

http://www.microsoft.com/office/comm...excel.charting