![]() |
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 |
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 |
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 |
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 |
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 |
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 |
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 |
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 |
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 |
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