The following code worked for me. You may give it a try.
Before running the following code write something on each of the three
sheets.
You can just copy and paste the following code and run. Hope it helps.
'==START
Sub createPrintJobs()
Dim i As Integer
Dim batPRN As String
ba
I was not able to get this to work. I have heard that PDF creator has
hooks in it for this kind of thing, but I have not investigated that
yet.
On May 21, 11:05 am, Dustin wrote:
> I'll try that out and get back to you.
>
> For this example, creating multiple print jobs is trivial - but the
> ac
I'll try that out and get back to you.
For this example, creating multiple print jobs is trivial - but the
actual application involved many thousands of records that will be
printed, so it is a little more important to have separate print jobs
if possible.
On May 21, 3:45 am, Akhilesh Karna w
As far as I know it will not be possible to achieve what you are trying to,
by a simple macro.
Other way, I can think of, is to print each invoice to a file (prn file)
using the following code. Then combine all the prn files into one(using
macro). Then sending the print command using shell_execute
Akhilesh,
Thank you for your response. Though that line is helpful, it is not
what I need. Maybe this simple example will help clarify:
Sub test()
For i = 0 To 10
Range("A1").Select
ActiveCell.FormulaR1C1 = i
ActiveWindow.SelectedSheets.PrintOut Copies:=1
Next
End Sub
The way that this is curr
Maybe I got it wrong. But if I understand correctly, then you can use the
following code at the end of the loop ( when your data is being read to the
invoice).
ActiveWindow.SelectedSheets.PrintOut Copies:=1
Hope you make your problem more clear if the above does not help.
Akhilesh Kumar Karn
