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

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: 

DONUT PROJECT: VBA - Projetos e Códigos de Visual Basic for Applications (Visual Basic For Apllication)eBook - DONUT PROJECT 2024 - Volume 03 - Funções Financeiras - André Luiz Bernardes eBook - DONUT PROJECT 2024 - Volume 02 - Conectando Banco de Dados - André Luiz Bernardes eBook - DONUT PROJECT 2024 - Volume 01 - André Luiz Bernardes


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:


O código VBA fornecido redimensiona todos os gráficos em uma planilha ativa para um tamanho específico (largura de 300 e altura de 200). 



Sub Resize_Charts()


    ' Declaração da variável

    Dim i As Integer


    ' Loop para percorrer todos os objetos de gráfico na planilha ativa

    For i = 1 To ActiveSheet.ChartObjects.Count


        ' Redimensiona o gráfico atual

        With ActiveSheet.ChartObjects(i)

            .Width = 300   ' Define a largura do gráfico

            .Height = 200  ' Define a altura do gráfico

        End With


    Next i


    ' Mensagem informando o número de gráficos redimensionados

    MsgBox ActiveSheet.ChartObjects.Count & " gráficos foram redimensionados com sucesso!", vbInformation


End Sub



Explicação do Código


1. Declaração da Variável: O código começa com a declaração da variável "i", que será usada como contador no loop para iterar sobre os gráficos da planilha ativa.


2. Laço For: O laço "For" percorre todos os gráficos na planilha ativa, com base no número de objetos de gráfico ("ChartObjects.Count") na planilha. O "i" varia de 1 até o número total de gráficos.


3. Redimensionamento de Gráficos: Dentro do laço, o código usa o objeto "ChartObjects(i)" para acessar cada gráfico individualmente. As propriedades ".Width" e ".Height" são então usadas para definir o tamanho de cada gráfico para 300 de largura e 200 de altura.


4. Exibição de Mensagem: Após o redimensionamento, uma caixa de mensagem ("MsgBox") exibe o número de gráficos que foram redimensionados com sucesso.


Artigo Explicativo sobre o Código e Suas Aplicações


A automação de tarefas no Excel utilizando VBA (Visual Basic for Applications) tem se tornado uma prática comum para otimizar a produtividade, especialmente quando se trabalha com grandes volumes de dados ou tarefas repetitivas. O código fornecido exemplifica uma funcionalidade simples, mas eficaz, para redimensionar gráficos de forma automática em uma planilha do Excel. Embora o código seja direto, ele demonstra o poder do VBA para transformar tarefas manuais em processos automatizados, economizando tempo e esforço do usuário. A automação de gráficos, como mostrado neste código, pode ser uma parte essencial de um fluxo de trabalho eficiente em muitas áreas de análise de dados.


A principal aplicação do código "Resize_Charts" é em situações onde a formatação visual dos gráficos precisa ser ajustada rapidamente. Em projetos de relatórios ou apresentações, por exemplo, é comum ter múltiplos gráficos, e ajustar o tamanho manualmente pode se tornar um processo demorado e propenso a erros. Com este código, qualquer usuário pode redimensionar todos os gráficos de uma vez, garantindo consistência e eficiência, sem a necessidade de ajustar cada gráfico individualmente. Isso melhora a apresentação do documento e permite que mais gráficos sejam inseridos sem comprometer a clareza visual.


O código pode ser facilmente adaptado para atender a outras necessidades relacionadas ao redimensionamento de gráficos. Além de ajustar a largura e altura, os usuários podem modificar outras propriedades de gráficos, como a posição ou o tipo de gráfico, de maneira automática. Por exemplo, se o usuário quiser centralizar todos os gráficos na planilha ou ajustar o tipo de gráfico para outro formato, é possível incluir essas alterações no código sem dificuldades. A flexibilidade do VBA permite que o código seja adaptado conforme as exigências específicas de cada projeto.


