Er enghraifft, rydych chi wedi creu siart a'i osod ar hap yn y daflen waith fel y dangosir isod. Nawr, byddaf yn cyflwyno VBA i symud y siart yn gyflym i safle manwl gywir ac absoliwt yn hawdd.

1. Dewiswch y siart y byddwch chi'n gosod safle absolution ar ei gyfer, a gwasgwch Alt + F11 allweddi i agor ffenestr Microsoft Visual Basic for Applications.

2. Cliciwch Mewnosod > Modiwlau, a'i gludo o dan VBA i mewn i ffenestr y modiwl newydd.

VBA: Gosodwch leoliad absolution siart yn 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

Nodyn: Yn y cod uchod, Gosod xRg = Ystod ("D1: J13") yn golygu symud a gosod y siart yn Ystod D1: J13. Gallwch chi newid yr ystod yn ôl yr angen.

3. Gwasgwch F5 allwedd neu cliciwch y Run botwm i redeg y VBA hwn.

Nawr fe welwch fod y siart yn cael ei symud i'r union safle fel y nodwyd gennych yn y VBA. Gweler y screenshot:

Os oes gennych Kutools for Excel wedi'i osod, gallwch chi gymhwyso ei offeryn siart anhygoel - Gosod Swydd Absoliwt y Siart i symud a newid maint siart i ystod benodol yn Excel.

1. Dewiswch y siart y byddwch chi'n gosod safle absoliwt, a chlicio Kutools > Siartiau > Offer Siart > Gosod Swydd Absoliwt y Siart.

2. Yn y dialog popping out, nodwch y sefyllfa y byddwch chi'n symud y siart iddi, a chliciwch ar y Ok botwm.

Nawr mae'r siart a ddewiswyd yn cael ei symud i'r safle penodedig, a'i newid maint i'r ystod benodol ar yr un pryd. Gweler y screenshot: