add row to Print Area

  • Thread starter Thread starter Guest
  • Start date Start date
G

Guest

Hi
Is there a code which can add extra cells to the Print Area.

I currently have a spreadsheet which has a set print area.

When a button is pressed information is entered onto the bottom of the sheet
after the set Pritn Area.

Is there a way when information is added under the set print area that we
can include the row (applicable cells) into the print area as well.

All we need is to have the print area moved down one row but not change the
column.

Any help would be great.

Thanks
Noemi
 
Hi Noemi.

Try:

'=============>>
Public Sub Tester()
Dim SH As Worksheet
Dim rng As Range

Set SH = ActiveSheet

With SH
Set rng = .Range("Print_Area")
.PageSetup.PrintArea = _
rng.Resize(rng.Rows.Count + 1).Address
End With

End Sub
'<<=============
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Similar Threads

Print Area to include text box 10
Excel 2007 Multiple Print Areas 0
Print Area Setting 1
Set Print Area 1
Page not fully printing... 2
How can I expand print area to whole page? 8
Print Area Grayed out 1
auto scale print area 3

Back
Top