Como copiar uma planilha oculta no Excel?
No Excel, podemos mover e copiar uma planilha para a pasta de trabalho atual ou outra rapidamente e facilmente, mas você já tentou copiar uma planilha oculta para a pasta de trabalho ativa? Neste artigo, vou apresentar um código VBA para você copiar uma planilha oculta específica para o arquivo do Excel ativo.
Copie uma planilha oculta para a pasta de trabalho ativa com código VBA
Copie uma planilha oculta para a pasta de trabalho ativa com código VBA
Para copiar uma planilha oculta de uma pasta de trabalho e dar-lhe um nome, o seguinte código VBA pode ajudá-lo:
1. Pressione e segure as teclas ALT + F11 para abrir a janela do Microsoft Visual Basic for Applications.
2. Clique em Inserir > Módulo e cole o seguinte código na Janela do Módulo.
Código VBA: Copie uma planilha oculta para a pasta de trabalho ativa:
Sub DupSheet()
'Updateby Extendoffice 20161109
Dim Actsheet As String
Application.ScreenUpdating = False
On Error Resume Next
ActiveWorkbook.Sheets("Sheet12").Visible = True
ActiveWorkbook.Sheets("Sheet12").Copy _
after:=ActiveWorkbook.Sheets("Sheet12")
ActNm = ActiveSheet.Name
ActiveSheet.Name = InputBox("Enter the name for the new sheet.")
Sheets(ActiveSheet.Name).Visible = True
ActiveWorkbook.Sheets("Sheet12").Visible = False
Application.ScreenUpdating = True
End Sub
Observação: No código acima, Planilha 12 é a planilha oculta que você deseja copiar, altere-a conforme necessário.
3. Em seguida, pressione a tecla F5 para executar este código, uma caixa de prompt será exibida para lembrá-lo de especificar um nome para a nova cópia da planilha oculta, veja a captura de tela:
4. Depois clique no botão OK, e a planilha oculta terá sido copiada com o novo nome na pasta de trabalho ativa imediatamente.
Melhores Ferramentas de Produtividade para Office
Impulsione suas habilidades no Excel com Kutools para Excel e experimente uma eficiência incomparável. Kutools para Excel oferece mais de300 recursos avançados para aumentar a produtividade e economizar tempo. Clique aqui para acessar o recurso que você mais precisa...
Office Tab traz interface com abas para o Office e facilita muito seu trabalho
- Habilite edição e leitura por abas no Word, Excel, PowerPoint, Publisher, Access, Visio e Project.
- Abra e crie múltiplos documentos em novas abas de uma mesma janela, em vez de em novas janelas.
- Aumente sua produtividade em50% e economize centenas de cliques todos os dias!
Todos os complementos Kutools. Um instalador
O pacote Kutools for Office reúne complementos para Excel, Word, Outlook & PowerPoint, além do Office Tab Pro, sendo ideal para equipes que trabalham em vários aplicativos do Office.





- Pacote tudo-em-um — complementos para Excel, Word, Outlook & PowerPoint + Office Tab Pro
- Um instalador, uma licença — configuração em minutos (pronto para MSI)
- Trabalhe melhor em conjunto — produtividade otimizada entre os aplicativos do Office
- Avaliação completa por30 dias — sem registro e sem cartão de crédito
- Melhor custo-benefício — economize comparado à compra individual de add-ins