Give a Christmas Look to your Charts
If you want to give Christmas look or use custom shapes instead of in-built markers on charts. Snapshot below-
Download Working File/Macro - https://www.box.com/s/02sfon6jloo7lpaj3s6c
Steps to use -
Download the working File
=> Goto “Data” sheet . Change chart data as per your requirement , series name,etc.
=> Add custom shapes to excel sheet which you would like to show instead of markers
=> Re size the shapes as per your requirement
=> Update the table in Col L and M on data sheet
=> Go to "Chart" sheet and click on Custom Markers
Macro used to create Custom Markers -
Sub paste_custom_images_markers()
Dim srs As Series, j As Long, found As Range
For Each srs In Sheets(“Chart”).ChartObjects("Chart 1?).Chart.SeriesCollection
Set found = Sheets(“Data”).Range(“l:l”).Find(srs.Name, LookIn:=xlValues)
If Not found Is Nothing Then
j = found.Row
Sheets("Data").Shapes(Sheets(“Data”).Range("m" & j)).Copy
Sheets("Chart").ChartObjects(“Chart 1?).Activate
srs.Select
Selection.Paste
End If
Next
End Sub
To Know more Visit - http://www.excelvbamacros.com/2012/12/macro-to-replace-markers-with-cust...
- Ashish Koul's blog
- Login or register to post comments
- 3210 reads
Recent comments
5 years 36 weeks ago
6 years 22 weeks ago
6 years 34 weeks ago
6 years 37 weeks ago
6 years 38 weeks ago
6 years 43 weeks ago
6 years 52 weeks ago
7 years 2 days ago
7 years 3 days ago
7 years 3 days ago