Newsgroup: it.comp.appl.access
Titolo: Come creare un report usando una maschera?

Vorrei creare dei report usando una maschera e filtrando i dati.
Ho creato una rubrica ora voglio stampare i vari record in base ai vari
campi, perņ effettuando una scelta da una maschera, indicando nella maschera
un nome (o altro campo) in automatico mi viene creato il report con
l'elenco di tutti quelli che hanno lo stesso nome (o altro campo).
Grazie
P.S.
Spero di essere stato chiaro.

beh non è difficile; io farei una query di selezione dove metterai i
criteri per filtrare i dati, collegati alla maschera. Se usi il
generatore è facile, ricordati solo di lasciare la msc aperta!	Ciao

 Spero di essere stato chiaro.
- Nella maschera metti una combo box che prende i dati dalla tabella
rubrica e visualizza il contenuto del campo nome (aiutati con
l'autocomposizione). Chiama questa combo "comboNome" e lasciala non
associata.
- Sempre nella maschera metti un pulsante e, dall'autocomposizione,
scegli come azione "stampa report". Chiama il pulsante cmdStampa.
- Visualizza la finestra codice della maschera (menù
"Visualizza\Codice") e modifica il codice della sub in questo modo:
Private Sub cmdStampa_Click()
On Error GoTo Err_cmdStampa_Click
    Dim stDocName As String, strFiltro As String
    stDocName = "Nome_del_report_che_hai_creato"
    strFiltro = "[Nome_del_campo_Nome]='" & comboNome & "'"
    DoCmd.OpenReport stDocName, , , strFiltro
Exit_cmdStampa_Click:
    Exit Sub
Err_cmdStampa_Click:
    MsgBox Err.Description
    Resume Exit_cmdStampa_Click
End Sub
- Manda in esecuzione la maschera, scegli un nome dalla combo e premi il
pulsante. Fatto!
Ciao, Tonio
Ps. se vuoi l'anteprima di stampa sostituisci
DoCmd.OpenReport stDocName, , , strFiltro
con
DoCmd.OpenReport stDocName, acPreview, , strFiltro

 ha scritto nel messaggio
news:3C8248B2...@inwind.it...

Si grazie, ma a me interesserebbe effettuare la ricerca su tutti i campi
presenti nella tabella, affinche' io possa stampare anche tutti quelli che
hanno lo stesso prefisso o abitano nella stessa città.

 ha scritto nel messaggio
news:EVsg8.61756$fa5.2...@twister2.libero.it...

Metti nell'evento apertura del Report:
Private Sub Report_Open(Cancel As Integer)
     If Form_NOME_TUO_REPORT.Form.Filter <> vbNullString Then
         Me.Filter = Form_NOME_TUO_REPORT.Form.Filter
         Me.FilterOn = True
     End If
     If Form_NOME_TUO_REPORT.Form.OrderBy <> vbNullString Then
         Me.OrderBy = Form_NOME_TUO_REPORT.Form.OrderBy
         Me.OrderByOn = True
     End If
End Sub
Clicchi con il destro su un campo della maschera e scegli  "filtro in base a
selezione"
(puoi associarne piu' di uno) e poi lanci il Report.
Bye!

 ha scritto nel messaggio
news:NFtg8.62065$fa5.2...@twister2.libero.it...

Ciao ho provato come mi hai detto ma mi dà un errore
"Errore run-time "424" - Necessario Oggetto"
Cosa devo fare?


Si, hai ragione: nella routinetta da mettere nell'evento apertura del report
va sostituito  Form_NOME_TUO_REPORT con Form_NOME_TUA_FORM (quella dove fai
la selezione) in tutte e 4 le occorrenze.
(e' evidente che Form_  non puo' avere il nome del Report, si vede che
dormivo !)
Saluti.

 ha scritto nel messaggio
news:KRli8.10839$tC3.2...@twister1.libero.it...

Ciao grazie dell'aiuto, ma adesso ho un problema poiché il filtro dei record
mi viene effettuato solo una volta. Infatti se voglio filtrare il record per
una seconda volta e secondo altro criteri non mi viene effettuata lasciando
sempre i dati del primo filtro. Io ho opportunamente rimosso il primo filtro
senza avere successo. Cosa posso fare?

senza avere successo. Cosa posso fare?
hai fatto
me.filter=nuovofiltro
me.filteron=true
ed al limite
me.requery?
Saluti.
Emanuele.

 ha scritto nel messaggio
news:6dcqau04chihl35n5...@4ax.com...

No dove dovrei inserire questi dati?



nella routine dove crei il filtro oppure usi il filtro rapido
Saluti.
Emanuele.