Outro benefício importante da automação no Excel é a redução de erros humanos. Quando as tarefas são realizadas manualmente, há sempre o risco de cometer erros de digitação ou de seleção incorreta. Usando VBA, esses erros são minimizados, pois o código executa as ações de forma precisa e repetível. No caso do redimensionamento de gráficos, o código garante que todos os gráficos na planilha sejam ajustados exatamente da mesma maneira, eliminando variações acidentais de tamanho que poderiam prejudicar a estética do documento.


Além disso, o uso de VBA para automatizar tarefas como essa pode aumentar significativamente a velocidade de execução. Em um cenário de trabalho onde múltiplos gráficos precisam ser ajustados, um processo manual pode levar minutos ou até horas, dependendo do número de gráficos. Com o VBA, esse processo é realizado em frações de segundo, tornando a tarefa muito mais eficiente. Isso é especialmente útil em ambientes corporativos onde relatórios e apresentações precisam ser criados rapidamente e com alta qualidade.


A automação também facilita o trabalho em equipe. Quando uma tarefa é automatizada com VBA, qualquer pessoa que tenha acesso ao código pode executar a mesma ação de forma consistente, sem depender de conhecimento técnico avançado ou de habilidades específicas em design de gráficos. Isso permite que equipes de trabalho compartilhem processos de formatação e adaptem facilmente o código para suas necessidades específicas, sem a necessidade de treinamento especializado. A consistência dos resultados é um grande benefício quando se trabalha em grupo.


Além do mais, o código pode ser facilmente integrado com outras macros e processos automatizados. Por exemplo, ele pode ser combinado com macros que geram relatórios de vendas ou outros tipos de análise, automatizando não apenas o cálculo de dados, mas também a apresentação visual desses dados. Ao combinar várias automações em uma única rotina, o usuário pode transformar um processo complexo em algo simples e ágil, sem perder a qualidade do trabalho final.


Em termos de práticas recomendadas, é sempre bom garantir que os códigos sejam flexíveis o suficiente para serem reutilizados em diferentes cenários. Por exemplo, o código "Resize_Charts" pode ser facilmente modificado para permitir que o usuário insira o tamanho dos gráficos, em vez de fixar a largura e a altura. Essa customização torna o código ainda mais útil em diferentes contextos, onde os requisitos podem variar de acordo com o tipo de documento ou apresentação que está sendo preparada.


Finalmente, a automação no Excel oferece uma série de benefícios em termos de produtividade, precisão e consistência. O uso de VBA para tarefas como o redimensionamento de gráficos é apenas um exemplo de como as ferramentas de automação podem ser aplicadas para melhorar a eficiência no trabalho. O código pode ser estendido para outras tarefas complexas, como criação de gráficos, geração de relatórios, análise de dados e muito mais. Com o VBA, o Excel se torna uma ferramenta ainda mais poderosa para os usuários, permitindo que eles realizem suas tarefas de maneira mais rápida e eficaz.


Exemplos de Uso do Código:


1. Ajuste de Gráficos em Relatórios Anuais:

   - Objetivo: Redimensionar gráficos em um relatório anual para garantir que todos os gráficos tenham um tamanho padronizado antes da impressão ou distribuição.


   - Exemplo de uso: O código é executado ao final de um processo de geração de relatórios, redimensionando todos os gráficos para um tamanho específico, garantindo que o relatório tenha uma aparência uniforme.


2. Ajuste de Gráficos em Apresentações de PowerPoint:

   - Objetivo: Automatizar o redimensionamento de gráficos em planilhas do Excel que serão copiadas para apresentações de PowerPoint.


   - Exemplo de uso: Ao preparar dados para uma apresentação, o código ajusta o tamanho de todos os gráficos antes de copiá-los para os slides, economizando tempo na preparação visual.


