Exportar Imagem PowerPoint

[paulomulato]

    Senhores, poderiam me dizer se é possivel eu exportar imagens do qlikview para o powerpoint, se sim como faria isso, hoje eu faço algo semelhante do excel para o powerpoint via macro, é possivel da mesma forma fazer no qlik, obrigado.

[nicolett_yuri]

Paulo, é possível somente por macro ou se você tiver o Nprinting.

Segue um exemplo de código de macro

[paulomulato]

Yuri, voce pode enviar o codigo no corpo da mensagem, estou usando o personal edition.

[nicolett_yuri]

Vou te passar o código de macro.

Os objetos CH01 até o CH05 são gráficos de exemplo.

Sub ppt

'An array with the objects you want to export to powerpoint
Dim myArray(4)
myArray(0) = "CH01"
myArray(1) = "CH02"
myArray(2) = "CH03"
myArray(3) = "CH04"
myArray(4) = "CH05"

'Create ppt object
Set objPPT = CreateObject("PowerPoint.Application")
objPPT.Visible = True
Set objPresentation = objPPT.Presentations.Add

'Apply a template if you want one
'objPresentation.ApplyTemplate _
  '  ("C:\mytemplate.potx")

'For each object in the array create a new slide and paste it.
For each item in myArray

Set PPSlide = objPresentation.Slides.Add(1,11)
ActiveDocument.GetSheetObject(item).CopyBitmapToClipboard
PPSlide.Shapes.Paste

Next

'Clean up
Set PPSlide = Nothing
Set PPPres = Nothing
Set PPApp = Nothing

End Sub

[paulomulato]

Obrigado.

[nicolett_yuri]

Não esqueça de habilitar a segurança de execução da macro: dentro do editor de módulo (ctrl + m), deixe as opções:

Módulo de segurança requerido: Acesso ao sistema

Segurança local atual: Permitir acesso ao sistema

Quando for fazer o teste da macro, faça pelo qvClient ou então por acesso web pelo IE Plugin (Ajax pode não funcionar).

[Clever_Anjos]

Já conseguiu a resposta? Se sim, escolha uma e marque como "Correta" para fechar o tópico e nos ajudar a manter a comunidade organizada