Excel exportar intervalo excel em imagem .jpg ou .png

[guicrissantos]

Boa tarde!

 

Tenho uma planilha com uma tabela de dados da qual, preciso exporta-la em imagem .jpg ou .png.

 

No código abaixo, conseguiu gerar a planilha e fazer todo o processo funcionar porém, está me trazendo erro de caminho ou seja, não está exportando a imagem.

Se alguém puder me auxiliar, ficarei grato.

 

Citação

Sub ExportarJPG()
    Dim abaTemporaria As Worksheet
    Dim graficoTemporario As Chart
    
    Range("A1:C3").Select
    Selection.CopyPicture
    
    Set abaTemporaria = Worksheets.Add
    Charts.Add
    ActiveChart.Location where:=xlLocationAsObject, Name:=abaTemporaria.Name
    
    Set graficoTemporario = ActiveChart
    
    graficoTemporario.Paste
    
    With Selection
        .Height = 500
        .Width = 500
    End With
    
    abaTemporaria.ChartObjects(1).Select
    With Selection
        .Height = 100
        .Width = 500
    End With
      
    caminhoDoArquivo = ActiveWorkbook.Path
    nomeDaImagem = "\" & Worksheets("ExportFalhasIntExt").Range("A1") & ".jpg"

    graficoTemporario.Export caminhoDoArquivo & nomeDaImagem
    
    Application.DisplayAlerts = False
    abaTemporaria.Delete
    Application.DisplayAlerts = True
End Sub

 

No aguardo,

Obrigado.

[guicrissantos]

Boa Noite!

Será que alguém pode me ajudar?

[Luciana Goes]

@guicrissantos Olá!

Rodei a planilha aqui e não ocorreu nenhum erro. 

Quando roda a macro, o arquivo é salvo automaticamente na área de trabalho.

Qual o erro que aparece aí pra você?

 

graficoTemporario.zip

[guicrissantos]

53 minutos atrás, Luciana Goes disse:

@guicrissantos Olá!

Rodei a planilha aqui e não ocorreu nenhum erro. 

Quando roda a macro, o arquivo é salvo automaticamente na área de trabalho.

Qual o erro que aparece aí pra você?

 

graficoTemporario.zip 13 kB · 0 downloads

Olá Luciana...

Muito obrigado por me responder.

Estranho no meu ele não identifica o caminho onde será salvo a imagem e traz um erro.
Vou fazer novos testes e caso o erro persista, printo a tela para você ver.

Por hora, muito obrigado pela atenção.

[Luciana Goes]

Fiz umas alterações.

Veja se deu certo.

graficoTemporario.zip

[guicrissantos]

Em 05/07/2021 às 13:57, Luciana Goes disse:

Fiz umas alterações.

Veja se deu certo.

graficoTemporario.zip 18 kB · 1 download

Luciana,

 

Boa Noite!

 

Só tenho a lhe agradecer. Funcionou perfeitamente porém, preciso de mais uma ajudinha.

O arquivo anexo que estou lhe enviando agora (o mesmo que você me enviou da primeira vez) eu demonstrei a seguinte situação:

 

Na Guia "LANÇAMENTOS" são lançados os dados manualmente.

Na Guia "RESULTADOS" existe uma formatação que puxa da guia "LANÇAMENTOS" as informações e as coloca nas suas respectivas células e colunas.

 

O código que criamos anteriormente serve para exportar a imagem mensal dos resultados da guia "ExportFalhasIntExt".

 

Preciso agora automatizar o preenchimento da planilha que recebe os dados para exportação porém, sem deixar lacunas em branco.

Explicando melhor:

Na guia "RESULTADOS" os dados aparecem diferenciando entre EXTERNAS e INTERNAS porém deixam lacunas em branco. Na imagem exportada, não pode ter espaços em branco e sim, uma lista contendo os números das RNC'S INTERNAS e EXTERNAS lançadas uma abaixo da outra.

Outro detalhe é que a exportação da imagem, deve mostrar apenas as RNC's de cada mês ou seja, JANEIRO, FEVEREIRO, etc..
 

Como já conseguimos automatizar essa exportação, será que você consegue me auxiliar na criação de um código que traga os dados da guia RESULTADOS e acomode-os dentro do intervalo A1:b30 da guia "ExportFalhasIntExt" para que depois possamos exportar com o código que criamos.

 

Quando clico em exportar, o objetivo é exportar tudo que foi lançado em JANEIRO, depois FEVEREIRO, depois MARÇO e assim sucessivamente.

 

Será que deu para entender?

graficoTemporario3.rar

[Luciana Goes]

@guicrissantos Olá,

Veja como ficou.

Não sei se te atende.

graficoTemporario.zip

[guicrissantos]

6 horas atrás, Luciana Goes disse:

@guicrissantos Olá,

Veja como ficou.

Não sei se te atende.

graficoTemporario.zip 143 kB · 0 downloads

Luciana!

 

Sensacional!

Apenas um detalhe...

A imagem precisa de alguma forma, listar as RNC's por mês ou seja, terei que gerar uma imagem de JANEIRO outra de FEVEREIRO, outra de MARÇO e assim sucessivamente.

 

O que você me sugere neste caso?

[Luciana Goes]

@guicrissantos Neste caso, a imagem seria uma única linha de cada mês então? Ou seriam meses iguais, mas com anos diferentes?

[guicrissantos]

49 minutos atrás, Luciana Goes disse:

@guicrissantos Neste caso, a imagem seria uma única linha de cada mês então? Ou seriam meses iguais, mas com anos diferentes?

Bom dia Luciana...

Todos os meses, preciso finalizar o balanço emitindo uma imagem com as RNC'S INTERNAS E EXTERNAS daquele mês logo, seriam por mês sim.

Ao final de cada ano, essa planilha vai para o arquivo morto e abre-se uma nova para gestão do ano seguinte.

[Luciana Goes]

Boa tarde!

Entendendo melhor sua necessidade, fiz algumas alterações.

Veja se resolve.

 

As abas que estão na cor vermelha não são utilizadas com as mudanças que fiz.

 

Trabalhei aqui com a tabela dinâmica, na qual você deverá apenas filtrar por data (célula H2) e as fórmulas já deixarão tudo formatado do jeito que você precisa.

 

Aguardo seu retorno.

 

graficoTemporario.zip

[guicrissantos]

2 horas atrás, Luciana Goes disse:

Boa tarde!

Entendendo melhor sua necessidade, fiz algumas alterações.

Veja se resolve.

 

As abas que estão na cor vermelha não são utilizadas com as mudanças que fiz.

 

Trabalhei aqui com a tabela dinâmica, na qual você deverá apenas filtrar por data (célula H2) e as fórmulas já deixarão tudo formatado do jeito que você precisa.

 

Aguardo seu retorno.

 

graficoTemporario.zip 161 kB · 0 downloads

Luciana...

 

Estamos a 99% do êxito.

 

Na verdade, onde filtro data, preciso filtrar MÊS de modo que todas as RNC'S daquele mês (EXEMPLO: Janeiro/21) sejam lançadas na tabela que será exportada.

A tabela que será exportada só precisa mostrar duas colunas sendo RNC'S INTERNAS e RNC'S EXTERNAS.

 

Pode modificar isso por favor?