Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
How to deteremine the number of trendline in chart?
Hi, I have a lot of charts (say ~110 charts) and would like to delete
all the trendline. However, the number of each chart may not be same. Therefore, I need to determine the number of trendline by every chart. Can commend to do it? |
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
How to deteremine the number of trendline in chart?
This procedure will remove all trendlines in all embedded charts and
chart sheets in the active workbook: Sub KillTrendlines() Dim sh As Object Dim chtob As ChartObject Dim cht As Chart Dim srs As Series Dim tr As Trendline For Each sh In ActiveWorkbook.Sheets For Each chtob In ws.ChartObjects For Each srs In chtob.Chart.SeriesCollection For Each tr In srs.Trendlines tr.Delete Next Next Next Next For Each cht In ActiveWorkbook.Charts For Each srs In cht.SeriesCollection For Each tr In srs.Trendlines tr.Delete Next Next Next End Sub - Jon ------- Jon Peltier Peltier Technical Services, Inc. http://peltiertech.com/ Danny wrote: Hi, I have a lot of charts (say ~110 charts) and would like to delete all the trendline. However, the number of each chart may not be same. Therefore, I need to determine the number of trendline by every chart. Can commend to do it? |
#3
Posted to microsoft.public.excel.programming
|
|||
|
|||
How to deteremine the number of trendline in chart?
On Oct 22, 6:32*am, Jon Peltier wrote:
This procedure will remove all trendlines in all embedded charts and chart sheets in the active workbook: Sub KillTrendlines() * *Dim sh As Object * *Dim chtob As ChartObject * *Dim cht As Chart * *Dim srs As Series * *Dim tr As Trendline * *For Each sh In ActiveWorkbook.Sheets * * *For Each chtob In ws.ChartObjects * * * *For Each srs In chtob.Chart.SeriesCollection * * * * *For Each tr In srs.Trendlines * * * * * *tr.Delete * * * * *Next * * * *Next * * *Next * *Next * *For Each cht In ActiveWorkbook.Charts * * *For Each srs In cht.SeriesCollection * * * *For Each tr In srs.Trendlines * * * * *tr.Delete * * * *Next * * *Next * *Next End Sub - Jon ------- Jon Peltier Peltier Technical Services, Inc.http://peltiertech.com/ Danny wrote: Hi, I have a lot of charts (say ~110 charts) and would like to delete all the trendline. However, the number of each chart may not be same. Therefore, I need to determine the number of trendline by every chart. Can commend to do it?- Hide quoted text - - Show quoted text - It works, Thanks. |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
average/trendline in chart | Charts and Charting in Excel | |||
No add a trendline under chart tab. | Excel Discussion (Misc queries) | |||
Pivot Chart trendline | Charts and Charting in Excel | |||
Trendline erases chart name | Charts and Charting in Excel | |||
R² expression for trendline in chart | Charts and Charting in Excel |