3. Formatação de Gráficos em Planilhas de Controle de Estoque:

   - Objetivo: Redimensionar gráficos usados para ilustrar os níveis de estoque em uma planilha de controle de inventário.


   - Exemplo de uso: O código ajusta automaticamente todos os gráficos na planilha sempre que um novo lote de produtos é adicionado, mantendo a consistência da apresentação.


4. Redimensionamento de Gráficos em Relatórios Financeiros:

   - Objetivo: Garantir que os gráficos em relatórios financeiros tenham o mesmo tamanho antes de serem compartilhados com a equipe ou clientes.


   - Exemplo de uso: O código é utilizado para garantir que todos os gráficos de performance financeira em uma planilha de relatórios sejam redimensionados para um tamanho adequado para visualização.


5. Ajuste de Gráficos em Análises de Vendas:

   - Objetivo: Redimensionar gráficos de vendas para facilitar a leitura e comparação entre diferentes períodos.


   - Exemplo de uso: O código é executado ao final de uma análise de vendas mensal, ajustando todos os gráficos de desempenho para a mesma dimensão antes da apresentação dos resultados.



  PUDIM PROJECT 

eBook - PT - PUDIM PROJECT 2024 - Python Volume 01 - Funções Essenciais - Série PUDIM PROJECT — André Luiz Bernardes eBook - PT - PUDIM PROJECT 2024 - Python Volume 02 - Funções Essenciais - Série PUDIM PROJECT — André Luiz Bernardes eBook - PT - PUDIM PROJECT 2024 - Python Volume 03 - Automatizando Postagens em Redes e Plataformas Sociais - Série PUDIM PROJECT — André Luiz Bernardes


eBook - PT - PUDIM PROJECT 2024 - Python Volume 04 - Funções para Automatização - Série PUDIM PROJECT — André Luiz Bernardes eBook - PT - PUDIM PROJECT 2024 - Python Volume 05 - Automatizando Postagens em Redes e Plataformas Sociais - Série PUDIM PROJECT — André Luiz Bernardes eBook - PT - PUDIM PROJECT 2024 - Python Volume 06 - Automatizando Postagens em Redes e Plataformas Sociais - Série PUDIM PROJECT — André Luiz Bernardes


eBook - PT - PUDIM PROJECT 2024 - Python Volume 07 - Automatizando Postagens em Redes e Plataformas Sociais - Série PUDIM PROJECT — André Luiz Bernardes eBook - PT - PUDIM PROJECT 2024 - Python Volume 08 - Automatizando Postagens em Redes e Plataformas Sociais - Série PUDIM PROJECT — André Luiz Bernardes eBook - PT - PUDIM PROJECT 2024 - Python Volume 09 - Automatizando Postagens em Redes e Plataformas Sociais - Série PUDIM PROJECT — André Luiz Bernardes


eBook - PT - PUDIM PROJECT 2024 - Python Volume 10 - Automatizando Postagens em Redes e Plataformas Sociais - Série PUDIM PROJECT — André Luiz Bernardes eBook - PT - PUDIM PROJECT 2024 - Python Volume 11 - Automatizando Postagens em Redes e Plataformas Sociais - Série PUDIM PROJECT — André Luiz Bernardes


 Série de artigos: PUDIM PROJECT Pyhton 

PUDIM PROJECT 2024 | Python - Simplifique sua Rotina com Estes 8 Scripts Python para Automatizar Tarefas Diárias PUDIM PROJECT 2024 | Python - Aprenda a Manipular Datas e Horários com o Pacote Pendulum em Python: Exemplos Práticos PUDIM PROJECT 2024 | Python - Copie Facilmente Conteúdos de Arquivos para a Área de Transferência

PUDIM PROJECT 2024 | Python - Validação de YAML e JSON: Garanta a Integridade dos Dados no Kubernetes com Estas Ferramentas Simples PUDIM PROJECT 2024 | Python - Aprenda a Criptografar e Descriptografar Senhas Usando Python

 

Conheça também:

