Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.charting
|
|||
|
|||
Pivot Table - Change / Format Legend Names
I created a pivot table graph. I have a ranking field that appear
concatenated like {color} 1 - Confused {color} 2 - Ugh I need to change to {color} Confused {color} Ugh Using this code below, I can format the string but the Name is not updating Dim m as Integer Dim strmk As String Dim iLen As Integer For m = 1 To ActiveChart.SeriesCollection.Count iLen = Len(ActiveChart.SeriesCollection(m).Name) strmk = (Mid(ActiveChart.SeriesCollection(m).Name, 4, iLen)) ActiveChart.SeriesCollection(m).Name = "bob" Next m |
#2
Posted to microsoft.public.excel.charting
|
|||
|
|||
Pivot Table - Change / Format Legend Names
Excel 2007 PivotTable, PivotChart
Change the PT data headers instead: Sub NameChange() Dim s As String Dim n As Integer With ActiveSheet.PivotTables(1) For n = 1 To .DataFields.Count s = .DataFields(n).Name s = Replace(s, "Sum of ", "_") ..DataFields(n).Name = s Next n End With End Sub |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
Mass format change of 'data' in pivot table | Excel Discussion (Misc queries) | |||
Pivot Table Chart Legend | Charts and Charting in Excel | |||
DATE FORMAT CHANGE FROM EXCEL WORKSHEET TO PIVOT TABLE | Excel Discussion (Misc queries) | |||
Change Names of Legend | Charts and Charting in Excel | |||
pivot table format change | Excel Discussion (Misc queries) |