VBA Excel | Redimensione todos os Gráficos numa Planilha - Resize All Charts in a Worksheet

Deixe todos os gráficos do mesmo tamanho. 

 Série eBook Donut Projects: 

  

Conheça e faça download de uma planilha pronta do Excel que calcula o TEMPO e a DISTÂNCIA de viagem usando a API do Google Maps

Este código vai ajudá-lo a fazer todos os gráficos ficarem do mesmo tamanho. Você pode alterar a altura e a largura padrão dos gráficos alterando-as no código abaixo:

Sub Resize_Charts()

Dim i As Integer

For i = 1 To ActiveSheet.ChartObjects.Count

With ActiveSheet.ChartObjects(i)

Let .Width = 300

Let .Height = 200

End With

Next i

End Sub

  PUDIM PROJECT 

  

  

  

 

 Série de artigos: PUDIM PROJECT Pyhton 

  

 

 

Conheça também:

 

Veja outros códigos:

  

 

 

 

 Série de Livros nut Project 

  

 Série VBA Outlook: 

  

  

  

 Série DONUT PROJECT 2021 

  

  

  

 Série DONUT PROJECT 2018 

  

   

  

  

 

 Série DONUT PROJECT 2015 

  

    

   

  

   

  

   

  

 

 Série DONUT PROJECT 2014 

   

   

  

  

    

  Clique aqui e nos contate via What's App para avaliarmos seus projetos 

Envie seus comentários e sugestões e compartilhe este artigo!

brazilsalesforceeffectiveness@gmail.com