Move a DataLabel in a chart in excel

Hot Topic

automatical start macro in access2003
VB .NET vs Access (combobox)
automatically saving word doc versions every 5mins
DBGrid and MSFlexGrid not working in VBA
what OS are included in MSDN OS subscription?
How to populate a list box using adodb recordset
Access 2000 RecordSet Sort problem
Order By DateDiff() in Access Report
How do Programmatically insert an ole object into an access database
Help with highlighting employees nominating each other for awards...

Microsoft ISV

Run-time error
Sorry it may not have been clear as>>
important
Date and time picker control
Efficent Way to manage multiple textboxes (maybe a loop?)
Excel Macros/ Protection / HideUnhide VB command
Automation error 80004005 when creating a CDO session Object
OK Trying Again - A Simple Very Simple Routine
Call Macro in Closed Workbook?
How to re-connect an Excel.Application variable to a disconnected Excel instance?

Move a DataLabel in a chart in excel

Hello,

I would like to be able to move the DataLabel in the example below in all directions. Can I somehow find the Top and Left data for it

With ActiveChart.SeriesCollection(1)
.ApplyDataLabels Type:=xlDataLabelsShowLabel, _
AutoText:=False, _
LegendKey:=False
.DataLabels.Position = xlLabelPositionRight

Kind regards

\Jonas




Answer this question

Move a DataLabel in a chart in excel

  • Loopsludge

    You can read and set the Left and Top properties of a data label.
    This simple example move each label down and across by 10.

    Note I have changed the AutoText to TRUE as FALSE was generating a 1004 error.

    Sub MoveDataLabels()

    Dim objDL As DataLabel

    With ActiveChart.SeriesCollection(1)
    .ApplyDataLabels Type:=xlDataLabelsShowLabel, _
    AutoText:=True, _
    LegendKey:=False
    .DataLabels.Position = xlLabelPositionRight
    For Each objDL In .DataLabels
    objDL.Left = objDL.Left + 10
    objDL.Top = objDL.Top + 10
    Next
    End With

    End Sub




  • Pascal Mignot

    Thanks!

  • Move a DataLabel in a chart in excel
Answer this question