ROBOT / VBA / API - Screencaptures printing

[Anonymous]

Hello,

I wonder if there's any way to make the external preview report from existing screencaptures.

Like:

   Sub PRINT_EXISTING_VIEWS()

     Dim robot As New RobotApplication
     For j = 1 To robot.Project.PrintEngine.ScreenCaptures.Count
     robot.Project.PrintEngine.AddToReport (test)
     Next j
     robot.Project.PrintEngine.ExternalPreviewReport EPF_MS_OFFICE

   End Sub

It will allow me to add some screencaptures that are not avaiable through API before generating the preview report.

Thanks for answering

VE

[Rafal.Gaweda]

I do not understand your loop

I guess you should use      Robot.Project.PrintEngine.AddScToReport .... in it

[Anonymous]

Dear Rafal,

Thanks for answering. I'll try to give you more details about what i would like to do.

For example, i have a file that contains about 20 screencaptures.

I'm trying to build a macro that allow me to generate the preview of these 20 screencaptures, by getting automaticly their names and other features.

Here's a sample, i hope it will be more explicit:

 Sub PRINT_EXISTING_VIEWS()

     Dim robot As New RobotApplication
     For j = 1 To robot.Project.PrintEngine.ScreenCaptures.Count
     robot.Project.PrintEngine.AddScToReport (2)  '<-------- How to get automaticly names of existing screencaptures?
     Next j
     robot.Project.PrintEngine.ExternalPreviewReport EPF_MS_OFFICE

End Sub

Thanks for answering,

Regards,

VE

[Rafal.Gaweda]

 Sub PRINT_EXISTING_VIEWS()

     Dim ScreenCaptureName as String
     Dim robot As New RobotApplication

     For j = 1 To robot.Project.PrintEngine.ScreenCaptures.Count
           ScreenCaptureName = robot.Project.PrintEngine.ScreenCaptures.Get(j)
           robot.Project.PrintEngine.AddScToReport ScreenCaptureName 
     Next j

     robot.Project.PrintEngine.ExternalPreviewReport EPF_MS_OFFICE

End Sub

[Anonymous]

Dear Rafal,

It's exactly what i was trying to do!

Thanks,

VE