ExcelBanter

ExcelBanter (https://www.excelbanter.com/)
-   Excel Programming (https://www.excelbanter.com/excel-programming/)
-   -   Print a Chart worksheet (https://www.excelbanter.com/excel-programming/415901-print-chart-worksheet.html)

miek

Print a Chart worksheet
 
I have the following code that falls on it face.
The chart gets built like:

Charts.Add
ActiveChart.ChartType = xlColumnClustered
....
ActiveChart.Location Whe=xlLocationAsNewSheet, Name:="MyChart"

When I try to print with the below code I recieve a Run-time error 1004
"unable to get the chartobject propertyof the ws class" on the .Activate line

ActiveSheet.ChartObjects("MyChart").Activate
ActiveSheet.PrintOut

Thanks for your help

joel

Print a Chart worksheet
 
Check to make sure the Chart Sheet Tab on the bottom of the sheet matches the
code. Excel renames charts after the Adds statement.

A chart has one name when its created with the ADD and then changes names
when the location statment is executed. I've seen this happen with excel
2003.

"miek" wrote:

I have the following code that falls on it face.
The chart gets built like:

Charts.Add
ActiveChart.ChartType = xlColumnClustered
....
ActiveChart.Location Whe=xlLocationAsNewSheet, Name:="MyChart"

When I try to print with the below code I recieve a Run-time error 1004
"unable to get the chartobject propertyof the ws class" on the .Activate line

ActiveSheet.ChartObjects("MyChart").Activate
ActiveSheet.PrintOut

Thanks for your help


miek

Print a Chart worksheet
 
I right clicked on the WS tab and copied the tab name and placed this value
in the:
ActiveSheet.ChartObjects("MyChart").Activate code line

"Joel" wrote:

Check to make sure the Chart Sheet Tab on the bottom of the sheet matches the
code. Excel renames charts after the Adds statement.

A chart has one name when its created with the ADD and then changes names
when the location statment is executed. I've seen this happen with excel
2003.

"miek" wrote:

I have the following code that falls on it face.
The chart gets built like:

Charts.Add
ActiveChart.ChartType = xlColumnClustered
....
ActiveChart.Location Whe=xlLocationAsNewSheet, Name:="MyChart"

When I try to print with the below code I recieve a Run-time error 1004
"unable to get the chartobject propertyof the ws class" on the .Activate line

ActiveSheet.ChartObjects("MyChart").Activate
ActiveSheet.PrintOut

Thanks for your help


joel

Print a Chart worksheet
 
Did it Work?

The statement
ActiveSheet.ChartObjects("MyChart").Activate

Is not needed to print the chart. You are printing a sheet
(ActiveSheet.PrintOut) not the object on the sheet. To find the name of the
Chart Object Manually Activate the chart with the mouse and look at the box
left of the f(x).

"Joel" wrote:

Check to make sure the Chart Sheet Tab on the bottom of the sheet matches the
code. Excel renames charts after the Adds statement.

A chart has one name when its created with the ADD and then changes names
when the location statment is executed. I've seen this happen with excel
2003.

"miek" wrote:

I have the following code that falls on it face.
The chart gets built like:

Charts.Add
ActiveChart.ChartType = xlColumnClustered
....
ActiveChart.Location Whe=xlLocationAsNewSheet, Name:="MyChart"

When I try to print with the below code I recieve a Run-time error 1004
"unable to get the chartobject propertyof the ws class" on the .Activate line

ActiveSheet.ChartObjects("MyChart").Activate
ActiveSheet.PrintOut

Thanks for your help


miek

Print a Chart worksheet
 
No, I get the same results

"Joel" wrote:

Did it Work?

The statement
ActiveSheet.ChartObjects("MyChart").Activate

Is not needed to print the chart. You are printing a sheet
(ActiveSheet.PrintOut) not the object on the sheet. To find the name of the
Chart Object Manually Activate the chart with the mouse and look at the box
left of the f(x).

"Joel" wrote:

Check to make sure the Chart Sheet Tab on the bottom of the sheet matches the
code. Excel renames charts after the Adds statement.

A chart has one name when its created with the ADD and then changes names
when the location statment is executed. I've seen this happen with excel
2003.

"miek" wrote:

I have the following code that falls on it face.
The chart gets built like:

Charts.Add
ActiveChart.ChartType = xlColumnClustered
....
ActiveChart.Location Whe=xlLocationAsNewSheet, Name:="MyChart"

When I try to print with the below code I recieve a Run-time error 1004
"unable to get the chartobject propertyof the ws class" on the .Activate line

ActiveSheet.ChartObjects("MyChart").Activate
ActiveSheet.PrintOut

Thanks for your help


miek

Print a Chart worksheet
 
I've also tried:
Worksheets("MyChart").ChartObjects.Activate
I get "run-time error 9, subscript out of range"

"Joel" wrote:

Did it Work?

The statement
ActiveSheet.ChartObjects("MyChart").Activate

Is not needed to print the chart. You are printing a sheet
(ActiveSheet.PrintOut) not the object on the sheet. To find the name of the
Chart Object Manually Activate the chart with the mouse and look at the box
left of the f(x).

"Joel" wrote:

Check to make sure the Chart Sheet Tab on the bottom of the sheet matches the
code. Excel renames charts after the Adds statement.

A chart has one name when its created with the ADD and then changes names
when the location statment is executed. I've seen this happen with excel
2003.

"miek" wrote:

I have the following code that falls on it face.
The chart gets built like:

Charts.Add
ActiveChart.ChartType = xlColumnClustered
....
ActiveChart.Location Whe=xlLocationAsNewSheet, Name:="MyChart"

When I try to print with the below code I recieve a Run-time error 1004
"unable to get the chartobject propertyof the ws class" on the .Activate line

ActiveSheet.ChartObjects("MyChart").Activate
ActiveSheet.PrintOut

Thanks for your help


joel

Print a Chart worksheet
 
I did some testing. when yo place a Chart on a New Sheet there is no
Chartobject. Remove the line! You only get chart objects when a chart is
placed on a worksheet, not on a sheet by itself.

"miek" wrote:

I've also tried:
Worksheets("MyChart").ChartObjects.Activate
I get "run-time error 9, subscript out of range"

"Joel" wrote:

Did it Work?

The statement
ActiveSheet.ChartObjects("MyChart").Activate

Is not needed to print the chart. You are printing a sheet
(ActiveSheet.PrintOut) not the object on the sheet. To find the name of the
Chart Object Manually Activate the chart with the mouse and look at the box
left of the f(x).

"Joel" wrote:

Check to make sure the Chart Sheet Tab on the bottom of the sheet matches the
code. Excel renames charts after the Adds statement.

A chart has one name when its created with the ADD and then changes names
when the location statment is executed. I've seen this happen with excel
2003.

"miek" wrote:

I have the following code that falls on it face.
The chart gets built like:

Charts.Add
ActiveChart.ChartType = xlColumnClustered
....
ActiveChart.Location Whe=xlLocationAsNewSheet, Name:="MyChart"

When I try to print with the below code I recieve a Run-time error 1004
"unable to get the chartobject propertyof the ws class" on the .Activate line

ActiveSheet.ChartObjects("MyChart").Activate
ActiveSheet.PrintOut

Thanks for your help


miek

Print a Chart worksheet
 
If I have the code line:
Worksheets("A1 sum Chart").Activate
I get: "run-time error 9, subscript out of range"


"Joel" wrote:

I did some testing. when yo place a Chart on a New Sheet there is no
Chartobject. Remove the line! You only get chart objects when a chart is
placed on a worksheet, not on a sheet by itself.

"miek" wrote:

I've also tried:
Worksheets("MyChart").ChartObjects.Activate
I get "run-time error 9, subscript out of range"

"Joel" wrote:

Did it Work?

The statement
ActiveSheet.ChartObjects("MyChart").Activate

Is not needed to print the chart. You are printing a sheet
(ActiveSheet.PrintOut) not the object on the sheet. To find the name of the
Chart Object Manually Activate the chart with the mouse and look at the box
left of the f(x).

"Joel" wrote:

Check to make sure the Chart Sheet Tab on the bottom of the sheet matches the
code. Excel renames charts after the Adds statement.

A chart has one name when its created with the ADD and then changes names
when the location statment is executed. I've seen this happen with excel
2003.

"miek" wrote:

I have the following code that falls on it face.
The chart gets built like:

Charts.Add
ActiveChart.ChartType = xlColumnClustered
....
ActiveChart.Location Whe=xlLocationAsNewSheet, Name:="MyChart"

When I try to print with the below code I recieve a Run-time error 1004
"unable to get the chartobject propertyof the ws class" on the .Activate line

ActiveSheet.ChartObjects("MyChart").Activate
ActiveSheet.PrintOut

Thanks for your help


joel

Print a Chart worksheet
 
There is a different between sheets and worksheets. Worksheets are only
formula sheets. Sheets include Formulas sheets and graphs

Sheets("A1 sum Chart").Activate

"miek" wrote:

If I have the code line:
Worksheets("A1 sum Chart").Activate
I get: "run-time error 9, subscript out of range"


"Joel" wrote:

I did some testing. when yo place a Chart on a New Sheet there is no
Chartobject. Remove the line! You only get chart objects when a chart is
placed on a worksheet, not on a sheet by itself.

"miek" wrote:

I've also tried:
Worksheets("MyChart").ChartObjects.Activate
I get "run-time error 9, subscript out of range"

"Joel" wrote:

Did it Work?

The statement
ActiveSheet.ChartObjects("MyChart").Activate

Is not needed to print the chart. You are printing a sheet
(ActiveSheet.PrintOut) not the object on the sheet. To find the name of the
Chart Object Manually Activate the chart with the mouse and look at the box
left of the f(x).

"Joel" wrote:

Check to make sure the Chart Sheet Tab on the bottom of the sheet matches the
code. Excel renames charts after the Adds statement.

A chart has one name when its created with the ADD and then changes names
when the location statment is executed. I've seen this happen with excel
2003.

"miek" wrote:

I have the following code that falls on it face.
The chart gets built like:

Charts.Add
ActiveChart.ChartType = xlColumnClustered
....
ActiveChart.Location Whe=xlLocationAsNewSheet, Name:="MyChart"

When I try to print with the below code I recieve a Run-time error 1004
"unable to get the chartobject propertyof the ws class" on the .Activate line

ActiveSheet.ChartObjects("MyChart").Activate
ActiveSheet.PrintOut

Thanks for your help


miek

Print a Chart worksheet
 
Thanks for the help and the claification. This worked.

Best regards

"Joel" wrote:

There is a different between sheets and worksheets. Worksheets are only
formula sheets. Sheets include Formulas sheets and graphs

Sheets("A1 sum Chart").Activate

"miek" wrote:

If I have the code line:
Worksheets("A1 sum Chart").Activate
I get: "run-time error 9, subscript out of range"


"Joel" wrote:

I did some testing. when yo place a Chart on a New Sheet there is no
Chartobject. Remove the line! You only get chart objects when a chart is
placed on a worksheet, not on a sheet by itself.

"miek" wrote:

I've also tried:
Worksheets("MyChart").ChartObjects.Activate
I get "run-time error 9, subscript out of range"

"Joel" wrote:

Did it Work?

The statement
ActiveSheet.ChartObjects("MyChart").Activate

Is not needed to print the chart. You are printing a sheet
(ActiveSheet.PrintOut) not the object on the sheet. To find the name of the
Chart Object Manually Activate the chart with the mouse and look at the box
left of the f(x).

"Joel" wrote:

Check to make sure the Chart Sheet Tab on the bottom of the sheet matches the
code. Excel renames charts after the Adds statement.

A chart has one name when its created with the ADD and then changes names
when the location statment is executed. I've seen this happen with excel
2003.

"miek" wrote:

I have the following code that falls on it face.
The chart gets built like:

Charts.Add
ActiveChart.ChartType = xlColumnClustered
....
ActiveChart.Location Whe=xlLocationAsNewSheet, Name:="MyChart"

When I try to print with the below code I recieve a Run-time error 1004
"unable to get the chartobject propertyof the ws class" on the .Activate line

ActiveSheet.ChartObjects("MyChart").Activate
ActiveSheet.PrintOut

Thanks for your help



All times are GMT +1. The time now is 02:03 AM.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
ExcelBanter.com