Newsgroup: it.comp.appl.access
Titolo: Richiamare una maschera filtrandola anche sulla sua sottomaschera

Ho una maschera chiamata "Riassunto", i dati in origine sono stati inseriti 
da un form denominato "Calciatori" e una sottomaschera denominata 
"Cartellini".
Dalla maschera "Riassunto" con un evento DblClick apro la maschera 
"Calciatori" sul record desiderato, però desiderei posizionarmi anche sul un 
record specifico della sottomaschera. Ed è qui che non so cosa fare. 
Potreste darmi qualche suggerimento.
Un saluto a tutti

 ha scritto nel messaggio 
news:481f60d7$0$29590$4faf...@reader1.news.tin.it...

Spiegati meglio .... ipotizzo ... la maschera Calciatori ha una 
sottomaschera ???
filtri la maschera Calciatori e vorresti al tempo stesso filtrare anche la 
sottomaschera??
--
Roberto da Parma 

 ha scritto nel messaggio 
news:4820787a$0$18150$4faf...@reader3.news.tin.it...

Scusa se rispondo in ritardo ma la risposta l'avevo mandata ad un altro 
indirizzo.
Sì, in effetti ho la maschera "Calciatori" che è la principale, la 
sottomaschera denominata "Cartellini" (che è una maschera singola) ed 
inoltre 2 maschere collegate alla sottomaschera.
Io dal form "Riassunto" che è una maschera di consultazione dove si vedono i 
dati più significativi, a volte mi interessa richiamare la maschera 
"Calciatori" per vedere ulteriori dettagli, quindi ho inserito il codice:
      dim ctrl1 as control
      set ctrl1 = Me.ID_Calciatori
      DoCmd.OpenForm "frmCalciatori", , , "[ID_Calciatori] = " & ctrl1
chiaramente col codice che ho messo filtra soltanto sulla maschera 
principale;
io però ho necessità che mi filtri anche sulla sottomaschera, il controllo 
univoco per poter filtrare la sottomaschera è il "Cartellino" che lo trovo 
anch'esso sul form "Riassunto", il mio problema è come impostare questo 
codice?, quale è il codice da mettere? dove va messo? Ecco perché ho messo 
solo  "wherecondition" nel richiamo della maschera, perché il secondo dato 
non so dove metterlo.
Spero di essere stato più chiaro.
Ciao e grazie

 ha scritto nel messaggio 
news:48262433$0$41665$4faf...@reader4.news.tin.it...

Devi filtrare la sottomaschera in base al filtro della maschera principale 
oppure tramite VBA su apertura utilizzi il comando .RecordSource dove 
sfrutti la condizione che desideri.
Potresti ad esempio utilizzare lo stesso filtro della maschera principale.
-- 
Roberto da Parma 


CUT
Ti riporto il codice che ho messo (senza successo) dimmi dove sbaglio,
eventualmente se non chiedo troppo guidami passo passo.
Dalla maschera "Riassunto" con l'Evento DblClick vado ad aprire la maschera 
interessata
    '..prendo il valore dell'ID_Calciatori dal controllo della maschera
    ctrl1 = Me.intCalciatori.Value
    '..prende il valore del Nr. Cartellino dal controllo della maschera
    Dim vCartellino As Variant
    vCartellino = Me.intNrCart
    '..Chiama la maschera principale con una WhereCondition 
sull'ID_Calciatore
    '..inoltre gli passa un Argomento che sarebbe il Numero di cartellino 
che mi servirebbe
    '..per trovare il record nella sottomaschera
    DoCmd.OpenForm "frmCalciatori", , , "[ID_Calciatori] = " & ctrl1, , , 
vCartellino
N.B. Ho passato il numero di cartellino come argomento perché non sapevo 
come riportarlo nell'altra maschera.
Nell'evento apertura della maschera "Calciatori" inserisco il seguente 
codice
    Dim vCartellino As Variant
    Dim Criteria As String
    L'argomento viene sondato, perchè se la maschera viene chiamata diretta 
non riporta nessun argomento
    If Len(Me.OpenArgs) > 0 Then
        vCartellino = Me.OpenArgs
        Dim strNewRecord As String
        strNewRecord = "SELECT * FROM tblCartellini " _
            & "WHERE NrCart = '" _
            & Criteria & "'"
        Me.RecordSource = strNewRecord
    End If
Nell'eseguire il tutto mi dà: Errore di run-time 2001 (Operazione precedente 
annullata)
Anch'io mi rendo conto che c'è qualcosa che non và.
Vorrei precisarti che la maschera principale di "frmCalciatori" ha origine 
su "tblCalciatori" mentre la sottomaschera "Cartellini" ha origine su 
"tblCartellini".
Ti ringrazio per l'interessamento

CUT
Ho risolto.
Grazie