-
Printing from Business Objects
I have a large report in Business Objects v5.0.2. The report stretches across three or more pages horizontially and over 100 pages down. I would like to print only the first page of each group. I've tried working with VB to do this, but haven't been successful. This is what I've tried:
[VBA]Public Sub PrintSelectPages()
Dim PgNm As Page
Dim CurRpt As Report
Dim CurDoc As Document
Dim i As Integer
Set CurRpt = Application.ActiveReport
Set CurDoc = Application.ActiveDocument
For i = 1 To CurRpt.NumberOfPages Step 4
CurDoc.PrintDialog
SendKeys "%g", Wait:=True
SendKeys CStr(i), Wait:=True
SendKeys "{Tab}", Wait:=True
SendKeys CStr(i), Wait:=True
SendKeys "{Enter}", Wait:=True
Next
End Sub[/VBA]
Is it possible to do what I am trying to do? Any help is greatly appreciated.
Posting Permissions
- You may not post new threads
- You may not post replies
- You may not post attachments
- You may not edit your posts
-
Forum Rules