Buongiorno a tutti,
ho un problema che mi assilla da 2 settimane ormai. Una parte lìho già risolta grazie all'aiuto di utenti su un'altro forum ( Maschere divise in una Navigation Form ). Quindi questo messaggio non è
Crosspostingdato che tratta argomenti diversi.
Ho un menu che si chiama Menu , è una maschera di spostamento.
Quando tramite il controllo di spostamento visualizzo la maschera
ModificaClienti (--- come da Foto 1---)i filtri non funzionano.
1.JPG
La maschera
ModificaClienti è in modalità visualizzazione maschere continue mi mostra tutti i clienti e selezionando un cliente mi viene mostrato nella sottomaschera sopra.
Ho inserito (---evidenziato nella foto---) delle combo box che mi servono a filtrare i dati della maschera primaria.
Prendiamo in esame il primo comboBox TXtCognome esso sull'evento
Dopo Aggiornamento ha la seguente macro
Applica Filtro
nome Filtro
Where [Clienti]![CognomeNome] Like [Maschere]![MODIFICACLIENTI]![txtCOgnome]
nome controllo
Ora ho trovato questo video molto interessante che mi ha portato a scrivere il seguente codice
Option Explicit
Private Sub LoadNAv()
Dim SQL As String
Select Case Me.NavControllo.SelectedTab.Name
Case Is = "NavModificaClienti"
SQL = "Clienti"
Me.NAvSubForm.Form.RecordSource = SQL
Me.NAvSubForm.Form.Requery
Case Is = "navregistroDive"
SQL = "SELECT RegistroImmersioni.Data, RegistroImmersioni.DiveSpot, RegistroImmersioni.[NickName], RegistroImmersioni.IDCliente, RegistroImmersioni.Note, RegistroImmersioni.Note FROM RegistroImmersioni; "
Me.NAvSubForm.Form.RecordSource = SQL
Me.NAvSubForm.Form.Requery
End Select
End Sub
Private Sub Form_Load()
LoadNAv
End Sub
Private Sub NavModificaClienti_Click()
LoadNAv
End Sub
Ma quando provo ad attuare il filtro mi esce
2.JPG
Non so più che pesci pigliare. . . .qualche consiglio? Grazie in anticipo