Na primer, ustvarili ste grafikon in ga naključno postavili na delovni list, kot je prikazano spodaj. Zdaj bom predstavil VBA za hitro premikanje grafikona v natančen in absolutni položaj.

1. Izberite grafikon, za katerega boste nastavili položaj odveze, in pritisnite druga + F11 za odpiranje okna Microsoft Visual Basic for Applications.

2. Kliknite Vstavi > Moduliin prilepite pod VBA v novo okno modula.

VBA: nastavite položaj razrešitve grafikona v Excelu

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

Opombe: V zgornji kodi, Nastavite xRg = obseg ("D1:J13") pomeni premakniti in postaviti grafikon v obseg D1:J13. Po potrebi lahko spremenite razpon.

3. Pritisnite F5 ali kliknite Run za zagon tega VBA.

Zdaj boste videli, da je grafikon premaknjen na natančno mesto, kot ste ga določili v VBA. Oglejte si posnetek zaslona:

Če imate nameščen Kutools za Excel, lahko uporabite njegovo neverjetno orodje za grafikone – Nastavite absolutni položaj grafikona za premikanje in spreminjanje velikosti grafikona na določen obseg v Excelu.

1. Izberite grafikon, za katerega boste nastavili absolutni položaj, in kliknite Kutools > Charts > Orodja za grafikone > Nastavite absolutni položaj grafikona.

2. V pogovornem oknu, ki se odpre, določite položaj, kamor želite premakniti grafikon, in kliknite Ok gumb.

Zdaj je izbrani grafikon premaknjen na določen položaj in hkrati spremenjen na določen obseg. Oglejte si posnetek zaslona: