É possível obter o ...
 
Notifications
Clear all

É possível obter o nome do objeto pela linha e coluna?


jcfp
Posts: 12
 jcfp
Registered
Topic starter
(@jcfp)
Active Member
Entrou: 4 anos atrás

Boa tarde pessoal, tenho uma planilha que a cada semana faz uma cópia dos dados e os atualiza. Junto com os dados vem o gráfico, porém quando o gráfico é copiado ele gera um nome aleatório e não consigo atualizar os dados dele via VBA. É possível obter o nome do gráfico indicando a linha e coluna que ele se encontra? Ou então é possível programar para que a cópia tenho um nome pré-definido? 

Responder
Tags do Tópico
1 Reply
Wagner Morel
Posts: 4037
Registered Registered
(@wagner-morel-vidal-nobre)
Illustrious Member
Entrou: 9 anos atrás

jcfp,

 

Bom dia!

 

Você pode usar o código abaixo:

Sub Posição_Gráfico()
    Dim Graf As Shape
    
    'Consderando a largura default (8,43) de uma coluna e a altura default (15) de uma linha no Excel, _
    você pode usar o exemplo abaixo para saber o que quer:
    
    'Para testar esse exemplo, insira um gráfico qualquer na planilha de modo que o canto superior _
    esquerdo do mesmo fique exatamente colado em uma linha e em uma coluna da planilha.
    
    For Each Graf In ActiveSheet.Shapes
        MsgBox "Este é o nome do gráfico: " & Graf.Name
        MsgBox "Este é o número da coluna em que está o gráfico: " & Graf.Left / 48
        MsgBox "Este é o número da linha em que está o gráfico: " & Graf.Top / 15
    Next
    
End Sub
Responder