Como ocultar colunas em várias planilhas em uma pasta de trabalho?
No Excel, podemos ocultar colunas rapidamente em uma planilha, mas você já tentou ocultar colunas em várias planilhas de uma vez? Normalmente, você pode tentar selecionar todas as folhas e aplicar o recurso Ocultar, mas não funcionará com êxito. Neste artigo, vou falar sobre como ocultar colunas em várias planilhas rapidamente.
Ocultar colunas em várias planilhas em uma pasta de trabalho com código VBA
Ocultar colunas em várias planilhas em uma pasta de trabalho com código VBA
O código a seguir pode ajudá-lo a ocultar colunas específicas em todas as planilhas imediatamente, faça o seguinte:
1. Segure o ALT + F11 chaves para abrir o Microsoft Visual Basic para Aplicações janela.
2. Clique inserção > Móduloe cole o seguinte código no Módulo Janela.
Código VBA: ocultar colunas em várias planilhas de uma vez:
Sub Hide_Columns()
'Updateby Extendoffice
Dim iWs As Integer
Dim sCol As String
On Error Resume Next
sCol = Application.InputBox("Input entire column,Eg A:A OR A:B", _
"Kutools for Excel", , , , , , 2)
If sCol = "" Then
MsgBox "Empty columns", vbInformation, "Kutools for Excel"
Exit Sub
End If
For iWs = 1 To ThisWorkbook.Worksheets.Count
ThisWorkbook.Sheets(iWs).Columns(sCol).Hidden = True
Next iWs
On Error GoTo 0
End Sub
3. Então aperte F5 para executar este código, e uma caixa de prompt é exibida para lembrá-lo de digitar as colunas que deseja ocultar em todas as planilhas, consulte a captura de tela:
4. E, em seguida, clique em OK botão, suas colunas especificadas foram ocultadas em todas as planilhas de uma vez.
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!