Função para dividir planilhas em PDF no Excel

Para criar uma nova função, que transforma suas planilhas em PDF no Excel, pressione em seu teclado ALT + F11.
Surgirá uma nova janela (editor Visual Basic). No menu acesse INSERIR/MÓDULO, e cole o texto abaixo:

Sub ExportToPDFs()

Dim ws As Worksheet

For Each ws In Worksheets
ws.Select
nm = ws.Name

ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, _
Filename:="C:\temp\" & nm & ".pdf", _
Quality:=xlQualityMinimun, IncludeDocProperties:=True, _
IgnorePrintAreas:=False, OpenAfterPublish:=False

Next ws

End Sub

Após isso volte para a janela do Excel.

Execute a macro ExportToPDFs() e mande executar.

Sua planilha será dividida em vários pdfs, no caso na pasta c:\temp

Você pode alterar o caminho no código fonte da macro.

Inscrições Abertas – Curso de Excel