Newsgroup: it.comp.appl.access
Titolo: aprire maschera di stampa su file word creato dinamicamente

Come da oggetto creo un file word dinamenicamente (semplicemtne modifico 
alcuni dati al suo interno)
una volta aperto attraverso il codice
wrd.Visible = True
lancio la combinazione tasti
SendKeys ("^+{F12}")
per aprire la maschera di stampa.
esiste un metodo più "elegante" e che magari mi permetta di aprire 
questa maschera senza visualizzare il file?
Grazie
ciao
Nick


Credo sia difficile. Del resto lo stesso word, se vuoi solo stamparlo e fai
tasto dx sul file, prima lo apre e poi lo stampa.
-- 
_ _
Ciao
MAssimiliano Amendola            
www.accessgroup.it
Cisa1 - I° Conferenza Italiana per Sviluppatori Access Arezzo 4+5
Giugno 2005 Sono aperte le iscrizioni  Info:  
www.donkarl.com/it

"Nick" <senz...@chedetesul.NG> ha scritto nel messaggio
news:ZwCme.124833$IN.21...@twister2.libero.it...

Creati in Access una Form con i Parametri sotto, quindi li passi in modo
Dinamico all'Oggetto
WordDoc che hai aperto via Automazione in questo modo, il tutto senza vedere
nulla:
 With ActiveDocument.PageSetup
      .LineNumbering.Active = False
      .Orientation = wdOrientPortrait
      .TopMargin = CentimetersToPoints(2.5)
      .BottomMargin = CentimetersToPoints(2)
      .LeftMargin = CentimetersToPoints(2)
      .RightMargin = CentimetersToPoints(2)
      .Gutter = CentimetersToPoints(0)
      .HeaderDistance = CentimetersToPoints(1.25)
      .FooterDistance = CentimetersToPoints(1.25)
      .PageWidth = CentimetersToPoints(21)
      .PageHeight = CentimetersToPoints(29.7)
      .FirstPageTray = wdPrinterDefaultBin
      .OtherPagesTray = wdPrinterDefaultBin
      .SectionStart = wdSectionNewPage
      .OddAndEvenPagesHeaderFooter = False
      .DifferentFirstPageHeaderFooter = False
      .VerticalAlignment = wdAlignVerticalTop
      .SuppressEndnotes = False
      .MirrorMargins = False
      .TwoPagesOnOne = False
      .BookFoldPrinting = False
      .BookFoldRevPrinting = False
      .BookFoldPrintingSheets = 1
      .GutterPos = wdGutterPosLeft
   End With
Ciao
-- 
@Alex (Alessandro Baraldi)
---------------------------------------------------------------------------
http://www.sitocomune.com/
http://www.mantuanet.it/alessandro.baraldi/
---------------------------------------------------------------------------

 
con il comando
wrd.PrintOut
lo invio direttamente alla stampante predefinita senza che si veda nulla...
quindi speravo di poter aprire la maschera per selezionare la 
stampante... :)
ciao
Nick

Nick ha detto: in data 30/05/2005 13.47:

con il printout posso gestire l'orientamento e tutto il resto.. ma non 
il nome della stampante...
.. or provo l'idea di @lex
ciao
Nick

 Nick
Vai sul mio sito trovi un DEMO con già l'interfaccia grafica funzionante
ovviamente devi riadattarla alle tue esigenze, ma se
leggi bene il Codice ha tutto quanto serve gestito nel Modulo tramite
l'Oggetto
Printer.
Quindi lo passi al Document e poi PrintOut.
Sezione GENERAL FAQ 1.5


ALESSANDRO Baraldi ha detto: in data 30/05/2005 13.41:

mi da errore su
.BookFoldPrinting = False
.BookFoldRevPrinting = False
.BookFoldPrintingSheets = 1
e non trovo dove gestire il noem della funzione..
.. ho scaricato il tuo printer.. ma ho il solito problema di A03... 
vabbè aspetterò e per ora lo tengo con il file che si apre e chiede la 
stampante...
Grazie
Ciao
Nick

 Nick
Quel Demo funziona solo con versioni superiori ad A2K(non dispone
dell'oggetto printer)
, non ho capito casa usi ma quello č fatto con A_XP.
Per l'errore, prova ad inserire i Riferimenti di Word e cerca che proprietą
sono
in modo da capire perchč ti dą l'errore, eventualmente Skippale per vedere
se
il tutto Funziona, quindi usa l'HElp per affrontare la cosa.


 
Ciao
NIck


Ma allora ti basta rendere la stampante predefinita


MA ha detto: in data 30/05/2005 15.14:

Si ma volevo evitare giochetti strani per semplicemnte cambiare la 
stampante predefinita... :D
.. ma come al solito.. opterò per la soluzone meno elegante.. ma cmq 
funzionale :D
ciao
Nick

"Nick" <senz...@chedetesul.NG> ha scritto nel messaggio
news:RsEme.125086$IN.21...@twister2.libero.it...

Vedi se può esserti d'aiuto:
http://www.donkarl.com/it/
FAQ 5.1
--
rgrds
SCCambiare la stampante o le impostazioni stampante/pagina
Cambiare la stampante o le impostazioni stampante/pagina