Ad esempio, hai creato un grafico e lo hai posizionato a caso nel foglio di lavoro come mostrato nell'immagine sottostante. Ora introdurrò un VBA per spostare rapidamente il grafico in una posizione precisa e assoluta facilmente.

1. Selezionare il grafico per il quale impostare la posizione di assoluzione e premere altro + F11 tasti per aprire la finestra di Microsoft Visual Basic, Applications Edition.

2. Clic inserire > Modulie incolla sotto VBA nella finestra del nuovo modulo.

VBA: imposta la posizione di assoluzione di un grafico 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:: Nel codice sopra, Imposta xRg = Range ("D1: J13") significa spostare e posizionare il grafico nell'intervallo D1: J13. Puoi modificare l'intervallo di cui hai bisogno.

3. stampa F5 o fare clic su Correre pulsante per eseguire questo VBA.

Ora vedrai il grafico spostato nella posizione precisa specificata nel VBA. Vedi screenshot:

Se hai installato Kutools per Excel, puoi applicare il suo straordinario strumento grafico: Imposta la posizione assoluta del grafico per spostare e ridimensionare un grafico in un intervallo specificato in Excel.

1. Seleziona il grafico di cui imposterai la posizione assoluta e fai clic Kutools > Grafici > Strumenti grafici > Imposta la posizione assoluta del grafico.

2. Nella finestra di dialogo a comparsa, specificare la posizione in cui spostare il grafico e fare clic su Ok pulsante.

Ora il grafico selezionato viene spostato nella posizione specificata e ridimensionato contemporaneamente all'intervallo specificato. Vedi screenshot: