Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
excel vba problem
Hi All,
I'm trying, using a VBA macro, to set the ChartArea.Height property of an Excel Graph object but I'm getting the following error: Run-time error '1004': Unable to set the Height of the ChartArea class According to the MSDN documentation the Width is a read-write My code is below. If anyone can shed some light on this it would be greatly appreciated. I'm using Excel Small Business 2003 Regards, Patrick Sub Macro1() '' Dim hauteur As Double ' hauteur = 400# ActiveSheet.ChartObjects("Graphique 1").Activate ActiveChart.ChartArea.Select ActiveChart.ChartArea.Height = hauteur End Sub |
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
excel vba problem
why not just set the height of the ChartObject
ActiveSheet.ChartObjects("Graphique 1").Height = hauteur + 5 -- Regards, Tom Ogilvy "Patrick Elhorga" wrote in message ... Hi All, I'm trying, using a VBA macro, to set the ChartArea.Height property of an Excel Graph object but I'm getting the following error: Run-time error '1004': Unable to set the Height of the ChartArea class According to the MSDN documentation the Width is a read-write My code is below. If anyone can shed some light on this it would be greatly appreciated. I'm using Excel Small Business 2003 Regards, Patrick Sub Macro1() '' Dim hauteur As Double ' hauteur = 400# ActiveSheet.ChartObjects("Graphique 1").Activate ActiveChart.ChartArea.Select ActiveChart.ChartArea.Height = hauteur End Sub |
#3
Posted to microsoft.public.excel.programming
|
|||
|
|||
excel vba problem
I use the following in my own chart formatting routine ...
------------------------------------------------------ 'Place and Resize Chart Area With ActiveSheet.ChartObjects(chtIndex) .Activate .Height = 250 .Width = 350 .Placement = xlFreeFloating .PrintObject = True .Locked = True End With ------------------------------------------------ Note that the Height property is set using the ChartObjects object, not the ChartArea object. Regards, Jim "Patrick Elhorga" wrote: Hi All, I'm trying, using a VBA macro, to set the ChartArea.Height property of an Excel Graph object but I'm getting the following error: Run-time error '1004': Unable to set the Height of the ChartArea class According to the MSDN documentation the Width is a read-write My code is below. If anyone can shed some light on this it would be greatly appreciated. I'm using Excel Small Business 2003 Regards, Patrick Sub Macro1() '' Dim hauteur As Double ' hauteur = 400# ActiveSheet.ChartObjects("Graphique 1").Activate ActiveChart.ChartArea.Select ActiveChart.ChartArea.Height = hauteur End Sub |
#4
Posted to microsoft.public.excel.programming
|
|||
|
|||
excel vba problem
Thanks a lot but this only works for chartobjects within a sheet
my problem concerns also charts within graph sheets where there is no chartobjects in this case it seems that I must use the "ActiveChart.ChartArea" object and its height/width is not writable -- Patrick. Elhorga ) Project Manager Geosciences Software Division Beicip Franlab tel: 33 (0)5 59 80 18 75 fax: 33 (0)5 59 84 42 96 ___________________________________ Visit our Web site at http://www.beicip.com/ "Tom Ogilvy" a écrit dans le message de news: ... why not just set the height of the ChartObject ActiveSheet.ChartObjects("Graphique 1").Height = hauteur + 5 -- Regards, Tom Ogilvy "Patrick Elhorga" wrote in message ... Hi All, I'm trying, using a VBA macro, to set the ChartArea.Height property of an Excel Graph object but I'm getting the following error: Run-time error '1004': Unable to set the Height of the ChartArea class According to the MSDN documentation the Width is a read-write My code is below. If anyone can shed some light on this it would be greatly appreciated. I'm using Excel Small Business 2003 Regards, Patrick Sub Macro1() '' Dim hauteur As Double ' hauteur = 400# ActiveSheet.ChartObjects("Graphique 1").Activate ActiveChart.ChartArea.Select ActiveChart.ChartArea.Height = hauteur End Sub |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
Colon at the end of excel file name(ex: problem.xls:1, problem.xls | New Users to Excel | |||
Problem viewing Excel 2003 Pivot Chart fields in Excel 2007 | Charts and Charting in Excel | |||
Weird problem with Excel 2000...Worksheets disappearing in a shared Excel file | Excel Discussion (Misc queries) | |||
Started out as an Access problem. Now an Excel problem | Excel Discussion (Misc queries) | |||
Excel 97 chart opened in Excel 2003 - Source Data problem | Charts and Charting in Excel |