VBA Excel | Código VBA de Pesquisa no Google - VBA Code to Search on Google

VBA Excel | Inserir várias Planilhas - Insert Multiple Worksheets

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

VBA Excel | Desproteger Planilha - Un-Protect Worksheet

VBA Excel | Proteger Planilha - Protect Worksheet

VBA Excel | Proteja todas as Planilhas Instantaneamente - Protect all Worksheets Instantly

VBA Excel | Excluir tudo, exceto a planilha ativa - Delete all but the Active Worksheet

VBA Excel | Ocultar tudo, exceto a planilha ativa - Hide all but the Active Worksheet

VBA Excel | Realçar Valores Únicos - Highlight Unique Values

VBA Excel | Realçar Células Com Comentários - Highlight Cells with Comments

VBA Excel | Faz Backup da Aba de trabalho Atual - Create a Backup of a Current Workbook

VBA Excel | Salve cada Planilha como um único PDF - Save Each Worksheet as a Single PDF

VBA Excel | Excluir todas as Planilhas em Branco - Delete all Blank Worksheets

 

Veja outros códigos:

VBA Excel | Extraindo a Data de uma Célula com Data e Horário - Remove Date from Date and Time VBA Excel | Converta Tudo para Maiúscula - Convert to Upper CaseVBA Excel | Contando Palavras na Planilha - Word Count from Entire Worksheet VBA Excel | Removendo Decimais dos Números - Remove Decimals from Numbers

VBA Excel |  Multiplique todos os Valores por um Número - Multiply all the Values by a Number VBA Excel | Calculando a Raiz Cúbica - Calculate the Cube Root

VBA Excel | Adicionando Letras de A até Z - Add A-Z Alphabets in a Range VBA Excel | Convertendo Numerais Romanos em Arábicos - Convert Roman Numbers into Arabic Numbers

VBA Excel | Converta todos os Números Negativos em Positivos - Remove Negative Signs VBA Excel | Preencha com zeros as Células em Branco - Replace Blank Cells with Zeros



 Série de Livros nut Project 

DONUT PROJECT: VBA - Projetos e Códigos de Visual Basic for Applications (Visual Basic For Apllication)eBook - DONUT PROJECT 2024 - Volume 03 - Funções Financeiras - André Luiz Bernardes eBook - DONUT PROJECT 2024 - Volume 02 - Conectando Banco de Dados - André Luiz Bernardes eBook - DONUT PROJECT 2024 - Volume 01 - André Luiz Bernardes




 Série VBA Outlook: 

VBA Outlook - Usando o VBA no Outlook - Using Visual Basic for Applications in Outlook - Usando o DAO em vez do ADO (Using DAO instead of ADO) VBA Outlook - Usando o VBA no Outlook - Using Visual Basic for Applications in Outlook - Usando um Recordset Desconectado (Using a Disconnected Recordset) VBA Outlook - Usando o VBA no Outlook - Using Visual Basic for Applications in Outlook - Usando Transações (Using Transactions)


VBA Outlook - Usando o VBA no Outlook - Using Visual Basic for Applications in Outlook - Usando Parâmetros em Consultas SQL (Using Parameters in SQL Queries) VBA Outlook - Usando o VBA no Outlook - Using Visual Basic for Applications in Outlook - Tratando Erros (Handling Errors) VBA Outlook - Usando o VBA no Outlook - Using Visual Basic for Applications in Outlook - Fechando a Conexão (Closing the Connection)


VBA Outlook - Usando o VBA no Outlook - Using Visual Basic for Applications in Outlook - Enviando um e-Mail para cada Cliente (Sending an email to each Customer) VBA Outlook - Usando o VBA no Outlook - Using Visual Basic for Applications in Outlook - Lendo Dados do Conjunto de Registros (Reading Recordset Data) VBA Outlook - Usando o VBA no Outlook - Using Visual Basic for Applications in Outlook - Executando uma Consulta SQL (Executing an SQL Query)


