Newsgroup: it.comp.appl.access
Titolo: report scelta parametri

Ciao
qual'è secondo voi la modalità migliore per far scegliere all'utente quante
e quali copie stampare, mi spiego vorrei far sì che possa scegliere di
stampare ad esempio dal 15 al 30 record e poi il 40 e 50 record un pò come
avviene per la finestra stampa di windows magari due copie per record.
Ciao
Grazie
Steve

Creandoti una bella barra menų che si attivi nel momento in cui l'utente
deve stampare (ovvero in anterprima di un report), e in tale barra inserisci
il "solito e buon" comando di stampa. (lo stesso di windows...).
Visto che esiste giā.....
Ciao
-- 
Posted from 
smtp1.libero.it
 [193.70.192.51] 
via Mailgate.ORG Server - 
http://www.Mailgate.ORG


Grazie proverò mi immagino però un problema se voglio stampare ad esempio
delle fatture partendo dalla 20 fino alla 40 e questa numerazione non
corrisponde a quella dei record (perchè la tabella parte ad esempio dalla
fattua n. 15) utilizzando il comando di stampa di windows verrebbero
stampate le fatture sbagliate, io vorrei poter selezionare non per numero
record ma ad esempio per numero fattura
Grazie
Steve

 ha scritto nel messaggio
news:9gg3c2$9ls$1...@serv1.iunet.it...

Cerca nell'help il metodo PrintOut.
--
Silvio
il sito comune di it.comp.appl.access:
http://www.sitocomune.com


Ciao
In effetti il metodo PrintOut andrebbe bene, l'unica cosa è che, per quello
che ho capito, bisogna essere già nel report, mentre io sono ancora nella
form, ho un pulsante di stampa sulla maschera fatture dal quale vorrei
gestire le stampe delle stesse, ma se voglio ad esempio stampare
direttamente due volte la stessa fattura attualmente riscrivo due volte la
stessa istruzione:
 Dim stDocName As String
    Dim strCriteria As String
    strCriteria = "IdFattura = " & str$(Me("TxtIdFattura"))
    stDocName = "RptFatture"
    DoCmd.OpenReport stDocName, acNormal, , strCriteria
    DoCmd.OpenReport stDocName, acNormal, , strCriteria
non mi pare la soluzione migliore
Ciao
Steve

 ha scritto nel messaggio
news:9gkou0$pfk$1...@serv1.iunet.it...

Prova così:
Public Function StampaRep(rep As String)
    Dim quanti
    If rep = "" Then Exit Function
    quanti = InputBox("Quante copie vuoi stampare?" & vbCrLf & "(0 per
annullare la stampa", "Opzioni Stampa", 3)
    quanti = Val(quanti)
    If quanti < 1 Then Exit Function
    DoCmd.SelectObject acReport, rep, False
    'Stampa quanti copie del report
    DoCmd.PrintOut , , , , quanti
End Function



Grazie
provo subito
ciao

 ha scritto nel messaggio
news:9gla91$k5r$1...@serv1.iunet.it...

Ciao
ho provato la funzione e funziona bene unico dubbio sono costretto ad aprire
prima il report in modalita preview e poi chiamare la funzione altrimenti
non riesco a stampare il record corrente e questo rallenta la procedura
anche perchč alla fine devo chiudere il report.
ciao
Grazie

 anche perchè alla fine devo chiudere il report.
se non giungono altri contributi, puoi provare ad aprire un report di
dimensione 1 punto x 1 punto in modo che non si veda, oppure riportare in
primo piano subito dopo la maschera, oppure mettere quelle istruzioni
nell'evento su stampa del report stesso (occhio, non le ho provate queste
soluzioni!)



Prova allora a filtrare i dati per numero fattura:
Es.
'-----------------
Docmd.OpenReport "nomeReport",,,"numeroFattura Between " & me!dalNumero & "
And " & Me!alNumero
'-----------------
Ciao.