Newsgroup: it.comp.appl.access
Titolo: Stampa diretta.......

Salve a tutti!
Ho risolto, parte al mio problema.......
E' possibile fa stampare direttamente un documento Word con questo codice:
    Dim oApp As Object
    Set oApp = CreateObject("Word.Application")
    With oApp
    .documents.Open "c:\documenti\ProvaStampa"
    .Visible = True
    End With
anzichč aprirlo vorrei stamparlo direttamente ma non conosco la riga di
codice appropriata.
Ho provato con .documents.Print (anzichč Open) ma non funge.
Un'altra cosa: dove posso reperire le opzioni (o cosa) disponibili con With
(es. .documents.Open; .Visible=true; ecc.)?
Grazie anticipatamente.
Marco.


Risolto!!!! basta inserire .PrintOut
mannaggia...... ci sono arrivato per intuito.
Però mi farebbe, comunque, piacere dove reperire queste opzioni/comandi.
Grazie anticipatamente.
Marco.

 ha scritto nel messaggio
news:uNt59.219609$vm5.7...@news2.tin.it...

Funziona ma c'è un problema..........
non riesco a chiudere il documento e, quindi, l'applicazione Word perchè
rimane in "background" non visibile (devo scaricarlo dalla memoria da task
manager).
Avrei bisogno, a questo punto, di 2 suggerimenti:
1)- quali parametri vanno introdotti per x copie dell'opzione ".PrintOut"
???
2) - come faccio a chiudere il documento dopo averlo stampato, visto che
.visible=false o per niente inserito????
Grazie anticipatamente.
Marco.


Prova cosě:
Dim oApp As Object
    Set oApp = CreateObject("Word.Application")
    With oApp
    .Documents.Open "c:\Prova.doc"
    .Visible = True
    .PrintOut
    .Quit
    End With
Set oApp = Nothing
Ciao, Carlo

 ha scritto nel
messaggio news:Tbv59.220374$vm5.7...@news2.tin.it...

Grazie Carlo, sei gentilissimo.
Funziona alla perfezione.
Ne approfitto per chiederti dove posso reperire questi comandi.
Grazie ancora.
Marco.

 ha scritto nel messaggio
news:KZA59.223529$vm5.7...@news2.tin.it...

Oops! ho dimenticato una cosa, Carlo.......
per impostare n copie di stampa???
Grazie.
Marco.


Cambia : .PrintOut
in:  .PrintOut , , , , , , , 2
ricorda sette virgole.
Se apri Word....Menù Strumenti....Macro....Visual Basic Editor si aprirà
l'editor di VisualBasic. Qui trovi la guida dove potrai reperire le
informazioni che ti servono.
Non sarà immediato ma cercando....
Ciao, Carlo
P.S.
Ti riporto quello che la guida di Word dice a proposito di PrintOut:
espressione.PrintOut(Background, Append, Range, OutputFileName, From, To,
Item, Copies, Pages, PageType, PrintToFile, Collate, FileName,
ActivePrinterMacGX, ManualDuplexPrint, PrintZoomColumn, PrintZoomRow,
PrintZoomPaperWidth, PrintZoomPaperHeight)
Spiegazione:
espressione   Obbligatoria. Espressione che restituisce uno degli oggetti
indicati.
Background  Valore Variant facoltativo. Impostare True per fare in modo che
la macro continui a essere eseguita mentre Microsoft Word stampa il
documento.
Append  Valore Variant facoltativo. True per aggiungere il documento
specificato al nome file indicato dall'argomento OutputFileName. False per
sovrascrivere il contenuto di OutputFileName.
Range  Valore Variant facoltativo. Intervallo di pagine. Può essere una
qualsiasi costante WdPrintOutRange.
wdPrintAllDocument
wdPrintCurrentPage
wdPrintFromTo
wdPrintRangeOfPages
wdPrintSelection
OutputFileName  Valore Variant facoltativo. Se PrintToFile è impostato su
True, l'argomento specifica il percorso e il nome del file di output.
From  Valore Variant facoltativo. Il numero della pagina iniziale quando
Range è impostato su wdPrintFromTo.
To  Valore Variant facoltativo. Il numero della pagina finale quando Range è
impostato su wdPrintFromTo.
Item  Valore Variant facoltativo. Elemento da stampare. Può essere una
qualsiasi costante WdPrintOutItem.
wdPrintAutoTextEntries
wdPrintComments
wdPrintDocumentContent
wdPrintKeyAssignments
wdPrintProperties
wdPrintStyles
Copies  Valore Variant facoltativo. Il numero di copie da stampare.
Pages  Valore Variant facoltativo. I numeri di pagina e gli intervalli di
pagine da stampare, separati da virgole. Ad esempio, "2, 6-10" stampa la
pagina 2 e le pagine da 6 a 10.
PageType  Valore Variant facoltativo. Il tipo di pagina da stampare. Può
essere una qualsiasi costante WdPrintOutPages.
wdPrintAllPages
wdPrintEvenPagesOnly
wdPrintOddPagesOnly
PrintToFile  Valore Variant facoltativo. True per inviare a un file le
istruzioni per la stampante. Assicurarsi di aver specificato un nome file
con l'argomento OutputFileName.
Collate  Valore Variant facoltativo. Quando si stampano più copie di un
documento, impostare su True per stampare tutte le pagine del documento
prima di stampare la copia successiva.
FileName  Valore Variant facoltativo. Percorso e nome del file da stampare.
Se l'argomento viene omesso, verrà stampato il documento attivo (disponibile
solo con l'oggetto Application).
ActivePrinterMacGX  Valore Variant facoltativo. Questo argomento è
disponibile solo in Microsoft Office per Macintosh. Per ulteriori
informazioni su questo argomento, consultare la Guida di riferimento al
linguaggio inclusa in Microsoft Office per Macintosh.
ManualDuplexPrint  Valore Variant facoltativo. True per stampare un
documento fronte retro con una stampante su cui non è disponibile il kit per
la stampa fronte retro. Se l'argomento è impostato su True, le proprietà
PrintBackground e PrintReverse verranno ignorate. Utilizzare le proprietà
PrintOddPagesInAscendingOrder e PrintEvenPagesInAscendingOrder per
controllare l'output durante la stampa fronte retro manuale. L'argomento
potrebbe non essere disponibile a seconda della lingua selezionata o
installata, ad esempio italiano.
PrintZoomColumn  Valore Variant facoltativo. Il numero delle pagine da
adattare orizzontalmente su una pagina. Può essere rappresentato dai valori
1, 2, 3 o 4. Utilizzarlo con l'argomento PrintZoomRow per stampare più
pagine su un singolo foglio.
PrintZoomRow  Valore Variant facoltativo. Il numero delle pagine da adattare
verticalmente su una pagina. Può essere rappresentato dai valori 1, 2, 3 o
4. Utilizzarlo con l'argomento PrintZoomColumn per stampare più pagine su un
singolo foglio.
PrintZoomPaperWidth  Valore Variant facoltativo. La larghezza in base a cui
ridimensionare le pagine stampate, espressa in twip (20 twip = 1 punto; 72
punti = 1 pollice).
PrintZoomPaperHeight  Valore Variant facoltativo. L'altezza in base a cui
ridimensionare le pagine stampate, espressa in twip (20 twip = 1 punto; 72
punti = 1 pollice).

 ha scritto nel
messaggio news:tTI59.199589$Jj7.4...@news1.tin.it...

Non ho parole.........sei stato "squisito".
Grazie.
Marco.