Questo browser non è più supportato.
Esegui l'aggiornamento a Microsoft Edge per sfruttare i vantaggi di funzionalità più recenti, aggiornamenti della sicurezza e supporto tecnico.
![](data:image/svg+xml, %3Csvg xmlns='http://www.w3.org/2000/svg' height='64' class='font-weight-bold' style='font: 600 30.11764705882353px "SegoeUI", Arial' width='64'%3E%3Ccircle fill='hsl(128, 8%, 22%)' cx='32' cy='32' r='32' /%3E%3Ctext x='50%25' y='55%25' dominant-baseline='middle' text-anchor='middle' fill='%23FFF' %3EA%3C/text%3E%3C/svg%3E)
Ho una sottomaschera la cui “origine record” è una query a campi incrociati. Nelle proprietà della sottomaschera ho cancellato il nome della query perché lo imposto tramite il codice descritto piu avanti. Nella maschera principale ho due campi che servono a filtrare la query a campi incrociati della sottomaschera. Per attivare il filtro, sulla maschera principale ho un bottone “RICERCA” che una volta premuto visualizza la sottomaschera e i dati richiesti.
L’anomalia che riscontro è la seguente.
Quando apro la prima volta la maschera, faccio in modo che la sottomaschera non sia visibile. Impostati i campi usati per filtrare la query e premuto il bottone “RICERCA” si apre la sottomaschera che visualizza tutti i dati senza essere sentire l’effetto filtro. Se premo nuovamente il bottone il filtro funziona e se cambio il valore dei campi il filtro continua a funzionare. Se esco dalla maschera e rientro l’anomalia si ripete.
Il codice che uso è il seguente:
'
VX_Criterio = "T105_AnnoRevenue = " & Me![XD_ElencoAnni] & _
" and T105_CodiceProgetto = " & Me![XD_ElencoProgetto] & ""
'
Forms![SC0110_VerificaRevenue]![SS0110_VerificaRevenue].Visible = True
Forms![SC0110_VerificaRevenue]![SS0110_VerificaRevenue].Form.RecordSource = "QE0010_RevenueQuarter"
'
Forms![SC0110_VerificaRevenue]![SS0110_VerificaRevenue].Form.FilterOn = True
Forms![SC0110_VerificaRevenue]![SS0110_VerificaRevenue].Form.Filter = VX_Criterio
'
Me.Refresh
'
Al momento ho risolto il problema eseguendo 2 volte in sequenza lo stesso codice, ma trovo la cosa molto “antipatica”. Come devo correggere eventualmente il codice?
Ciao e grazie
Massimo
Una famiglia di sistemi di gestione per database relazionali di Microsoft progettati per semplificare l'uso.
Domanda bloccata. Questa domanda è stata eseguita dalla community del supporto tecnico Microsoft. È possibile votare se è utile, ma non è possibile aggiungere commenti o risposte o seguire la domanda.
Risposta accettata dall'autore della domanda
Ciao Massimo,
prova a impostare prima il criterio e poi il FilterON a true così:
Forms![SC0110_VerificaRevenue]![SS0110_VerificaRevenue].Form.Filter = VX_Criterio
Forms![SC0110_VerificaRevenue]![SS0110_VerificaRevenue].Form.FilterOn = True
Grazie infinite Cinzia!!!!!
funziona perfettamente....
avevo provato di tutto ma a questo tentativo non avevo pensato...
Ciao e grazie ancora
Massimo
Ps. l'ho indicata come risposta preferita; è corretto?