Copiare risultati tra due campi

Question

Salve

vorrei sapere come fare (con un codice VBA o altro) per copiare in automatico il contenuto di un campo in un altro campo nella stessa maschera oppure in una maschera diversa dello stesso DB.

Il tutto nel caso che il nome o il numero da copiare sia il risultato di un espressione o di un calcolo.

In effetti io vorrei copiare esclusivamente il valore ottenuto.

Grazie

Answer 1

Potresti impostare nell'evento dopo aggiornamento del campo CodiceFisc l'istruzione:

forms.Mas_Fascicolo.Testo243 = me.CodFisc

Mimmo

Answer 2

Ciao,

Non essendo associato ad un campo di tabella, devi assegnarlo via codice su aggiornamento della form.

Answer 3

Caro Paolo

grazie per la tua risposta. ho fatto molte prove ma... non sono riuscito a ottenere il risultato voluto.

Ti faccio una sintesi sperando di spiegarmi meglio:

Ho una maschera (denominata Mas_Fascicolo) con dati anagrafici e vi ho inserito una casella di testo (denominata testo243) in cui vorrei comparisse il relativo codice fiscale.

Il codice fiscale viene ricavato da un'altra maschera (denominata Maschera1) che io attivo con un tasto di comando ed ed appare in una casella (denominata CodiceFisc) e la cui origine di controllo è "=CodFisc([Cognome];[NomeInput];[Sesso];[Nascita];[Comune];[Prov])". Chiaramente a me non interessa l'origine ma il valore ottenuto.

Tanto premesso vorrei che il valore ottenuto (nella casella CodiceFisc) fosse copiato automaticamente nella casella della "Mas_fascicolo" e denominata "testo 243" e, cosa ancora più importante, vi rimanesse memorizzata...

Pertanto, secondo quanto ho capito dai tuoi consigli (Me.NomeCampoDestinazione = Me.NomeCampoEspressione) ho creato il seguente codice nella casella Codice Fisc, dopo aggiornamento:

Private Sub CodiceFisc_AfterUpdate()

Me.Testo243 = Me.CodiceFisc
End Sub

ho fatto vari tentetivi purtroppo infruttuosi.

Mi funziona, invece se in origine controllo di Testo243 inserisco l'espressione "=[Maschere]![Maschera1]![CodiceFisc]", dopo aver aggiornato la maschera stessa.

Purtroppo non so come evitare il fatto che dopo aver chiuso la maschera di anagrafica il codice fiscale ...scompare e non viene memorizzato permanentemente.

grazie per l'attenzione

Answer 4

Ciao Aurelio,

se i due controlli sono su diverse maschere, entrambe aperte, dovresti utilizzare una sintassi del tipo:

me.Destinazione = forms.frmDue.NomeControlloOrigine

se sei sulla maschera frmUno e Destinazione è il controllo ricevente

se invece sei sulla frmDue avrai

forms.frmUno.Destinazione = me.NomeControlloOrigine

Ciao Mimmo

Answer 5

Ciao! Per copiare il contenuto di un campo in un altro campo nella stessa maschera o in una maschera diversa dello stesso database, puoi utilizzare il seguente codice VBA:

Me.NomeCampoDestinazione = Me.NomeCampoOrigine

Dove “NomeCampoDestinazione” è il nome del campo in cui vuoi copiare il valore e “NomeCampoOrigine” è il nome del campo da cui vuoi copiare il valore.

Se il valore da copiare è il risultato di un’espressione o di un calcolo, puoi utilizzare il seguente codice VBA:

Me.NomeCampoDestinazione = Me.NomeCampoEspressione

Dove “NomeCampoEspressione” è il nome del campo che contiene l’espressione o il calcolo che restituisce il valore da copiare.

Assicurati di inserire il codice VBA nell’evento appropriato, ad esempio nell’evento “Dopo aver aggiornato” del campo di origine o in un pulsante di comando che attiva la copia.

Spero che questo ti sia utile! Fammi sapere se hai altre domande.