VBA Outlook - Usando o VBA no Outlook - Using Visual Basic for Applications in Outlook - Conectando ao Banco de Dados usando ADO (Connecting to the Database using ADO)


 Série DONUT PROJECT 2021 


DONUT PROJECT 2021 - VBA Function: Sabe como enviar dados para o Google Sheet, através do MS Excel, usando VBA, no MacBook?

DONUT PROJECT 2021 - VBA Function:  Como Rastrear o Google Maps (Coordenadas Geográficas) no VBA Excel? DONUT PROJECT 2021 - VBA Function:  Crie Acrônimos a partir de Strings de Texto DONUT PROJECT 2021 - VBA Function:  Convertendo uma Matrix num Vetor - Convert Matrix to a Vector

DONUT PROJECT 2021 - VBA Function:  Como tornar o Formulário Transparente no MS Excel? DONUT PROJECT 2021 - VBA Function:  Faça Buscas no Google a Partir da Célula do MS Excel - Search Google From a Cell DONUT PROJECT 2021 - VBA Function:  Decompondo um Nome nas Dimensões de uma Matriz


DONUT PROJECT 2021 - VBA Function: Extraindo o Último Sobrenome de um Nome Completo ou a Última Palavra de uma Frase DONUT PROJECT 2021 - VBA Function:  Extraindo o Segundo Nome de um Nome Completo ou a Segunda Palavra de uma Frase DONUT PROJECT 2021 - VBA Function: Extraindo o Primeiro Nome ou  a Primeira Palavra de uma Frase



 Série DONUT PROJECT 2018 

DONUT PROJECT 2018 - VBA - 12 - Aumente sua Produtividade DONUT PROJECT 2018 - VBA - 10 - Loop For-Each DONUT PROJECT 2018 - VBA - 08 - Referenciando Ranges


DONUT PROJECT 2018 - VBA - 07 - Amostra de Macro  DONUT PROJECT 2018 - VBA - 06 - Recursos Adicionais DONUT PROJECT 2018 - VBA - 05 - Gravando a Primeira Macro

DONUT PROJECT 2018 - VBA - 04 - Opções de Solução DONUT PROJECT 2018 - VBA - 03 - Requisitos e Preparação DONUT PROJECT 2018 - VBA - 02 - Continua Cético

DONUT PROJECT 2018 - VBA - 01 - Maximizando Sua Eficiência DONUT PROJECT 2018 - Excel - Ao Gravar Macro Altere o Método SELECT por RANGE 


 DONUT PROJECT 2018 - Excel - Acelerando as Macros - Desativando os Recursos de Atualização



 Série DONUT PROJECT 2015 

DONUT PROJECT 2015 - Excel - Formatting A Pivot Field's Data - Formatando os Campos de uma Tabela Dinâmica DONUT PROJECT 2015 - Excel - Formatting A Pivot Table's Data - Formatando os Dados de um Tabela Dinâmica DONUT PROJECT 2015 - Excel - Expand/Collapse Entire Field Detail - Ampliando Detalhadamente os Campos da Tabela Dinâmica

DONUT PROJECT 2015 - Extraindo e-Mails - Extracting An Email Address From Text   DONUT PROJECT 2015 - Função - Extraindo Quaisquer Elementos de uma String a Partir do Limitador DONUT PROJECT 2015 - Função - Retorna o número de ocorrências de um caracter numa string

DONUT PROJECT 2015 - Função - Retorna Qualquer Conteúdo Delimitado por 2 Caracteres  DONUT PROJECT 2015 - Função - Retorna Apenas o Conteúdo Entre Parênteses DONUT PROJECT 2015 - Função - Extrai Conteúdo entre Parênteses

DONUT PROJECT 2015 - Excel - Report Layout DONUT PROJECT 2015 - Excel - Grand Totals - Inserindo Totais para todas as Colunas e Linhas na Tabela Dinâmica DONUT PROJECT 2015 - Excel - Change Pivot Table Data Source Range - Mudando a Fonte de Dados da Tabela Dinâmica

