software

I have searched these boards, and am still without a good solution. Hoping
you can help.

I am aware of add in programs that will achieve this result, but I don't
have that option because of the number of users I have, and permissions to
install on our network. (sucks) I found this item in the microsoft support
pages and am trying to apply the macro in the example.

support.microsoft.com/default...b;en-us;213750

Everything works fine, the lables attach to the data points as expected, but
I get quot;Run-time error '1004': Unable to set the HasDataLabel property of
the Point classquot; when I run the macro. I click end, and the data points show
up.

I don't want to release this spreasheet to users until this issue is worked
out. Any ideas why this is happening, or do you know how to close that run
time error window with VBA?

Thanks so much,

Scott Wagner

For some reason, does the particular point that crashes not appear in the
chart, because it's not a plottable value? Such as #N/A or a blank? Since
the point isn't plotted, you can't apply a data label.

You could insert some error evasion code:

For Counter = 1 To Range(xVals).Cells.Count
On Error Resume Next
ActiveChart.SeriesCollection(1).Points(Counter).Ha sDataLabel = _
True
ActiveChart.SeriesCollection(1).Points(Counter).Da taLabel.Text = _
Range(xVals).Cells(Counter, 1).Offset(0, -1).Value
On Error Goto 0
Next Counter

- Jon
-------
Jon Peltier, Microsoft Excel MVP
Peltier Technical Services
Tutorials and Custom Solutions
PeltierTech.com/
_______quot;Scott Wagnerquot; gt; wrote in message
...
gt;I have searched these boards, and am still without a good solution. Hoping
gt; you can help.
gt;
gt; I am aware of add in programs that will achieve this result, but I don't
gt; have that option because of the number of users I have, and permissions to
gt; install on our network. (sucks) I found this item in the microsoft
gt; support
gt; pages and am trying to apply the macro in the example.
gt;
gt; support.microsoft.com/default...b;en-us;213750
gt;
gt; Everything works fine, the lables attach to the data points as expected,
gt; but
gt; I get quot;Run-time error '1004': Unable to set the HasDataLabel property of
gt; the Point classquot; when I run the macro. I click end, and the data points
gt; show
gt; up.
gt;
gt; I don't want to release this spreasheet to users until this issue is
gt; worked
gt; out. Any ideas why this is happening, or do you know how to close that
gt; run
gt; time error window with VBA?
gt;
gt; Thanks so much,
gt;
gt; Scott Wagner
That works perfectly!

Thanks!

quot;Jon Peltierquot; wrote:

gt; For some reason, does the particular point that crashes not appear in the
gt; chart, because it's not a plottable value? Such as #N/A or a blank? Since
gt; the point isn't plotted, you can't apply a data label.
gt;
gt; You could insert some error evasion code:
gt;
gt; For Counter = 1 To Range(xVals).Cells.Count
gt; On Error Resume Next
gt; ActiveChart.SeriesCollection(1).Points(Counter).Ha sDataLabel = _
gt; True
gt; ActiveChart.SeriesCollection(1).Points(Counter).Da taLabel.Text = _
gt; Range(xVals).Cells(Counter, 1).Offset(0, -1).Value
gt; On Error Goto 0
gt; Next Counter
gt;
gt; - Jon
gt; -------
gt; Jon Peltier, Microsoft Excel MVP
gt; Peltier Technical Services
gt; Tutorials and Custom Solutions
gt; PeltierTech.com/
gt; _______
gt;
gt;
gt; quot;Scott Wagnerquot; gt; wrote in message
gt; ...
gt; gt;I have searched these boards, and am still without a good solution. Hoping
gt; gt; you can help.
gt; gt;
gt; gt; I am aware of add in programs that will achieve this result, but I don't
gt; gt; have that option because of the number of users I have, and permissions to
gt; gt; install on our network. (sucks) I found this item in the microsoft
gt; gt; support
gt; gt; pages and am trying to apply the macro in the example.
gt; gt;
gt; gt; support.microsoft.com/default...b;en-us;213750
gt; gt;
gt; gt; Everything works fine, the lables attach to the data points as expected,
gt; gt; but
gt; gt; I get quot;Run-time error '1004': Unable to set the HasDataLabel property of
gt; gt; the Point classquot; when I run the macro. I click end, and the data points
gt; gt; show
gt; gt; up.
gt; gt;
gt; gt; I don't want to release this spreasheet to users until this issue is
gt; gt; worked
gt; gt; out. Any ideas why this is happening, or do you know how to close that
gt; gt; run
gt; gt; time error window with VBA?
gt; gt;
gt; gt; Thanks so much,
gt; gt;
gt; gt; Scott Wagner
gt;
gt;
gt;