Is there a way of attaching data labels from a text range to data markers in
xy plot chart. I'm sure I could do it in Lotus 123
Is there a way of attaching data labels from a text range to data markers in
xy plot chart. I'm sure I could do it in Lotus 123
You can use Rob Bovey's XY Chart Labeler to add labels. It's a free
add-in that you can download from his web site:
http://www.appspro.com/Utilities/ChartLabeler.htm
Peter Sailing by wrote:
> Is there a way of attaching data labels from a text range to data markers in
> xy plot chart. I'm sure I could do it in Lotus 123
--
Debra Dalgleish
Excel FAQ, Tips & Book List
http://www.contextures.com/tiptech.html
In addition to the chart labeler that Deborah noted, you can also use this
macro if for some reason you don't want/need to install an add-in:
Sub AddLabels()
Dim RngLabels As Range
Dim Ser As Series
Dim i As Long
If TypeName(Selection) = "Series" Then
Set Ser = Selection
Set RngLabels = Application.InputBox(prompt:="Select the label
range:", Type:=8)
Ser.HasDataLabels = True
For i = 1 To Ser.Points.Count
Ser.Points(i).DataLabel.Text = RngLabels(i)
Next i
Else
MsgBox "Select a series in a chart."
End If
End Sub
Add the macro to a standard module. Select the chart and then run the
macro. In the dialog box, add the reference to the data source like
"Sheet1!A1:A5".
----
Regards,
John Mansfield
http://www.pdbook.com
"Peter Sailing by" wrote:
> Is there a way of attaching data labels from a text range to data markers in
> xy plot chart. I'm sure I could do it in Lotus 123
If you go with the John (as in Mansfield) solution do keep in mind it
is a one-off approach. It uses the current value in the range but
doesn't link the datalabel to the cell.
--
Regards,
Tushar Mehta
www.tushar-mehta.com
Excel, PowerPoint, and VBA add-ins, tutorials
Custom MS Office productivity solutions
In article <[email protected]>,
[email protected] says...
> In addition to the chart labeler that Deborah noted, you can also use this
> macro if for some reason you don't want/need to install an add-in:
>
> Sub AddLabels()
> Dim RngLabels As Range
> Dim Ser As Series
> Dim i As Long
> If TypeName(Selection) = "Series" Then
> Set Ser = Selection
> Set RngLabels = Application.InputBox(prompt:="Select the label
> range:", Type:=8)
> Ser.HasDataLabels = True
> For i = 1 To Ser.Points.Count
> Ser.Points(i).DataLabel.Text = RngLabels(i)
> Next i
> Else
> MsgBox "Select a series in a chart."
> End If
> End Sub
>
> Add the macro to a standard module. Select the chart and then run the
> macro. In the dialog box, add the reference to the data source like
> "Sheet1!A1:A5".
> ----
> Regards,
> John Mansfield
> http://www.pdbook.com
>
>
> "Peter Sailing by" wrote:
>
> > Is there a way of attaching data labels from a text range to data markers in
> > xy plot chart. I'm sure I could do it in Lotus 123
>
There are currently 1 users browsing this thread. (0 members and 1 guests)
Bookmarks