Posicionar gráfico ...
 
Notifications
Clear all

Posicionar gráfico dentro da planilha

Página 2 / 2

valdecirrk
Posts: 229
Registered
Topic starter
(@valdecirrk)
Estimable Member
Entrou: 8 anos atrás

boa tarde

eu monteu um gráfico e quero posicionar o mesmo em um ponto especifico.

exemplo, quero o gráfico fique posicionado a partir da coluna D, e depois da linha 20.

depois disso vou deletar a planilha e a macro irá criar novamente e posicionar no local descrito anteriormente.

Responder
6 Respostas
valdecirrk
Posts: 229
Registered
Topic starter
(@valdecirrk)
Estimable Member
Entrou: 8 anos atrás

Estou usando dessa forma até me ajuda mas a propriedade TOP ainda me atrapalha porque é incremental e eu preciso fixa

ActiveSheet.Shapes(nome).IncrementLeft -136.5
          ActiveSheet.Shapes(nome).IncrementTop 20
          ActiveSheet.Shapes(nome).ScaleWidth 5#, msoFalse, msoScaleFromTopLeft
          ActiveSheet.Shapes(nome).ScaleHeight 2.5, msoFalse, msoScaleFromTopLeft
Responder
xlarruda
Posts: 732
Registered
(@xlarruda)
Honorable Member
Entrou: 4 anos atrás

Colega valdecirrk eis a solução:

Sub teste()
  On Error Resume Next
    With ActiveSheet.Shapes("Grafico 1")
        .Top = Range("D20").Top
        .Left = Range("D20").Left
    End With
End Sub

Apenas mude "Gráfico 1" para o nome do seu gráfico.

Responder
Página 2 / 2