ExcelBanter

ExcelBanter (https://www.excelbanter.com/)
-   Excel Programming (https://www.excelbanter.com/excel-programming/)
-   -   Print variable page sizes (https://www.excelbanter.com/excel-programming/360130-print-variable-page-sizes.html)

nsv[_12_]

Print variable page sizes
 

I have a sheet that varies in number of lines I want to print. Number o
columns is constant.

The number of lines is found by adding 20 to the highest number i
column A, where a list of items from 1 to x starts in A6. Eg. if x = 1
the area to print is from A1 to N37.

I will need VBA to find out what the value of MAX(A:A) is. How is thi
done?

The meaning is perhaps easiest understood by following sentence, whic
unfortunately does not make sense to VBA:
ActiveSheet.PageSetup.PrintArea = "A1:N(MAX(A:A)+20)"


NS

--
ns
-----------------------------------------------------------------------
nsv's Profile: http://www.excelforum.com/member.php...fo&userid=2650
View this thread: http://www.excelforum.com/showthread.php?threadid=53746


Tom Ogilvy

Print variable page sizes
 
n1 = Application.Max(Range("A:A")) + 20
ActiveSheet.PageSetup.PrintArea = "$A$1:$N$" & n1


--
Regards,
Tom Ogilvy


"nsv" wrote in message
...

I have a sheet that varies in number of lines I want to print. Number of
columns is constant.

The number of lines is found by adding 20 to the highest number in
column A, where a list of items from 1 to x starts in A6. Eg. if x = 17
the area to print is from A1 to N37.

I will need VBA to find out what the value of MAX(A:A) is. How is this
done?

The meaning is perhaps easiest understood by following sentence, which
unfortunately does not make sense to VBA:
ActiveSheet.PageSetup.PrintArea = "A1:N(MAX(A:A)+20)"


NSV


--
nsv
------------------------------------------------------------------------
nsv's Profile:

http://www.excelforum.com/member.php...o&userid=26500
View this thread: http://www.excelforum.com/showthread...hreadid=537469




nsv[_13_]

Print variable page sizes
 

It just works!! Thanks Tom!!

I am only an amateur in VBA, but I have a lot of small tasks to solv
when working with Excel and the VBA Help text is not very helpful. I
is difficult if not impossible to find this kind of tip
systematically, so your help is very appreciated.

Niel

--
ns
-----------------------------------------------------------------------
nsv's Profile: http://www.excelforum.com/member.php...fo&userid=2650
View this thread: http://www.excelforum.com/showthread.php?threadid=53746



All times are GMT +1. The time now is 01:29 PM.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
ExcelBanter.com