Risolto maschera attiva

avatar17

Utente abituale
23 Maggio 2018
109
16
milano
2016
2
Ciao, ho un problema banale ma non sono riuscito a trovare una soluzione.
Praticamente ho una maschera principale dove si lavora normalmente. In questa maschera c'è un pulsante che apre una seconda maschera con il comando OpenForm, contenete una casella di testo e successivamente riempie questa casella con un valore. ho usato questo codice:

Visual Basic:
DoCmd.OpenForm ("VENDITE")
Me.Etichetta = "ciao ciao"
ma ovviamente non funziona perchè credo che la maschera attiva sia la prima e non la seconda.
Ho provato così:

Visual Basic:
DoCmd.OpenForm ("VENDITE")
If CurrentProject.AllForms("maschera2").IsLoaded Then
    Forms!maschera2.SetFocus
    DoCmd.SelectObject acForm, "Maschera2"

    Me.etichetta = "ciao ciao"

End If
ma non va.

Come posso fare ?
 

giulianovac

Access/VBA Expert
Expert
9 Giugno 2018
2.233
83
Italy
2013 2019
166
Mi pare chiaro che nell'istruzione Me.etichetta il Me si riferisce al form chiamante, non al form che apri, quindi dovresti sostituire il Me con il nome del form che contiene il controllo etichetta.
 

avatar17

Utente abituale
23 Maggio 2018
109
16
milano
2016
2
Fatto ma non funziona, mi da sempre questo errore: impossibikle trovare il campo '|1' a cui viene fatto riferimento nell'espressione
 

ges

Excel/VBA Expert
Amministratore
Expert
21 Giugno 2015
20.197
1.733
Como
2011MAC 2016WIN
413
Ciao,
se riuscissi a allegare un file di esempio.
 

giulianovac

Access/VBA Expert
Expert
9 Giugno 2018
2.233
83
Italy
2013 2019
166
Visual Basic:
Private Sub Comando0_Click()
    DoCmd.OpenForm ("Maschera1")
    Form_Maschera1.etichetta = "cia ciao"
End Sub
 

avatar17

Utente abituale
23 Maggio 2018
109
16
milano
2016
2
grazie per l'aiuto, aggiungo un altro quesito ovvero nella seconda maschera è contenuta una sottomaschera con un campo. Per prendere il valore contenuto in quel campo e copiarlo in un'etichetta della maschera principale, come si fa ? (non riesco a trovare la sintassi corretta).
Ho allegato il file di esempio.
Sempre nell'esempio ho messo una un'istruzione if che va a vedere se un'etichetta eè vuota o meno e qualora fosse vuota, copia un valore nell'etichetta. Per verificare se è vuota o meno, ho usato = null e anche ="" , ma non funziona, è come se fosse questo campo avesse sempre un valore anche se non è così.

Un aiuto.
 

Allegati

avatar17

Utente abituale
23 Maggio 2018
109
16
milano
2016
2
ciao ho lasciato la stessa discussione perchè è praticamente uguale il quesito: non riesco ad aggiornare la maschera principale con i valori presi da una sottomaschera.
 

giulianovac

Access/VBA Expert
Expert
9 Giugno 2018
2.233
83
Italy
2013 2019
166
Sempre nell'esempio ho messo
Scusa, ma il problema è diverso. Sembra simile, ma non lo è.

Inoltre, non hai dato alcuna indicazione su dove sia il problema:
1. quale delle 3 maschere?
2. Da quale maschera parti?
3. Qual è quella che non si aggiorna?

Avatar, se vuoi essere aiutato spiega in dettaglio.
 

Sostieni ForumExcel

Aiutaci a sostenere le spese e a mantenere online la community attraverso una libera donazione!