View Single Post
  #2   Report Post  
Posted to microsoft.public.excel.misc
Jon Peltier Jon Peltier is offline
external usenet poster
 
Posts: 6,582
Default Labels and chart sheets

Here's how to add a label with VBA:

Sub AddLabel()
' remove old label with same name
On Error Resume Next
ActiveChart.Shapes("MyLabel").Delete
On Error GoTo 0

ActiveChart.Shapes.AddShape(msoShapeRectangle, 75, 50, 125, 25).Name =
"MyLabel"
End Sub


And here's how to change what appears in the label:

Sub JustPopulateLabel()
With ActiveChart.Shapes("MyLabel").TextFrame
.Characters.Text = "Here's what I want to say."
End With
End Sub


- Jon
-------
Jon Peltier, Microsoft Excel MVP
Tutorials and Custom Solutions
Peltier Technical Services, Inc. - http://PeltierTech.com
_______


"Revolveri" wrote in message
...
Hello

Is it possible to put a label (from the developer tools) on a chart sheet
and edit the caption VBA? I'd like to be able to display information on
those
labels when I click on a data point on a chart.