Como utilizar um Botão de Comando para guardar a folha ativa como ficheiro PDF no Excel?
Ao trabalhar no Microsoft Excel, poderá deparar-se com dificuldades ao tentar guardar a folha ativa como ficheiros PDF. Neste artigo, vai aprender a guardar a folha ativa como ficheiros PDF utilizando código VBA através de um Botão de Comando. Além disso, se pretender guardar um intervalo específico ou cada folha do livro atual como ficheiros PDF individuais, este artigo também lhe será útil.
Utilize um Botão de Comando para guardar a folha ativa como Arquivos PDF com código VBA
Guarde facilmente a folha ativa ou cada folha como Arquivos PDF individuais com Kutools para Excel
Utilize um Botão de Comando para guardar a folha ativa como Arquivos PDF com código VBA
Pode executar o seguinte código VBA para guardar a folha ativa como ficheiro PDF ao clicar num botão de comando. Siga os passos abaixo.
1. Em primeiro lugar, crie uma pasta com o nome PDF para guardar os seus ficheiros PDF convertidos. Aqui, crio esta pasta no meu disco local (C:).
2. Insira um Botão de Comando clicando em Programador > Inserir > Botão de Comando (Controlo ActiveX). Veja a imagem:
2. Depois, desenhe um Botão de Comando na folha onde pretende adicionar novas linhas, clique com o botão direito do rato no Botão de Comando e selecione Propriedades no menu de contexto.
3. Na caixa de diálogo Propriedades, introduza o texto de exibição do botão de comando na caixa Legenda, no separador Categorizado, e depois feche a caixa de diálogo.
Pode verificar que o Texto de Exibição do Botão de Comando foi atualizado, conforme ilustrado na imagem seguinte.
4. Clique novamente com o botão direito do rato no Botão de Comando e, em seguida, selecione Ver Código no menu de contexto.
5. Na janela Microsoft Visual Basic para Aplicações aberta, substitua o código original na janela de código pelo seguinte código VBA.
Código VBA: Botão de Comando para guardar a folha ativa como PDF
Private Sub CommandButton1_Click()
Application.ScreenUpdating = False
ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, _
Filename:="C:\PDF\Export.pdf", _
OpenAfterPublish:=False
Application.ScreenUpdating = True
End SubNota: No código, CommandButton1 é o nome do botão de comando que utilizará para guardar a folha atual como ficheiro PDF. «C:\PDF\Export.pdf» é o caminho e o nome do seu ficheiro PDF guardado.
6. Prima simultaneamente as teclas Alt + Q para fechar a janela Microsoft Visual Basic para Aplicações. Depois, desative o Modo de Estrutura no separador Programador.
Agora, ao clicar no Botão de Comando, a folha ativa será guardada como um ficheiro PDF com o nome “Export” na localização especificada.
Guarde cada folha como Arquivos PDF individual de Workbook Atual com Kutools para Excel
Recomendamos aqui o utilitário Separar Livro do Kutools para Excel para guardar facilmente a folha ativa como um ficheiro PDF. Além disso, também pode guardar cada folha do livro de trabalho atual como ficheiros PDF individuais com este utilitário.
1. No livro em que pretende guardar cada folha como ficheiros PDF individuais, clique em KUTOOLS PLUS > Livro > Separar Livro. Veja a imagem:
2. Na caixa de diálogo Separar Livro, configure da seguinte forma:
Em seguida, a folha selecionada é imediatamente guardada como ficheiro PDF.
Notas:
Artigos relacionados:
- Como inserir automaticamente uma nova linha em branco utilizando um Botão de Comando no Excel?
- Como formatar uma célula para que pareça um botão 3D no Excel?
- Como ocultar ou mostrar um botão de comando com base num valor específico de uma célula 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