Como definir a cor de uma célula igual à cor de outra célula no Excel?
Se pretender igualar a cor de uma célula à de outra, um dos métodos neste artigo pode ajudá-lo.
Definir a cor de uma célula igual à cor de outra célula com código VBA
Definir a cor de uma célula igual à cor de outra célula com código VBA
O método VBA abaixo permite definir a cor de uma célula igual à de outra no Excel. Siga os passos seguintes.
1. Na folha de cálculo onde precisa de igualar a cor de duas células, clique com o botão direito do rato no separador da folha e, em seguida, clique em Ver Código no menu de contexto. Veja a captura de ecrã:
2. Na janela Microsoft Visual Basic for Applications que se abre, deverá copiar e colar o código VBA na janela de Código.
Código VBA: Definir a cor de uma célula igual à cor de outra célula
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Me.Range("C1").Interior.Color = Me.Range("A1").Interior.Color
End SubNota: No código, A1 é a célula que contém a cor de preenchimento com a qual C1 será comparada. Por favor, ajuste-as conforme as suas necessidades.
Em seguida, a célula C1 é preenchida com a mesma cor que a célula A1, tal como ilustrado na captura de ecrã abaixo.
A partir de agora, sempre que a cor de preenchimento da célula A1 for alterada, a célula C1 será automaticamente atualizada para a mesma cor.
Desbloqueie a Magia do Excel com KUTOOLS AI
- Execução Inteligente: Realize operações em células, analise dados e crie gráficos — tudo impulsionado por comandos simples.
- fórmulas personalizadas: Crie fórmulas personalizadas para simplificar os seus fluxos de trabalho.
- Programação VBA: Escreva e implemente código VBA com facilidade.
- Interpretação de Fórmulas: Compreenda facilmente fórmulas complexas.
- Tradução de Texto: Elimine barreiras linguísticas nas suas folhas de cálculo.
Artigos relacionados:
- Como fazer o nome do separador da folha corresponder ao valor de uma célula no Excel?
- Como alterar um valor com base na cor da célula no Excel?
- Como alterar a cor de uma célula quando ela é clicada ou selecionada no Excel?
As Melhores Ferramentas de Produtividade para o Office
Potencie as suas competências no Excel com Kutools para Excel e experimente uma eficiência como nunca antes.Kutools para Excel Oferece mais de 300 funcionalidades avançadas para impulsionar a produtividade e Economizar Tempo.Clique aqui para obter a funcionalidade de que mais precisa...
Office Tab Traz uma interface com separadores para o Office e torna o seu trabalho muito mais fácil
- Ative a edição e leitura com separadores no Word, Excel, PowerPoint, Publisher, Access, Visio e Project.
- Abra e crie vários documentos em novos separadores da mesma janela, em vez de em janelas separadas.
- Aumente a sua produtividade em 50 % e elimine centenas de cliques do rato todos os dias!
Todos os suplementos Kutools — num único instalador.
Kutools for Office reúne suplementos para Excel, Word, Outlook e PowerPoint, além do Office Tab Pro, sendo a solução ideal para equipas que trabalham em várias aplicações do Office.
- Pacote tudo-em-um— suplementos para Excel, Word, Outlook e PowerPoint + Office Tab Pro
- Um instalador, uma licença— configuração em minutos (pronto para MSI)
- Funciona melhor em conjunto— produtividade simplificada em todas as aplicações do Office
- Teste gratuito de 30 dias com todas as funcionalidades— sem registo, sem cartão de crédito
- Melhor relação qualidade-preço— poupe face à compra individual dos suplementos