DONUT PROJECT 2015 - Excel - Refresh Pivot Tables - Aplicando Refresh em Tabelas Dinâmicas DONUT PROJECT 2015 - How To Create Partially Anonymous Data - Como Manter Informações parcialmente Anônimas  DONUT PROJECT 2015 - Excel - Clear Report Filter - Limpando o Filtro da Tabela Dinâmica

DONUT PROJECT 2015 - Excel - Report Filter On Multiple Items - Criando Filtros Múltiplos na Tabela Dinâmica DONUT PROJECT 2015 - Excel - Report Filter On A Single Item - Criando Filtro de Relatório na Tabela Dinâmica DONUT PROJECT 2015 - Excel - Remove Calculated Pivot Fields - Removendo Campos Calculados da Tabela Dinâmica

DONUT PROJECT 2015 - Excel - Remove Pivot Fields - Removendo Campos da Tabela Dinâmica  DONUT PROJECT 2015 - Excel - Add A Values Field - Adicionando Campos Calculados na Tabela Dinâmica DONUT PROJECT 2015 - Excel - Add Calculated Pivot Fields - Adicionando Campos Calculados na Tabela Dinâmica

DONUT PROJECT 2015 - Excel - Add Pivot Fields - Adicionado Campos na Tabela Dinâmica DONUT PROJECT 2015 - Excel - Delete All Pivot Tables - Apagando todas as Tabelas Dinâmicas DONUT PROJECT 2015 - Excel - Delete A Specific Pivot Table - Apague um Tabela Dinâmica Específica


DONUT PROJECT 2015 - VBA To Add A Confidentiality Footer Statement In Excel, Word, or PowerPoint - Adicionando um Rodapé com Status de Confidencialidade no Excel, Word ou PowerPoint DONUT PROJECT 2015 - Excel - Create A Pivot Table - Criando uma Tabela Dinâmica


 Série DONUT PROJECT 2014 

DONUT PROJECT 2014 - Use os add-ins do MS Excel e dê um salto em sua performance DONUT PROJECT 2014 - VBA - Automatizando o Outlook para enviar um e-mail com anexo  DONUT PROJECT 2014 - VBA - Outlook - Salvando todos os arquivos anexados nos e-mails


DONUT PROJECT 2014 - VBA - Criando uma Matriz de Datas MAT - Moving Annual Total  DONUT PROJECT 2014 - VBA - Excel - Atualizando Tabelas Dinâmicas - Refresh Pivot Table via VBA DONUT PROJECT 2014 - VBA - Excel - Removendo os Caracteres Alfabéticos e Especiais


DONUT PROJECT 2014 - VBA - Access - Criando uma Query com Parâmetros DONUT PROJECT 2014 - VBA - Access - Atualizando o conteúdo de uma Query DONUT PROJECT 2014 - VBA - Access - Saiba o Número de Registro de cada tabela


DONUT PROJECT 2014 - VBA - Access - Extraia Blocos de Dados do Banco de Dados - Sem Problemas de TIMEOUT DONUT PROJECT 2014 - VBA - Access - Lista o Tamanho de Todas as Tabelas DONUT PROJECT 2014 - VBA - Excel - Populando um ListBox no seu Formulário

DONUT PROJECT 2014 - VBA - Excel - Importando arquivos CSV  DONUT PROJECT 2014 - VBA - Excel - Deletando Conexões de Dados  DONUT PROJECT 2014 - VBA - Excel - Obtendo o Nome da Planilha sem a Extensão - Get name of workbook without extension


DONUT PROJECT 2014 - VBA - WORD - Exportação Automatizada - De *.docx Para *.pdf - Otimizando o tamanho


  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

✔ VBA Brazil Specialist®

Nenhum comentário:

Postar um comentário

diHITT - Notícias