Greetings ! and a Happy New Year !

The envelopes I wish to use are 163 mm x 114 mm.

How can I set up Excel to print to that size on my HP Laserjet 4L printer?


It seems as if VBA / Excel only has a limited number of envelope sizes -
#10
C5 (162 x 229)
DL (110 x 220
B5 (176 x 250)
Monarch
.... which can be applied by eg
"ActiveSheet.PageSetup.PaperSize = xlPaperEnvelopeC5"


Regards

Robin

hi
technically....all excel does is send the data. excel does come with the
most popular sizes but due to the large number of speciality printers on the
market, excel does not have them all.
2003editpage setupoption button....
should diplay the default printer option. if your printer can print in the
size you wish, you can set it here. otherwise you may have to
get..."creative".
excel can not do what the printer is incapable of doing.

regards
FSt1

"Robin Clay" wrote:

Greetings ! and a Happy New Year !

The envelopes I wish to use are 163 mm x 114 mm.

How can I set up Excel to print to that size on my HP Laserjet 4L printer?


It seems as if VBA / Excel only has a limited number of envelope sizes -
#10
C5 (162 x 229)
DL (110 x 220
B5 (176 x 250)
Monarch
... which can be applied by eg
"ActiveSheet.PageSetup.PaperSize = xlPaperEnvelopeC5"


Regards

Robin

I print business size envelopes from a database where a double click puts
the address, etc on a page with an envelope set up, by TRIAL and ERROR, to
print to MY printer and look right. You have to adjust row and column sizes
so it will look right when printed. It may look wrong on print preview. If
you don't want to waste envelopes, practice first on plain paper. I once had
your same printer but now use an HP 2840.

I also have it set up so I can easily change the return address and print
one or many from the list. I also have it set up for either a "big envelope"
or #10
Sub EnvelopeSize()
'Note PaperSize 123 is #10 Envelope by recorded macro
On Error Resume Next
x = InputBox("1= Big Envelope ,2= # 10 Envelope")
Sheets("envelope").PageSetup.PaperSize = _
Choose(x, xlPaperExecutive, 123)
[addresses!d3] = "Now Set to " & _
Choose(x, "Big", "Regular") & " Envelope"
'Sheets("envelope").PrintPreview
End Sub
--
Don Guillett
Microsoft MVP Excel
SalesAid Software

"Robin Clay" <Robin_B DOT Clay AT virgin DOT net wrote in message
...
Greetings ! and a Happy New Year !

The envelopes I wish to use are 163 mm x 114 mm.

How can I set up Excel to print to that size on my HP Laserjet 4L printer?


It seems as if VBA / Excel only has a limited number of envelope sizes -
#10
C5 (162 x 229)
DL (110 x 220
B5 (176 x 250)
Monarch
... which can be applied by eg
"ActiveSheet.PageSetup.PaperSize = xlPaperEnvelopeC5"


Regards

Robin

Thank .you both for responding.

Regards

Robin