Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Changing the font size in the charts
Hi,
In a spreadsheet i have, some 20 charts along with the data. I have to reduce the font size for the x and y axis and the title. For one chart i can use the active chart method to achieve. Please tell me, how i can loop through all the charts in the sheets and reduce the fonts. Please help. Thanks, Navin |
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
Changing the font size in the charts
Navin,
Maybe something like this. It sets the font size of tick labels and axis titles to 8. Sub Test() Dim sht As Worksheet Dim chtObject As ChartObject Dim cht As Chart For Each sht In Worksheets For Each chtObject In sht.ChartObjects Set cht = chtObject.Chart With cht.Axes(xlCategory) .TickLabels.Font.Size = 8 .AxisTitle.Font.Size = 8 End With With cht.Axes(xlValue) .TickLabels.Font.Size = 8 .AxisTitle.Font.Size = 8 End With Next chtObject Next sht -- Hope that helps. Vergel Adriano "navin" wrote: Hi, In a spreadsheet i have, some 20 charts along with the data. I have to reduce the font size for the x and y axis and the title. For one chart i can use the active chart method to achieve. Please tell me, how i can loop through all the charts in the sheets and reduce the fonts. Please help. Thanks, Navin |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
Changing Font color based on font type or size | Excel Discussion (Misc queries) | |||
Combo Box font size in Charts | Charts and Charting in Excel | |||
Font Size for Values in Charts | Charts and Charting in Excel | |||
automatically changing font size | Excel Programming | |||
set datalabel font size for all charts in a row | Excel Programming |