Fóruns
Microsoft Excel - 2...
2024 - VBA & Macros
Gerar relatório em ...
 
Notifications
Clear all

Gerar relatório em pdf conforme base de dados

 
Página 1 / 2
2024 - VBA & Macros
Post Recente por afbergman 9 anos atrás
18 Posts
2 Usuários
0 Reactions
3,079 Visualizações
RSS
 afbergman
(@afbergman)
Posts: 108
Estimable Member
Topic starter
 

Olá pessoal,

Me ajudem: tenho uma plan e gostaria de criar uma macro para gerar um relatório que transmitisse a mesma imagem da planilha da base de dados. A questao é que nao sei configurar para gerar o pdf no mesmo formato da planilha.

Segue imagem para facilitar:

Estou enviando também cópia do arquivo para que possam entender melhor.
Muito obrigado.

Desacoplagem NOVA.xlsm
 
Postado : 02/09/2015 2:53 pm
 MPrudencio
(@mprudencio)
Posts: 2749
Famed Member
 

Basta salvar como e escolher a extensão PDF em tipo do arquivo.

Caso vc esteja fazendo assim e o pdf tenha ficado incorreto vc precisa corrigir na formatação da planilha

Marcelo Prudencio
Microsoft Excel Brasil no Facebook

"Começar já é a metade do caminho."
Autor Desconhecido

Simplifica que simples fica.
Nicole Tomazella.

"O Simples é Sempre Melhor Que o Complicado"
Jorge Paulo Lemann.

 
Postado : 02/09/2015 4:52 pm
 afbergman
(@afbergman)
Posts: 108
Estimable Member
Topic starter
 

Na verdade não é isso, eu criei um botao que abre um formulario no qual seleciono as datas que quero gerar o relatorio, dps basta clicar em gerar relatório e ele gera o arquivo pdf com essa imagem e com os dados entre as datas escolhidas. Acho q agora deixei mais claro.

Abraços.

 
Postado : 03/09/2015 6:37 am
 afbergman
(@afbergman)
Posts: 108
Estimable Member
Topic starter
 

Alguem consegue me ajudar nessa?????

 
Postado : 05/09/2015 6:19 am
 MPrudencio
(@mprudencio)
Posts: 2749
Famed Member
 

Esse codigo salva em pdf, tente ajustar ao seu relatorio

Sub PDF()

ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _
"C:relatorioDesacoplagem NOVA.pdf", Quality:= _
xlQualityMinimum, IncludeDocProperties:=True, IgnorePrintAreas:=False, _
OpenAfterPublish:=True

End Sub

Marcelo Prudencio
Microsoft Excel Brasil no Facebook

"Começar já é a metade do caminho."
Autor Desconhecido

Simplifica que simples fica.
Nicole Tomazella.

"O Simples é Sempre Melhor Que o Complicado"
Jorge Paulo Lemann.

 
Postado : 05/09/2015 6:36 am
 afbergman
(@afbergman)
Posts: 108
Estimable Member
Topic starter
 

Esse codigo salva em pdf, tente ajustar ao seu relatorio

Sub PDF()

ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _
"C:relatorioDesacoplagem NOVA.pdf", Quality:= _
xlQualityMinimum, IncludeDocProperties:=True, IgnorePrintAreas:=False, _
OpenAfterPublish:=True

End Sub

Fala prudencio,

Acho q nao me fiz entender muito bem. Preciso de um codigo que eu consiga filtrar o relatorio de acordo com as datas selecionadas num form, e dps gerar o pdf com essas informações no formato dessa plan. Entendeu?

Tipo isso:

Segue o arquivo caso queira dar uma olhada.
Abraços.

Desacoplagem NOVA.xlsm
 
Postado : 05/09/2015 8:19 am
 MPrudencio
(@mprudencio)
Posts: 2749
Famed Member
 

Ajuda mais se a planilha tiver dados de exemplos.

