Prinding each row of Excel sheet on a seperate page dispallying one record on each pa

[Sanjeev Ghei]

From a spread sheet ,I need to print out a row on each page seperately
that is printout each record on the row on one page seperately.

Can any one please advise how it can be done ?

Fro example



Row 1 Data 11 Data 12 Data 13
Row 2 Data 21 Data 22 Data 23
Row 3 Data 31 Data 32 Data 33

I would want to print out Data 11 and Data 22 on one page
then Data 21 and Data 22 on the second page and data 31 and Data 33
on the third page

Pleae advise if and hwo this is possible.

Thank you

Sanjeev

 

[Sanjeev Ghei]

Sorry ! I would like to correct my earlier posting ...

I want to print Data 11 and Data 12 on one page.Data 21 and Data 22 o
the second page and Data 31 and Data 32 on the third pag
respectively.

Can anyone help please

 

[Frank Kabel]

Hi Sanjeev,

you can insert manual pagebreaks for each row (go to 'Insert -
Pagebreak')

HTH
Frank

 

[Don Guillett]

You can use this by changing the printpreview to printout & changing the 8
to however many columns you want.This will print row 10 and row 11. If you
really wanted row 10, col A and row 10, col B then change to
Rows(i).Resize(1, 2).PrintPreview

Sub printitup()
x = Cells(Rows.Count, "a").End(xlUp).Row
For i = 10 To x Step 10
Rows(i).Resize(2, 8).PrintPreview
Next
End Sub