Looking for a dartboard type chart

[Guest]

I'm looking for a chart or graph that looks like a dartboard. I need to be
able to split the outside circle into 4 sections, the next circle into 4
sections and be able to put words in them. The inside sections need to be
split into 7 sections with words and a separate center bullseye. Any help is
appreciated. Using MS Office 2003. Thanks!

 

[Jon Peltier]

Vera -

You might be able to work something up using a Doughnut chart. This data
will give you 4 + 4 + 7 uniquely formatted segments:

inner middle outer
a 1
b 1
c 1
d 1
e 1
f 1
g 1
h 1
i 1
j 1
k 1
l 1
m 1
n 1
o 1

Double click on any of the segments to change its fill color. While in the
formatting dialog you can add a data label. Use the category name option to
display the labels in the first column. This also gives extra labels for the
blank cells, so you could use this macro to apply labels to the non-zero
items in the chart:

Sub RemoveLabelsFromBlanks()
Dim iSrs As Long
Dim iPt As Long
Dim vValues As Variant

If ActiveChart Is Nothing Then
MsgBox "Select a chart and try again", vbExclamation
Else
Application.ScreenUpdating = False
For iSrs = 1 To ActiveChart.SeriesCollection.Count
With ActiveChart.SeriesCollection(iSrs)
.ApplyDataLabels Type:=xlDataLabelsShowLabel
For iPt = 1 To .Points.Count
vValues = .Values
If vValues(iPt) <= 0 Then
.Points(iPt).HasDataLabel = False
End If
Next
End With
Next
Application.ScreenUpdating = True
End If

End Sub


- Jon