Como alterar ou exportar arquivos do Excel para PDF?
Abaixo estão os exemplos de exportação de arquivos Excel para PDF.
Exemplo 1
Salvar planilha como arquivo PDF!
Por exemplo, observe os dados ou gráfico abaixo, que mostram a hierarquia do departamento em uma organização.
Podemos apenas escolher Salvar como na opção Arquivo e escolher o tipo Salvar como como “PDF”.
Isso ainda seria o arquivo como PDF, mas veja como fica quando você o abre.
Em PDF, vem em duas folhas diferentes, o que não faz absolutamente nenhum sentido. Se você estiver apenas usando Salvar como e escolher o tipo de arquivo como PDF, isso é o que acontece quando o conteúdo do arquivo ou planilha é mais do que a área adequada de uma única folha PDF.
Para isso, o que precisamos fazer é selecionar a área de conteúdo que estamos tentando salvar como um arquivo PDF. Em seguida, pressione Ctrl + P para abrir abaixo da janela de visualização da impressão.
Em Configurações, escolha “Ajustar folha em uma página”.
Agora clique em Salvar como na mesma janela e escolha PDF como o tipo de arquivo.
Isso ajustará todos os dados em uma única página PDF.
Esta é a técnica comum que todos nós usamos regularmente.
Porém, e se um botão puder produzir um arquivo PDF da planilha do excel ??? Sim, isso pode ser feito usando a codificação VBA; siga as etapas abaixo para criar o código VBA para converter a planilha do Excel em PDF.
Exemplo # 2 - Usando código VBA
Etapas para converter uma planilha do Excel em PDF usando o código VBA.
Etapa 1: Declare variáveis em VBA, conforme mostrado a seguir.
Etapa 2: agora defina a referência da pasta de trabalho e planilha para as variáveis "Ws" e "Wb."
Passo 3: Para dar um nome ao arquivo, precisamos registrar a hora atual, ou seja, a hora no momento da execução do código. Defina a hora para a variável “SaveTime.”
Etapa 4: Agora, precisamos salvar o arquivo PDF no local exato da pasta de trabalho em que estamos trabalhando. Atribua este valor à variável “Salvar caminho”.
Etapa 5: Agora, precisamos combinar os nomes dos arquivos e o tempo para criar um nome de arquivo exclusivo.
Etapa 6: Precisamos dar a opção de escolher o caminho de destino para salvar o arquivo.
Etapa 7: Agora, precisamos criar um arquivo PDF.
Caso ocorra algum erro, precisamos cuidar disso também. Portanto, o código abaixo fará o mesmo.
Abaixo está o código completo para você.
Código:
Sub Excel_To_PDF () 'Declare Variáveis Dim Ws As Planilha Dim Wb As Workbook Dim SaveTime As String Dim SaveName As String Dim SavePath As String Dim FileName As String Dim FullPath As String Dim SelectFolder As Variant' Set Variables On Error GoTo EH Set Wb = ActiveWorkbook Set Ws = ActiveSheet 'Record Current Time SaveTime = Format (Now (), "aaaa mm dd _ hhmm")' Record Current Workbook Folder Path Address SavePath = Wb.Path If SavePath = "" Then SavePath = Application.DefaultFilePath End If SavePath = SavePath & " " 'Dê um nome ao arquivo SaveName = "PDF" FileName = SaveName & "_" & SaveTime & ".pdf"' Instrua onde salvar FullPath = SavePath & FileName 'Habilite o seletor de pasta para escolher onde salvar o arquivo SelectFolder = Application.GetSaveAsFilename _ (InitialFileName: = FullPath, _ FileFilter: = "Arquivos PDF (* .pdf), * .pdf", _ Title: = "Selecione a pasta e o nome do arquivo para salvar") 'Criar arquivo PDF Se SelectFolder "False" Then Ws .ExportAsFixedFormat _ Tipo: = xlTypePDF, _ FileName: = SelectFolder, _ Quality: = xlQualityStandard, _ IncludeDocProperties: = True, _ IgnorePrintAreas: = False, _ OpenAfterPublish: = False End If exit Não Abandler: Exit Sub EH: Msg criar arquivo PDF "Resume exitHandler End Sub= False, _ OpenAfterPublish: = False End If exitHandler: Exit Sub EH: MsgBox "Incapaz de criar arquivo PDF" Resume exitHandler End Sub= False, _ OpenAfterPublish: = False End If exitHandler: Exit Sub EH: MsgBox "Incapaz de criar arquivo PDF" Resume exitHandler End Sub
Copie este código e cole no módulo do Editor do Visual Basic para abrir o editor do Visual Basic pressione alt = "" + F11. Quando executamos este código pressionando a tecla F5, obtemos a seguinte opção.
Você pode ver que seu arquivo do Excel agora foi convertido em PDF.
Coisas para lembrar
- Se os dados não couberem o suficiente para uma única página, o PDF enviará o conteúdo extra para a próxima folha.
- Este código criará todo o conteúdo da planilha como um arquivo PDF.
- Depois de copiar o código da macro, você precisa salvar a pasta de trabalho como Pasta de trabalho habilitada para macro.
