Takk skal du ha.
"Mikkel Bundgaard" <mikkelbu@teliamail.dk> wrote in message
news:9hcuvd$sfv$1@sunsite.dk...
> Kjetil Lund <kjetil.lund@online.no> wrote in message
> news:9hc67n$3lf$1@taliesin.netcom.net.uk...
> > Har laget et program med en skriv ut funksjon som setter data inn i
Excel
> > før det skrives ut. Fungerer stort sett veldig bra, men det ser ut til
at
> > enkelte brukere har "maler" som gjør at det kommer ut på 4 sider
> istedenfor
> > 1.
> > Finnes det en eller annen "metode" som gjør at Excel arket skrives ut på
1
> > side uansett, Formateres deretter?
> > Slik som i Word under forhåndsvisning?
> >
> > Hilsen Kjetil
> >
> Hej Kjetil
>
> Du kan prøve at udskrive vha. en procedure. I denne procedure
> skal du så indsætte følgende:
>
> ActiveSheet.PageSetup.FitToPagesWide = 1
> ActiveSheet.PageSetup.FitToPagesTall = 1
>
> Dette svarer til at man i sideopsætning vælger
> Tilpas til 1 sider bred med 1 høj.
>
> Håber du kan bruge dette korte svar til noget,
> da jeg er på vej ud af døren
.
> --
> Mvh.
> Mikkel Bundgaard
> RUC Datalogi
>
http://officehelp.gone.dk
>