Exportar cada planilha para um arquivo PDF no Excel usando macros VBA

Você já criou um PDF a partir de uma planilha no Excel? É fácil, não é?

Criar arquivos PDF a partir de planilhas do Excel é uma tarefa fácil. E se no arquivo do Excel houver muitas planilhas? Por exemplo, um relatório de vendas em um mês para cada arquivo do Excel composto por 30 dias, em que o relatório de cada dia é armazenado em uma planilha diferente. Ou talvez cada arquivo do Excel contenha centenas de planilhas e você precise criar um arquivo PDF de cada planilha.

O trabalho fácil se torna pesado se o volume for muito grande. Tapi tidaO trabalho fácil se torna pesado se o volume for muito grande. Mas não se preocupe, usar macros do Excel não será um problema.

Exportar planilha do Excel para PDF com Macro VBA

1. Abra as macros do Excel, consulte como criar macros.
2. Copie o seguinte script

Sub ExportToPDFs()
' Bardimin
' Export Sheet to PDF
' Save Each Worksheet to a separate PDF file.
 
Dim ws As Worksheet
Dim myFile As String
myFile = Application.ActiveWorkbook.Path

For Each ws In Worksheets
ws.Select
sheetName = ws.Name
 
ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, _
Filename:=myFile & "" & sheetName & ".pdf", _
Quality:=xlQualityStandard, IncludeDocProperties:=True, _
IgnorePrintAreas:=False, OpenAfterPublish:=False
 
Next ws
End Sub

3. Executar macro

A macro exportar planilha para PDF produzirá um arquivo PDF com um nome semelhante ao nome da planilha no Excel que você criou e salvou no diretório da mesma forma que o arquivo do Excel.

To change the name of the resulting PDF file, you can change the following line of code

Filename:=myFile & "" & sheetName & ".pdf", _

Boa sorte……