Tip: Other languages are Google-Translated. You can visit the English version of this link.
Log in
x
or
x
x
Register
x

or

How to set absolute position of a chart in Excel?

Normally, we may place a chart at random when creating or moving it in Excel. However, in some special cases, you may want to place the chart at a precise position, such as begin at Cell A1, stay in Range A1:D5, or else. Here, I will introduce a VBA to set absolute position of a chart in Excel.

Set absolute position of a chart in Excel

Enable you to do smarter, faster and better

Kutools - the best office productivity tool brings 300 advanced features to Excel. Details... Download...

Office Tab - brings tabbed interface to Excel and Word, make your work much easier. Details...Download...



Set absolute position of a chart in Excel

For example, you have created a chart and placed it at random in the worksheet as below screenshot shown. Now I will introduce a VBA to quickly move the chart to a precise and absolute position easily.

1. Select the chart you will set absolution position for, and press Alt + F11 keys to open the Microsoft Visual Basic for Applications window.

2. Click Insert > Module, and paste below VBA into the new module window.

VBA: Set absolution position of a chart in Excel

Sub Test()
Dim xRg As Range
Dim xChart As ChartObject
Set xRg = Range("D1:J13")
Set xChart = ActiveSheet.ChartObjects(1)
With xChart
.Top = xRg(1).Top
.Left = xRg(1).Left
.Width = xRg.Width
.Height = xRg.Height
End With
End Sub

Note: In above code, Set xRg = Range("D1:J13") means move and place the chart into Range D1:J13. You can change the range as you need.

3. Press F5 key or click the Run button to run this VBA.

Now you will see the chart is moved to the precise position as you specified in the VBA. See screenshot:


Related articles:



Excel Productivity Tools

Kutools for Excel - The Best Office Productivity Tool

  • Brings 300 powerful advanced features to Excel, enable you to do smarter, faster and better.
  • No longer need memorizing formulas and VBA codes, give your brain a rest from now on.
  • Become an Excel expert in 3 minutes, Complicated and repeated operations can be done in seconds, 
  • Reduce thousands of keyboard & mouse operations every day, say goodbye to occupational diseases now.
  • 110,000 highly effective people and 300+ world-renowned companies' choice.
  • 60-day full features free trial. 60-day money back guarantees. 2 years of free upgrade and support.

Office Tab - brings tabbed interface to Office, make your work much easier.

  • Enable tabbed editing and reading in Word, Excel, PowerPoint, Publisher, Access, Visio and Project.
  • Open and create multiple documents in new tabs of the same window, rather than in new windows.
  • Increases your productivity by 50%, and reduces hundreds of mouse clicks for you every day!
Say something here...
symbols left.
You are guest ( Sign Up? )
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.

Be the first to comment.