Sincronizzare una sottomaschera

Francesco Salvagnini

il 26 giu 2020, 15:06

63 risposte

Francesco Salvagnini

Pochi posts

Iscritto da: ago, 2014

Messaggi:: 48

Sincronizzare una sottomaschera

26 giu 2020, 15:44

Buongiorno!

Da una maschera singola (A) dove visualizzo i dati anagrafici degli utenti, apro un'altra maschera singola (B, a cui passo l'ID utente) che contiene:
1) una sottomaschera a maschere multiple con l'elenco degli utenti
2) un'altra sottomaschera con le attività in cui sono impegnati
3) il campo note dove sono scritte le informazioni di ciascuno

Ora avrei bisogno che la prima sottomaschera, all'apertura di B, mi evidenziasse l'utente che avevo in A.
Mi sapete dare un aiuto?
Grazie, Francesco

63 Risposte

@Alex
Super Famoso
Iscritto da
feb, 2012
Messaggi:
8741
Re: Sincronizzare una sottomaschera
26 giu 2020, 16:03
Evidenziasse cosa intendi...?
Deve diventare il Record Attivo, deve essere Colorato in evidenza...?
Per il primo, devi usare il codice per puntare al Record con Id=IdUtente, per questo si usa il metodo findFirst del Recordsetclone di Maschera(la sottomaschera è a sua volta una Maschera), quindi allineare il Bookmark di Maschera al Bookmark del RecordsetClone.
Per il secondo puoi/devi usare la Formattazione Consizionale, inserendo come Metodo Espressione e criterio IdUtente=Forms!NomeFormB!IdUtente
F
Francesco Salvagnini
Pochi posts
Iscritto da
ago, 2014
Messaggi:
48
Re: Sincronizzare una sottomaschera
26 giu 2020, 16:32
Allora... ho iniziato con la colorazione: sono andato sul campo della sottomaschera e nella FC ho inserito l'espressione come da te suggerito ma niente..
@Alex
Super Famoso
Iscritto da
feb, 2012
Messaggi:
8741
Re: Sincronizzare una sottomaschera
26 giu 2020, 16:36
Francesco Salvagnini ha scritto:
Allora... ho iniziato con la colorazione: sono andato sul campo della sottomaschera e nella FC ho inserito l'espressione come da te suggerito ma niente..
Devi aver sbagliato qualche cosa... che dici...? devi usare i Nomi corretti... ed il Generatore di espressioni ti aiuta a cercarli senza scriverli manualmente.
Lavoraci sopra, perchè è la soluzione ma operativamente devi trovare tu la sintassi giusta.
F
Francesco Salvagnini
Pochi posts
Iscritto da
ago, 2014
Messaggi:
48
Re: Sincronizzare una sottomaschera
26 giu 2020, 16:52
Hai ragione: ci mancavano le parentesi quadre... tra l'altro ho visto che nella FC si possono usare anche le TempVars. Ora però, mi colora il campo giusto, ma il cursore è posizionato sul primo della lista. Dev'essere il discorso dell'attivazione del record, vero? Ecco, su quello ho grossi problemi, perché non so né dove mettere il metodo FindFirst del RecordsetClone né come usarlo... si tratta di un ciclo VB? Mi potreste postare un esempio?
F
Francesco Salvagnini
Pochi posts
Iscritto da
ago, 2014
Messaggi:
48
Re: Sincronizzare una sottomaschera
26 giu 2020, 18:14
Ho trovato questo esempio:

With Me
If Len(.Filter) > 0 Then
.Filter = vbNullString
.FilterOn = False
End If
End With

With Me.RecordsetClone
.FindFirst "ID=" & Me.IDUTENTE.ItemData(Me.IDUTENTE.ListIndex)
If Not .NoMatch Then
Me.Bookmark = .Bookmark
End If '
End With

ma non so se faccia al caso mio (cioè della prima sottomaschera) e nemmeno so dove posizionarlo (es: "Su corrente" di della sottomaschera? Su click del campo della sottomaschera?)

Grazie, Francesco
@Alex
Super Famoso
Iscritto da
feb, 2012
Messaggi:
8741
Re: Sincronizzare una sottomaschera
26 giu 2020, 20:15
La prima parte del filtro non serve se la sottomaschera è filtrata evidentemente è possibile farlo e sbagliato rimuoverlo in quel modo.

Su load della maschera principale la parte di ricerca e spostamento bookmark.
F
Francesco Salvagnini
Pochi posts
Iscritto da
ago, 2014
Messaggi:
48
Re: Sincronizzare una sottomaschera
26 giu 2020, 20:48
Premesso che meno cose scrivo meglio è, sono felicissimo di poter togliere la prima parte.
Per quanto riguarda la seconda, sono perplesso su come modificare la seconda riga:

.FindFirst "ID=" & Me.IDUTENTE.ItemData(Me.IDUTENTE.ListIndex)

