Les galetes ens ajuden a lliurar els nostres serveis. En utilitzar els nostres serveis, accepteu el nostre ús de cookies.
Consell: altres idiomes es tradueixen en Google. Pots visitar el English versió d'aquest enllaç.
Iniciar Sessió
x
or
x
x
Registre
x

or

Com s'estableix la posició absoluta d'un gràfic a Excel?

Normalment, és possible que col·loquem un gràfic a l'atzar al crear-lo o moure-lo a Excel. Tanmateix, en alguns casos especials, és possible que vulgueu col·locar el gràfic en una posició precisa, com ara començar a la cel·la A1, romandre en el rang A1: D5, o bé. Aquí, presentaré un VBA per establir la posició absoluta d'un gràfic a Excel.

Estableix la posició absoluta d'un gràfic a Excel



Estableix la posició absoluta d'un gràfic a Excel

Per exemple, heu creat un gràfic i el va col·locar aleatòriament al full de treball tal com es mostra a la captura de pantalla. Ara vaig a introduir una VBA per moure ràpidament el gràfic a una posició precisa i absoluta fàcilment.

1. Seleccioneu el gràfic que establirà la posició d'absolució per, i premeu Alt + F11 claus per obrir la finestra de Microsoft Visual Basic per a aplicacions.

2. Clic Insereix > Mòduls, i enganxeu per sota de VBA a la finestra del nou mòdul.

VBA: estableix la posició d'absolució d'un gràfic a 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

Nota: En el codi anterior, Estableix xRg = Gamma ("D1: J13") significa moure i col·locar el gràfic en el rang D1: J13. Podeu canviar el rang segons necessiteu.

3. Premeu F5 o feu clic a la icona Correr botó per executar aquest VBA.

Ara veureu que el gràfic es mou a la posició precisa tal com s'especifica a la VBA. Mostra la captura de pantalla:


Articles relacionats:



Eines de productivitat recomanades

Pestanya d'Office

estrella d'or1 Porteu les pestanyes pràctiques a l'Excel i a un altre programari d'Office, igual que Chrome, Firefox i el nou Internet Explorer.

Kutools for Excel

estrella d'or1 Increïble! Incrementeu la productivitat en 5 minuts. No necessites cap habilitat especial, estalvieu dues hores cada dia.

estrella d'or1 300 Noves característiques per a Excel, Excel molt fàcil i potent:

  • Combina cel·les / files / columnes sense perdre dades.
  • Combina i consolida diverses fulles i llibres.
  • Comparar intervals, copiar diversos rangs, convertir text a data, unitat i conversió de divises.
  • Compte per colors, subtotals de paginació, classificació avançada i filtre súper,
  • Més Seleccioneu / Insereix / Suprimeix / Text / Format / Enllaç / Comentari / Llibres / Eines de full de càlcul ...

Tret de pantalla de Kutools per a Excel

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.