ID: Q187757
The information in this article applies to:
When you display data labels on a chart, some of the data labels appear outside the plot area.
This problem occurs when the following conditions are true:
-and-
-or-
To work around this problem, use one of the following methods.
To work around this problem, delete the data value labels independently. To do this, follow these steps:
1. Click any one of the data value labels.
This step selects the entire data series.
2. Click any one of the data value labels that you want to delete.
By doing this you select a single data label.
3. On the Edit menu, point to clear and click All.
One data value label is deleted.
You must repeat this process for each data value label that you want to
delete.
Microsoft provides programming examples for illustration only, without warranty either expressed or implied, including, but not limited to, the implied warranties of merchantability and/or fitness for a particular purpose. This article assumes that you are familiar with the programming language being demonstrated and the tools used to create and debug procedures. Microsoft support professionals can help explain the functionality of a particular procedure, but they will not modify these examples to provide added functionality or construct procedures to meet your specific needs. If you have limited programming experience, you may want to contact the Microsoft fee-based consulting line at (800) 936-5200. For more information about the support options available from Microsoft, please see the following page on the World Wide Web:
http://www.microsoft.com/support/supportnet/refguide/
This method uses a macro to delete all of the data value labels that
appear outside of the plot area. To use this method, you must insert a
module and then type the code that follows these steps:
1. Save and close any open workbooks, and then create a new workbook.
2. Start the Visual Basic Editor (press ALT+F11).
3. On the Insert menu, click Module.
Then, type the following code:
Sub Del_Label()
' Detect and store the top location of plot area.
y = ActiveChart.PlotArea.Top
' Loop through all labels in series one.
For Each y_label In ActiveChart.SeriesCollection(1).DataLabels
' Test if label is above top of the plot area.
If y_label.Top < y Then
' Select and delete a label.
y_label.Select
y_label.Delete
End If
Next y_label
End Sub
Microsoft has confirmed this to be a problem in the products listed at the beginning of this article.
Additional query words: XL97 XL7 XL5 wrap appear
Keywords : kbprg kbdta kbdtacode kbchart
Version : WINDOWS:5.0,7.0,97
Platform : WINDOWS
Issue type : kbbug
Solution Type : kbnofix
Last Reviewed: May 18, 1999