Print Rows

J

Jack S

I have a WS that has 250 rows with the totals in row
250. I have a split screen show the totals at the bottom
at all times.

My question is how can I get row 250 or the totals to
print at the bottom of the page??

Using Page Setup | Sheet ... you only have the choice to
print on top or left. I need to have them at the bottom
like a footer.

Something like Print a1..n50 & a250..n250

Thanks for any ideas.
 
J

Jason Morin

Try:

Sub RowFooter()
With ActiveSheet
.PageSetup.LeftFooter = .Range("250:250")
.PrintOut Copies:=1
End With
End Sub

---
To use, press Alt+F11, go to insert > module, and paste
in the macro above.

HTH
Jason
Atlanta, GA
 
G

Guest

-----Original Message-----
Try:

Sub RowFooter()
With ActiveSheet
.PageSetup.LeftFooter = .Range("250:250")
.PrintOut Copies:=1
End With
End Sub

---
To use, press Alt+F11, go to insert > module, and paste
in the macro above.

HTH
Jason
Atlanta, GA

.
For some reason using this macro "as is" prints the
Click to expand...
sheet but no Totals or Footer... What am i donig wrong??
 
Top