Boa noite, amigo! Excelente dica. Mas no meus caso, eu precisaria salvar relatórios distintos numa relação com vários nomes de vendedores. Ou seja, um relatório por vendedor. Como eu faria?
Oi, eu fiz uma planilha de cadastro e fiz um botão pra salvar PDF. Porem quando eu vou clicar no botão ele aparecesse o erro 1004 dizendo : o documento não foi salvo . Talvez esteja aberto ou pode ter ocorrido um erro durante a gravação. O que eu faço? Obrigada
Veja o exemplo 6 neste artigo: exceleasy.com.br/macro-para-exportar-pdf/ Nesta opção você tem a caixa "Salvar como" podendo alterar o nome do arquivo PDF. Se tentar usar o mesmo nome em dois arquivos em um mesmo local, infelizmente não será possível.
Você precisa ajustar as colunas antes de exportar o PDF. Neste caso, você pode usar o código deste post em nosso site: exceleasy.com.br/como-ajustar-colunas-no-excel-vba/
Muito top, obrigado por compartilhar com os meros mortais Porém me surgiu uma dúvida. Quando abre a pasta do Save as, e clico no cancelar o arquivo ainda é gerado. Como faço para que ao clicar no cancelado, o arquivo não é gerado, mas retorna a planilha. Grato pelo apoio
Olá Itaelcio! Neste caso, use o código abaixo: Sub gerarPDF() Dim NomeArquivo As Variant NomeArquivo = Application.GetSaveAsFilename("", fileFilter:="PDF (*.pdf), *.pdf") If NomeArquivo False Then ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:=NomeArquivo End If End Sub
Fiz alguns testes na versão 2019 do Excel e funcionou corretamente os links. Qual versão você está usando? Como os links foram inseridos? Eles apontam para páginas da internet ou para dentro do próprio documento?
Pode ser algum bug do Excel. Você tentou instalar ou já tem o Adobe Acrobat em seu computador? Quando ele é instalado no computador, você terá uma guia adicional no Excel para exportar PDF por ele. Pode ser que funcione por este meio.
Galera quem tiver dificuldade de exporta todas as planilhas do documento é so substituir a linha de comando que começa com ActiveSheet por esta: ActiveWorkbook.ExportAsFixedFormat Type:=xlTypePDF
Boa tarde! Estou usando esse mesmo código mas quando gera o relatório, ele esta indo para a pasta "documentos" ao invés da pasta em que se encontra a planilha. Engraçado porque antes estava funcionando direitinho e hoje começou a dar este erro. Saberia dizer o motivo ou como resolvo?
Provavelmente a sua planilha foi movida para a pasta Documentos. O código mostrado no vídeo salva o PDF no mesmo local em que a planilha está salva.
3 ปีที่แล้ว
Boa Noite Quando executo a macro, o arquivo PDF vai diretamente para a pasta de Documentos do meu computador. Tentei usar esse comando, porem não adiantou: Sub ExportarPDF() Dim Pasta As String Pasta = Application.ActiveWorkbook.Path ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:=Range("A1").Value End Sub Pode ser porque utilizo minhas pastas sincronizadas com o Onedrive?
Application.ActiveWorkbook.Path significa que você está enviando o seu PDF no mesmo local onde está salva a sua Planilha. Se você precisa escolher o local usando a opção Salvar Como, então use o exemplo 6 do link abaixo: exceleasy.com.br/macro-para-exportar-pdf/
Olá! Existem diferentes razões para se receber o Erro 1004 no VBA. Recomendo que confira este artigo em nosso site com as causas mais comuns. Acredito que poderá lhe auxiliar na solução. exceleasy.com.br/erro-em-tempo-de-execucao-1004/
Eu particularmente desconheço esta opção usando o VBA. Dá uma olhada neste tópico, pode ser que encontre alguma solução para o seu caso: answers.microsoft.com/en-us/msoffice/forum/all/save-password-protected-pdf-file-with-vba/e3b0be70-d7a5-421b-888f-980d35386c40
Olá obrigado pela dica, utilizei numa planilha, funcionou. Tive que instalar o suplemento, pois meu Office é o 2007.
Muito top, muito obrigado por compartilhar seu conhecimento, estei a partir de agora seguindo seu canal e compartilhando com os colegas de trabalho.
Obrigado Eduardo!
Boa noite, amigo!
Excelente dica. Mas no meus caso, eu precisaria salvar relatórios distintos numa relação com vários nomes de vendedores. Ou seja, um relatório por vendedor. Como eu faria?
Trabalho foda!
Top! Parabéns!
Muito bom! Parabéns!
Oi, eu fiz uma planilha de cadastro e fiz um botão pra salvar PDF. Porem quando eu vou clicar no botão ele aparecesse o erro 1004 dizendo : o documento não foi salvo . Talvez esteja aberto ou pode ter ocorrido um erro durante a gravação. O que eu faço? Obrigada
Como faço pra gerar em outro formato ao invés do Excel?
Por exemplo, um txt ou até mesmo outra planilha Excel?
Muito bom!!!
Muito bom o vídeo parabéns, gostaria de saber se existe uma maneira de salvar sem que apague o último pdf?
Veja o exemplo 6 neste artigo: exceleasy.com.br/macro-para-exportar-pdf/
Nesta opção você tem a caixa "Salvar como" podendo alterar o nome do arquivo PDF.
Se tentar usar o mesmo nome em dois arquivos em um mesmo local, infelizmente não será possível.
Amigo, tem alterar a formatação do PDF? Por exemplo: ativar a opção de dimencionar as colunas.
Você precisa ajustar as colunas antes de exportar o PDF. Neste caso, você pode usar o código deste post em nosso site:
exceleasy.com.br/como-ajustar-colunas-no-excel-vba/
Muito top, obrigado por compartilhar com os meros mortais
Porém me surgiu uma dúvida. Quando abre a pasta do Save as, e clico no cancelar o arquivo ainda é gerado. Como faço para que ao clicar no cancelado, o arquivo não é gerado, mas retorna a planilha.
Grato pelo apoio
Olá Itaelcio!
Neste caso, use o código abaixo:
Sub gerarPDF()
Dim NomeArquivo As Variant
NomeArquivo = Application.GetSaveAsFilename("", fileFilter:="PDF (*.pdf), *.pdf")
If NomeArquivo False Then
ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:=NomeArquivo
End If
End Sub
@@ExcelEasyBR Obrigado meu caro, me ajudou muito. Vlw, Abraços
Obrigado pela dica!
Preciso saber como faço para o excel pedir um nome para o arquivo, pois ele sobrescreve o orçamento que ja tenho.
Use o Exemplo 6 mostrado neste artigo: exceleasy.com.br/macro-para-exportar-pdf/
Opa. Como consigo salvar em pdf sem fechar as outras guias de excel que estao abertas?
Sim, o código é o mesmo apresentado no vídeo.
@@ExcelEasyBR obrigada ☺️
Amigão, como fazer pra gerar o pdf do excel e manter os hiperlinks clicáveis???
Fiz alguns testes na versão 2019 do Excel e funcionou corretamente os links.
Qual versão você está usando?
Como os links foram inseridos? Eles apontam para páginas da internet ou para dentro do próprio documento?
@@ExcelEasyBR é a versão mais nova do Excel, os links vem direto da página do TH-cam
Pode ser algum bug do Excel. Você tentou instalar ou já tem o Adobe Acrobat em seu computador? Quando ele é instalado no computador, você terá uma guia adicional no Excel para exportar PDF por ele. Pode ser que funcione por este meio.
Galera quem tiver dificuldade de exporta todas as planilhas do documento é so substituir a linha de comando que começa com ActiveSheet por esta: ActiveWorkbook.ExportAsFixedFormat Type:=xlTypePDF
Grato pela sua contribuição Danilo!
Eu preciso transformar linhas do Excel em um arquivo independe. É possível?
Não entendi muito bem a sua pergunta. Se puder exemplificar, ficará mais fácil de entender.
Boa tarde! Estou usando esse mesmo código mas quando gera o relatório, ele esta indo para a pasta "documentos" ao invés da pasta em que se encontra a planilha. Engraçado porque antes estava funcionando direitinho e hoje começou a dar este erro. Saberia dizer o motivo ou como resolvo?
Provavelmente a sua planilha foi movida para a pasta Documentos. O código mostrado no vídeo salva o PDF no mesmo local em que a planilha está salva.
Boa Noite
Quando executo a macro, o arquivo PDF vai diretamente para a pasta de Documentos do meu computador.
Tentei usar esse comando, porem não adiantou:
Sub ExportarPDF()
Dim Pasta As String
Pasta = Application.ActiveWorkbook.Path
ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:=Range("A1").Value
End Sub
Pode ser porque utilizo minhas pastas sincronizadas com o Onedrive?
Application.ActiveWorkbook.Path significa que você está enviando o seu PDF no mesmo local onde está salva a sua Planilha.
Se você precisa escolher o local usando a opção Salvar Como, então use o exemplo 6 do link abaixo:
exceleasy.com.br/macro-para-exportar-pdf/
Amigo o meu esta apagando a ultima planilha salva
Você realizou alguma alteração no código?
Se puder, cole aqui nos comentários o seu código para que eu possa tentar te auxiliar.
No computador funciona. Mas no celular não. O que posso fazer para funcionar no mobile tbm?
Macros não são compatíveis com o Excel do celular.
🙀👏👏👏👏👏🙏
Só abre no meu computador. Quando envio por e-mail e salvo em outro, dá erro 1004.
Olá! Existem diferentes razões para se receber o Erro 1004 no VBA. Recomendo que confira este artigo em nosso site com as causas mais comuns. Acredito que poderá lhe auxiliar na solução.
exceleasy.com.br/erro-em-tempo-de-execucao-1004/
Boa tarde!! Fiz o passo a passo de vocês, mas ao gerar o arquivo em pdf não aparece nada. Poderiam me ajudar?
Olá! O arquivo chegou a ser gerado e ficou em branco? Ou ele simplesmente não foi gerado?
Qual é a versão do Excel que você está usando?
é possível já colocar uma senha no pdf?
Eu particularmente desconheço esta opção usando o VBA.
Dá uma olhada neste tópico, pode ser que encontre alguma solução para o seu caso:
answers.microsoft.com/en-us/msoffice/forum/all/save-password-protected-pdf-file-with-vba/e3b0be70-d7a5-421b-888f-980d35386c40