nel senso:
1) IDUTENTE con cosa lo sostisuisco? Con il campo ID della sottomaschera?
2) il .ItemData e il .ListIndex vanno bene? (Access mi dà: "Impossibile trovare il metodo o il membro dei dati)

Se riesco posto la struttura di maschera e sottomaschera, ma non so se riesco a inserire l'immagine...

[img]C:\Users\Francesco\Desktop\Immagine1.png[/img]
F
Francesco Salvagnini
Pochi posts
Iscritto da
ago, 2014
Messaggi:
48
Re: Sincronizzare una sottomaschera
26 giu 2020, 20:53
Ehmm, no, evidentemente non so come postare gli stamp...
@Alex
Super Famoso
Iscritto da
feb, 2012
Messaggi:
8741
Re: Sincronizzare una sottomaschera
26 giu 2020, 21:29
Non ho considerato il contenuto del codice in quanto devi comprenderlo ed adattarlo alla tua situazione concreta che noi non conosciamo...
Tu hai una listbox ad esempio...?
Quel codice agisce non su una subform ma sulla form... e non è il tuo caso...
Con le dovute riflessioni ed adattamenti CHE DEVI capire come effettuare per adeguarlo al tuo scenario:
```
With Me.NimeSubform.form.RecordsetClone
.FindFirst "IDUtente=" & Me.IdUtente
If Not .NoMatch Then
Me.Bookmark = .Bookmark
End If '
End With 
```
F
Francesco Salvagnini
Pochi posts
Iscritto da
ago, 2014
Messaggi:
48
Re: Sincronizzare una sottomaschera
26 giu 2020, 21:49
Su
Me.Bookmark = .Bookmark
si ferma e mi dice: "Segnalibro non valido"... : (
F
Francesco Salvagnini
Pochi posts
Iscritto da
ago, 2014
Messaggi:
48
Re: Sincronizzare una sottomaschera
26 giu 2020, 21:52
E sì che mi sembra di aver inserito i nomi giusti:

With Me.NOME_DELLA_SOTTOMASCHERA.form.RecordsetClone
.FindFirst "CAMPO_ID_DELLA_SOTTOMASCHERA=" & Me.CAMPO_ID_DELLA_SOTTOMASCHERA
If Not .NoMatch Then
Me.Bookmark = .Bookmark
End If
End With
@Alex
Super Famoso
Iscritto da
feb, 2012
Messaggi:
8741
Re: Sincronizzare una sottomaschera
26 giu 2020, 22:04
Mi era scappato un pezzo... e questo ti dovrebbe far capire che se non ci ragioni e lo capisci... ti fermi alla prima banalità...

Me.Nomeform.Form.Bookmark=.Bookmark

Vuoi dire che hai una sottomaschera che si chiama NOME_DELLA_SOTTOMASCHERA...?
Ed un campo che si chiama CAMPO_ID_DELLA_SOTTOMASCHERA...?
F
Francesco Salvagnini
Pochi posts
Iscritto da
ago, 2014
Messaggi:
48
Re: Sincronizzare una sottomaschera
26 giu 2020, 22:37
Adesso funziona!
Certo che la sottomaschera NON si chiama NOME_DELLA_SOTTOMASCHERA e il campo CAMPO_ID_DELLA_SOTTOMASCHERA.
Ma perché? Esistono maschere che si chiamano: NimeSubform? ; )
Quindi grazie mille per l'aiuto, ma, come dici tu, bisognerebbe capire quelle 5 righe di codice... allora sarebbe un grazzissime!!!! : )
Nel senso di scrivere un commentino nelle righe più importanti:

With Me.NOME_DELLA_SOTTOMASCHERA.form.RecordsetClone ' Commento
.FindFirst "CAMPO_ID_DELLA_SOTTOMASCHERA=" & Me.CAMPO_ID_DELLA_SOTTOMASCHERA ' Commento
If Not .NoMatch Then ' Commento
Me.NOME_DELLA_SOTTOMASCHERA.Form.Bookmark=.Bookmark ' Commento
End If
End With

Però mi rendo conto di chiedere troppo...
F
Francesco Salvagnini
Pochi posts
Iscritto da
ago, 2014
Messaggi:
48
Re: Sincronizzare una sottomaschera
26 giu 2020, 22:51
E comunque c'è un altro piccolo intoppo: quando seleziono un altro record, il campo evidenziato rimane quello dell'apertura della maschera, a meno che al click sul campo che deve colorarsi non ci metta Me.Refresh. Ma con il Me. Rfresh succede che l'attivazione torna a essere sul primo record della sottomaschera. Quindi record selezionato colorato, ma il "cursore" è sul primo record... forse bisogna usare il metodo FindFirst dopo il Me.Refresh? Ma allora come cambia il codice se lo metto al click del campo della sottomaschera?

Devi accedere o registrarti per scrivere nel forum

63 risposte