Marcelo Prudencio
Microsoft Excel Brasil no Facebook

"Começar já é a metade do caminho."
Autor Desconhecido

Simplifica que simples fica.
Nicole Tomazella.

"O Simples é Sempre Melhor Que o Complicado"
Jorge Paulo Lemann.

 
Postado : 05/09/2015 11:03 am
 afbergman
(@afbergman)
Posts: 108
Estimable Member
Topic starter
 

Ajuda mais se a planilha tiver dados de exemplos.

Segue:

 
Postado : 05/09/2015 1:04 pm
 MPrudencio
(@mprudencio)
Posts: 2749
Famed Member
 

Cara EXEMPLO É IGUAL ARQUIVO PARA MANIPULAÇÃO E NAO UMA IMAGEM, a imagem so atrapalha aguardo um arquivo.

Marcelo Prudencio
Microsoft Excel Brasil no Facebook

"Começar já é a metade do caminho."
Autor Desconhecido

Simplifica que simples fica.
Nicole Tomazella.

"O Simples é Sempre Melhor Que o Complicado"
Jorge Paulo Lemann.

 
Postado : 05/09/2015 6:22 pm
 afbergman
(@afbergman)
Posts: 108
Estimable Member
Topic starter
 

Cara EXEMPLO É IGUAL ARQUIVO PARA MANIPULAÇÃO E NAO UMA IMAGEM, a imagem so atrapalha aguardo um arquivo.

Segue!!!

Desacoplagem NOVA.xlsm
 
Postado : 06/09/2015 7:40 am
 MPrudencio
(@mprudencio)
Posts: 2749
Famed Member
 

Vc postou a planilha sem dados mas inseri um codigo que gera um pdf da aba que vc deseja, o nome da macro é pdf e para funcionar vc precisa criar uma pasta com o nome backup na sua unidade C:, caso pretenda salva-la em outro local é preciso editar o codigo informando o novo local.

Veja o arquivo

Marcelo Prudencio
Microsoft Excel Brasil no Facebook

"Começar já é a metade do caminho."
Autor Desconhecido

Simplifica que simples fica.
Nicole Tomazella.

"O Simples é Sempre Melhor Que o Complicado"
Jorge Paulo Lemann.

 
Postado : 06/09/2015 10:41 am
 afbergman
(@afbergman)
Posts: 108
Estimable Member
Topic starter
 

Ficou perfeito!!!!!
Só uma coisa: Como uso um codigo para filtrar os dados de acordo com a data inserida no formRelatorio?

Abraços.

 
Postado : 06/09/2015 6:16 pm
 afbergman
(@afbergman)
Posts: 108
Estimable Member
Topic starter
 

Alguem consegue me ajudar nessa????

Como faço uma macro para filtrar os dados do meu relatorio por data num formulario e exibir o relatorio em pdf?

Abraços.

 
Postado : 09/09/2015 9:55 am
 MPrudencio
(@mprudencio)
Posts: 2749
Famed Member
 

A data sera informada onde????????????? de que maneira se puder ser em uma celula é facil fazer

Marcelo Prudencio
Microsoft Excel Brasil no Facebook

"Começar já é a metade do caminho."
Autor Desconhecido

Simplifica que simples fica.
Nicole Tomazella.

"O Simples é Sempre Melhor Que o Complicado"
Jorge Paulo Lemann.

 
Postado : 09/09/2015 4:13 pm
 MPrudencio
(@mprudencio)
Posts: 2749
Famed Member
 

Ve se isso ajuda

Marcelo Prudencio
Microsoft Excel Brasil no Facebook

"Começar já é a metade do caminho."
Autor Desconhecido

Simplifica que simples fica.
Nicole Tomazella.

"O Simples é Sempre Melhor Que o Complicado"
Jorge Paulo Lemann.

 
Postado : 09/09/2015 5:08 pm
Página 1 / 2
Forum Jump:
  Tópico Anterior
Próximo Tópico