Biasanya, kami dapat menempatkan grafik secara acak saat membuat atau memindahkannya di Excel. Namun, dalam beberapa kasus khusus, Anda mungkin ingin menempatkan grafik pada posisi yang tepat, seperti mulai di Sel A1, tetap di Rentang A1: D5, atau lainnya. Di sini, saya akan memperkenalkan VBA untuk mengatur posisi absolut bagan di Excel.
- Terapkan VBA untuk mengatur posisi absolut bagan di Excel
- Alat luar biasa untuk mengatur posisi absolut bagan di Excel
Terapkan VBA untuk mengatur posisi absolut bagan di Excel
Misalnya, Anda telah membuat bagan dan menempatkannya secara acak di lembar kerja seperti gambar di bawah ini.
Sekarang saya akan memperkenalkan VBA untuk dengan cepat memindahkan grafik ke posisi yang tepat dan absolut dengan mudah.
1. Pilih bagan yang akan Anda tetapkan posisi pengampunannya, dan tekan lain + F11 kunci untuk membuka jendela Microsoft Visual Basic for Applications.
2. Klik Menyisipkan > Modul, dan tempelkan di bawah VBA ke jendela modul baru.
VBA: Tetapkan posisi absolusi bagan di 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:
An amazing tool to set absolute position of a chart in Excel
If you have Kutools for Excel installed, you can apply its amazing chart tool – Set Absolute Position of Chart to move and resize a chart to a specified range in Excel.
Kutools for Excel - Includes more than
300 handy tools for Excel. Full feature free trial
30-day, no credit card required! Free Trial Now!
1. Select the chart you that you will set absolute position, and click Kutools > Charts > Chart Tools > Set Absolute Position of Chart.
2. In the popping out dialog, specify the position that you will move the chart to, and click the Ok button.
Now the selected chart is moved the specified position, and resized to the specified range simultaneously. See screenshot:
Related articles:
Add a single data point in an Excel line chart
In general, it’s easy to add two data series in one chart in Excel. But now, you need to add only one data point in an existing line chart in Excel, how to solve this problem? Below solution will ease your work.
Move chart with arrow keys in Excel
In Excel, we can use the arrow [Up, Down, Left, Right] keys on the keyboard to move the picture, shape as quickly as you need. However, when moving the chart by using these arrows keys, it will not work well. This article, I will talk about an easy trick to finish this job in Excel.
Move chart X axis below negative values/zero/bottom in Excel
When negative data existing in source data, the chart X axis stays in the middle of chart. For good looking, some users may want to move the X axis below negative labels, below zero, or to the bottom in the chart in Excel. This article introduce two methods to help you solve it in Excel.
Resize all charts or pictures in Excel quickly
Let's say there are a lot of pictures or charts of varying size in a worksheet. And now you need to unify all of them to the same size. How do you deal with it? This article will show the tutorial to resize multiple charts or pictures simultaneously with same size easily.
Resize chart area/plot area/title in Excel
Inserting a chart into Excel is a usual way to show the data more intuitional, but sometimes you may think the default size of the chart is small. For viewing more clearly, you can resize the chart area, plot area or title and so on in Excel.
The Best Office Productivity Tools
Kutools for Excel Solves Most of Your Problems, and Increases Your Productivity by
80%
- Reuse: Quickly insert complex formulas, charts and anything that you have used before; Encrypt Cells with password; Create Mailing List and send emails...
- Super Formula Bar [easily edit multiple lines of text and formula]; Reading Layout [easily read and edit large numbers of cells]; Paste to Filtered Range...
- Merge Cells/Rows/Columns without losing Data; Split Cells Content; Combine Duplicate Rows/Columns... Prevent Duplicate Cells; Compare Ranges...
- Select Duplicate or Unique Rows; Select Blank Rows [all cells are empty]; Super Find and Fuzzy Find in Many Workbooks; Random Select...
- Exact Copy Multiple Cells without changing formula reference; Auto Create References to Multiple Sheets; Insert Bullets, Check Boxes and more...
- Extract Text, Add Text, Remove by Position, Remove Space; Create and Print Paging Subtotals; Convert Between Cells Content and Comments...
- Super Filter [save and apply filter schemes to other sheets]; Advanced Sort by month/week/day, frequency and more; Special Filter by bold, italic...
- Combine Workbooks and WorkSheets; Merge Tables based on key columns; Split Data into Multiple Sheets; Batch Convert xls, xlsx and PDF...
- More than 300 powerful features. Supports Office/Excel 2007-2019 and 365. Supports all languages. Easy deploying in your enterprise or organization. Full features 30-day free trial. 60-day money back guarantee.
Read More... Free Download... Purchase...
Office Tab Brings Tabbed interface to Office, and 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!
Read More... Free Download... Purchase...