Print in same tiff using VBA

[Prabhu_Bob]

I have written the printout code in VBA within DO loop so that it prints correctly but as seperate files. The problem is that it is printing corectly but in seperate tiff's. I don't want it to be like that instead it should print page after page in a single tiff. I wanted the VBA code to do that. Please kindly help.

Thanks,
Prabhu

 

[Andrew Poulsom]

Can you post you code please? You could copy all the ranges that you want to print to a new worksheet and print that worksheet to TIFF.

 

[Prabhu_Bob]

Hi Andrew,

I have shown you a sample but in the original code the range is bigger where sheet1 uses employee details -sal, DOH, DOB etc for payroll.
Sheet two has an template for the payslip. I am printing the template within the loop so that tiff/payslip is created for all the employees.

I needed a change in code so that all payslips/tiffs fall under one single tiff (page after page) instead of printing multiple seperate tiffs.

i = 1
DO until sheet1.cells(i,1) <> ""
'sheet1 is the employee details
'sheet2 is a report template
sheet2.cells(i,1) = sheet1.cells(i,1)
sheet2.cells(i,2) = sheet1.cells(i,2)
sheet2.cells(i,3) = sheet1.cells(i,3)
pathwithfilename = "path" &filename &".tiff"
sheet2.range("A1:A3").printout from:=1, to:=1, copies:=1,prtofile:=true collate:=true,prtofilename:=pathwithfilename
i = i+1
loop

THanks,
Prabhu

 

[Andrew Poulsom]

Please post your real code, not pseudo code. That code does nothing because until should be while. Also it writes to A1:C1 but prints A1:A3.

 

[Prabhu_Bob]

Ok this is the real code. I just wanted to print in single file. Please help

i = 1
DO until sheet1.cells(i,1) <> ""
'sheet1 is the employee details
'sheet2 is a report template
sheet2.cells(i,1) = sheet1.cells(i,1)
sheet2.cells(i,2) = sheet1.cells(i,2)
sheet2.cells(i,3) = sheet1.cells(i,3)
pathwithfilename = "D:\Prabhu\" & sheet1.cells(i,1) &".tiff"
sheet2.range("A1:C3").printout from:=1, to:=1, copies:=1,prtofile:=true collate:=true,prtofilename:=pathwithfilename
i = i+1
loop

Thanks,
Prabhu