Como salvar apenas uma planilha em uma pasta de trabalho no Excel?

Ao usar o Excel, é fácil salvar apenas uma planilha de uma pasta de trabalho como um novo arquivo do Excel. Mas e se você mantiver apenas uma planilha e excluir as outras planilhas da pasta de trabalho? Este artigo mostrará como salvar apenas uma planilha como um novo arquivo do Excel e, em seguida, excluir as planilhas inativas na pasta de trabalho atual.

Salve apenas uma planilha como um novo arquivo Excel com Mover ou Copiar
Salve apenas uma planilha na pasta de trabalho atual com VBA
Salve apenas uma planilha na pasta de trabalho atual com um clique

---

Salve apenas uma planilha como um novo arquivo Excel com Mover ou Copiar

O Mover ou Copiar utilitário de recurso do Excel ajuda você a salvar facilmente uma determinada planilha como um novo arquivo do Excel. Você pode fazer o seguinte.

1. Clique com o botão direito na guia da planilha (a planilha que você precisa salvar como um novo arquivo) na barra da guia da planilha e clique em Mover ou Copiar.

2. No Mover ou Copiar caixa de diálogo, selecione (livro novo) de Agendar lista suspensa, verifique o Crie uma cópia e, em seguida, clique no OK botão. Veja a imagem:

3. Em seguida, a planilha especificada é movida em uma nova pasta de trabalho criada, salve esta pasta de trabalho manualmente.

---

Salve apenas uma planilha na pasta de trabalho atual com VBA

Se você deseja excluir todas as planilhas e salvar apenas uma determinada planilha na pasta de trabalho atual, o código VBA a seguir pode ajudá-lo.

1. Pressione outro + F11 simultaneamente para abrir o Microsoft Visual Basic para aplicativos janela.

2. No Microsoft Visual Basic para aplicativos janela, clique em inserção > Módulo. Em seguida, copie e cole o código VBA abaixo na janela Módulo.

Código VBA: exclua todas as planilhas, exceto algumas na pasta de trabalho atual

Sub DeleteSheets1()
    Dim xWs As Worksheet
    Application.ScreenUpdating = False
    Application.DisplayAlerts = False
    For Each xWs In Application.ActiveWorkbook.Worksheets
        If xWs.Name <> "test" Then
            xWs.Delete
        End If
    Next
    Application.DisplayAlerts = True
    Application.ScreenUpdating = True
End Sub

Nota: no código, “teste”É o nome da planilha que precisamos manter apenas na pasta de trabalho atual. Por favor, mude para o nome da sua planilha.

3. Pressione a tecla F5 para executar o código. Em seguida, você pode ver que todas as planilhas nas pastas de trabalho atuais foram excluídas, exceto a especificada. Em seguida, salve a pasta de trabalho conforme necessário.

---

Salve apenas uma planilha na pasta de trabalho atual com um clique

O Excluir todas as folhas inativas utilidade de Kutools for Excel ajuda a excluir rapidamente todas as planilhas, exceto a atual, com apenas um clique.

1. Mude para a planilha que você precisa manter apenas na pasta de trabalho atual e clique em Kutools Plus > Planilha > Excluir todas as folhas inativas. Veja a imagem:

Em seguida, uma caixa de diálogo de prompt aparece, se você decidir excluí-los, clique no OK botão.

Então, todas as planilhas inativas são excluídas imediatamente da pasta de trabalho atual.

---

Salve apenas uma planilha