Page Size in Visio

[Jim Kangosjärvi]

Hi

How do I set the page size in Visio to A3 without having a A3 printer
selected or printer at all.
PageSize= A3 '8
doesnt help, only works if the user got a A3 printer selected as default
printer.

If a user only got a A4 printer this doesnt work.
I have seen that in page setup, the same as printer is marked, and there is
also a customize option button that I cant reach programatically.

I have no idea about the users printers, because they are about 20.000 and I
print the doc as a A3 and this have to work either a A3 is selected as
default or not.
Dim oVisio as new Visio.Application
Dim oDoc as visio.Document

set oDoc = oVisio.Document.add("")
oDOc.Pagesize = 8 ' this doesnt work if the default printer is not a a3
printer
oDoc.Printlandscape = true

Can someone help me?

[Senaj Lelic [MVP Visio]]

Hi,

very simple: You can wet ANY pagesite on thge Page Properties. Usually the
drawing page is the same size as the printer page, but on the second Tab you
can change that.

File->Page Setup->Second Tab
--
Regards
Senaj Lelic
MVP Visio
Sen...@DataAssist.de

"Jim Kangosjärvi" <Jim.Kan...@answer.here> schrieb im Newsbeitrag
news:9lj0du$i0u$1...@oden.abc.se...

[Jim Kangosjärvi]

Hehe

Sorry, i mean by code, I want to set the A3 by calling visio frpm
Visualbasic...
It will only be set to A3 if there is a A3 printer

Regards, Jim

"Senaj Lelic [MVP Visio]" <Sen...@DataAssist.de> wrote in message
news:uhj$F60JBHA.992@tkmsftngp04...

[Senaj Lelic [MVP Visio]]

Jim,

there is a ShapeSheet of the Page (called the PageSheet). There you can set
ANY Size in the PageHeight and the PageWidth cells :-)

--
Regards
Senaj Lelic
MVP Visio
Sen...@DataAssist.de

"Jim Kangosjärvi" <Jim.Kan...@answer.here> schrieb im Newsbeitrag

news:9lp23j$45a$1...@oden.abc.se...