Como usar a caixa de seleção para ocultar / mostrar linhas ou colunas no Excel?
Supondo que você precise usar uma caixa de seleção para ocultar ou exibir certas linhas ou colunas. Por exemplo, quando a caixa de seleção Active X Control é marcada, certas linhas ou colunas são exibidas, caso contrário, elas serão ocultadas. Este artigo mostra o método de como usar a caixa de seleção para ocultar / exibir linhas ou colunas no Excel com detalhes.
Use a caixa de seleção para ocultar / mostrar linhas ou colunas com o código VBA
Use a caixa de seleção para ocultar / mostrar linhas ou colunas com o código VBA
O código VBA a seguir pode ajudá-lo a ocultar / mostrar certas linhas ou colunas com a caixa de seleção.
1. Após inserir uma caixa de seleção Active X Control na planilha, clique com o botão direito na caixa de seleção e selecione Ver código no menu do botão direito. Veja a imagem:
2. No Microsoft Visual Basic para Aplicações janela, copie e cole o seguinte código VBA na janela de código.
Código VBA: use a caixa de seleção para ocultar / mostrar linhas ou colunas
Private Sub CheckBox1_Click()
[C:D].EntireColumn.Hidden = Not CheckBox1
End Sub
Notas:
1. No código VBA, [CD]. Coluna inteira significa que as colunas C e D serão ocultadas ou mostradas marcando ou desmarcando a caixa de seleção correspondente.
2. Para ocultar ou exibir certas linhas, como linha 6: 9, altere o [CD]. Coluna inteira para [6: 9]. WholeRow no código VBA.
3. aperte o outro + Q simultaneamente para fechar o Microsoft Visual Basic para Aplicações janela.
4. Agora, desligue o Modo de design sob a Developer guia como a imagem abaixo mostrada:
A partir de agora, quando a caixa de seleção estiver marcada, as linhas ou colunas especificadas serão exibidas. Quando está desmarcado, as linhas ou colunas especificadas são ocultadas.
Artigos relacionados:
- Como ocultar / mostrar linhas ou colunas com sinal de mais ou menos no Excel?
- Como ocultar linhas com base na data de hoje no Excel?
- Como ocultar a caixa de seleção quando a linha está oculta no Excel?
Melhores ferramentas de produtividade de escritório
Aprimore suas habilidades de Excel com o Kutools para Excel e experimente uma eficiência como nunca antes. Kutools para Excel oferece mais de 300 recursos avançados para aumentar a produtividade e economizar tempo. Clique aqui para obter o recurso que você mais precisa...
Office Tab traz interface com guias para o Office e torna seu trabalho muito mais fácil
- Habilite a edição e leitura com guias em Word, Excel, PowerPoint, Publisher, Access, Visio e Project.
- Abra e crie vários documentos em novas guias da mesma janela, em vez de em novas janelas.
- Aumenta sua produtividade em 50% e reduz centenas de cliques do mouse para você todos os dias!