Home |
Search |
Today's Posts |
#5
![]() |
|||
|
|||
![]()
Thank you very much! :)
"John Mansfield" wrote: Kim, adding to Andy's note . . . This macro will size all of the charts on the active sheet to the same height and width. It also lines each chart up to a vertical left side border. To change the sizes of the charts, make changes to the height and width numbers. If you only want the macro to size the charts the same without aligning them, put an apostrophe ( ) in from of the ChtObj.Left = 100 line. To copy the macro into your workbook, go to Tools - Macro - Visual Basic Editor. In the toolbar, go to Insert - Module. Copy the macro into the new code module. When youve completed copying the macro into the module, go back to the toolbar and hit File - Close to get back to the spreadsheet. Sub SizeCharts() Dim ChtObj As ChartObject If ActiveChart Is Nothing Then MsgBox "Click on a chart and then run macro" For Each ChtObj In ActiveSheet.ChartObjects ChtObj.Left = 100 ChtObj.Width = 336 ChtObj.Height = 204 Next ChtObj End Sub To run the macro, click on a chart and go to Tools - Macro - Macros - and run the macro called SizeCharts. ---- Regards, John Mansfield http://www.pdbook.com "Kim" wrote: I have 9 charts on one legal size area and would like all of them to be exactly the same size. If you drag the charts, they still look off balance. Is there a way to enter specific sizes? Thank you!! |
Thread Tools | Search this Thread |
Display Modes | |
|
|
![]() |
||||
Thread | Forum | |||
xl chart font sizing into PPT | Charts and Charting in Excel | |||
How do I change the size of the text box in a flow chart? | Charts and Charting in Excel | |||
Impedding/Overlaying Charts | Charts and Charting in Excel | |||
pivot table multi line chart | Charts and Charting in Excel | |||
export chart - size problem | Charts and Charting in Excel |