Como tornar transparente a cor de fundo da caixa de verificação no Excel?
Normalmente, ao inserir caixas de verificação (controlo ActiveX) em células do Excel, a cor de fundo da caixa de verificação sobrepõe-se à cor de preenchimento da folha de cálculo, tal como se ilustra na imagem seguinte. Para exibir integralmente a cor de fundo da folha de cálculo, é necessário definir a cor de fundo da caixa de verificação como transparente. Este artigo apresenta um método VBA para resolver este problema.
Tornar o Cor de Fundo da caixa de verificação transparente com código VBA
Tornar o Cor de Fundo da caixa de verificação transparente com código VBA
Siga os passos abaixo para tornar transparente a cor de fundo das caixas de verificação utilizando código VBA.
1. Na folha de cálculo que contém as caixas de verificação que pretende tornar transparentes, prima simultaneamente as teclas Alt + F11 para abrir a janela do Microsoft Visual Basic for Applications.
2. Na janela do Microsoft Visual Basic for Applications, clique em Inserir > Módulo. Depois, copie e cole o código VBA na janela de código.
Código VBA: Tornar o Cor de Fundo das caixas de verificação transparente
Sub CheckBoxTransparent()
Dim xOleChk As OLEObject
Application.ScreenUpdating = False
For Each xOleChk In ActiveSheet.OLEObjects
If TypeName(xOleChk.Object) = "CheckBox" Then
xOleChk.Object.BackStyle = fmBackStyleTransparent
End If
Next
Application.ScreenUpdating = True
End Sub3. Prima a tecla F5 ou clique no botão Executar para executar o código. Todas as caixas de verificação na Planilha Atual ficarão transparentes. Veja a imagem:
Artigos relacionados:
- Como filtrar dados com base numa caixa de verificação no Excel?
- Como criar uma lista pendente com várias caixas de verificação no Excel?
- Como alterar o valor ou a cor de uma célula específica quando a caixa de verificação estiver marcada no Excel?
- Como realçar uma célula ou linha com base numa caixa de verificação 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