Define area in Dashboard to PPT

[eromiyasimon]

hi all im using below query to export dashboard PPT

DashBoard to PPT

sub exportppt Set objPPT = CreateObject("PowerPoint.Application") objPPT.Visible = True Set objPresentation = objPPT.Presentations.Add objPresentation.SaveAs "D:\QlikView\Exportj.ppt" PPSlideNo = 1 For i = 0 to activedocument.noofsheets -1 Set PPSlide = objPresentation.Slides.Add(PPSlideNo,12) ActiveDocument.GetApplication.WaitForIdle ActiveDocument.ActiveSheet.CopyBitmapToClipboard PPSlide.Shapes.Paste PPSlide.Shapes(PPSlide.Shapes.Count).Top = 1 PPSlide.Shapes(PPSlide.Shapes.Count).Left = 1 PPSlide.Shapes(PPSlide.Shapes.Count).Width = 350 PPSlide.Shapes(PPSlide.Shapes.Count).Height = 350 PPSlide.Shapes(PPSlide.Shapes.Count).PictureFormat.CropRight = 20 Set PPSlide = Nothing Set PPPres = Nothing Set PPApp = Nothing activedocument.nexttab PPSlideNo = PPSlideNo + 1 NEXT objPresentation.Save objPresentation.Close objPresentation.Quit End Sub

Using this query im missing out some areas in bottom like below

Kindly help me to define  my area (or) to copy perfectly from dashboard

here's a example crop attached

thank you in advance

[adamdavi3s]

Is it not just because you're fixing the output size to 350 by 350 and cropping and that is cutting the bottom off?

Can you set .LockAspectRatio = True and resize one size to fit?

[vinieme12]

Does your Dashboard fit to your screen 100% or do you have to scroll down?

Fit the dashboard to your screen, that is all you need to do

[vinieme12]

I think that code is just resizing the image not for cropping

[eromiyasimon]

can you please give exact code and placing location for locking aspect ratio

[vinieme12]

ActiveDocument.ActiveSheet.CopyBitmapToClipboard

This will only take a screenshot of what appears on screen , not offscreen

[eromiyasimon]

sir i have implemented all the things that you mentioned above and still its not working.

thank you

[vinieme12]

Are you sure you have no scrollbars on the dashboard to the right???

Delete your old PPT and try