generare evento in una maschera con origine record una query a campi incrociati

Question

generare evento in una maschera con origine record una query a campi incrociati

cri 20

buona sera...ho un piccolo problema in ACCESS che no riesco a risolvere:

In una maschera creata per una giornaliera operai ho come origine record una query a campi incrociati dove

nel record ho la data, nella colonna il nome operaio come "etichetta" e nel valore in colonna le ore eseguite;

cliccando generando un evento su "etichetta" con il nome dell'operaio vorrei aprire la relativa scheda dell'operaio per inserimento le ore eseguite con :

DoCmd.OpenForm "inserimentooreeseguite", , , "nome=" & Me.nome

ma mi da sempre errore...ho provato in diverse maniere ma no riesco a trovare una soluzione nemmeno su dei tutorial...

un mano sarebbe veramente di aiuto... grazie ancora

0 commenti

Risposta accettata dall'autore della domanda

0 risposte aggiuntive

Risposta

Answer 1

Anonimo

Nota: Questa risposta è stata tradotta automaticamente. Di conseguenza, può contenere errori grammaticali o espressioni strane.

Ciao cri

Per assisterti meglio, potresti fornire l'errore esatto che stai ricevendo?

Basandomi sulla tua descrizione, penso che l'errore in DoCmd.OpenForm "inserimentooreeseguite", , , "nome=" & Me.nome potrebbe verificarsi per due motivi:

Virgolette Mancanti: Poiché il nome del lavoratore è una Stringa, i criteri devono essere racchiusi tra virgolette singole: 'nome='" & Me.nome & "'".
Origine Controllo Dinamica: In una Query Pivot, i nomi dei campi cambiano con i nomi dei lavoratori. Se clicchi su "Mario", il controllo si chiama "Mario", non "nome".

Quindi, invece di Me.nome, potresti provare a usare Me.ActiveControl.Name per catturare il nome della colonna su cui hai appena cliccato

Private Sub WorkerColumn_Click()
    Dim workerName As String
    workerName = Me.ActiveControl.Name 
    DoCmd.OpenForm "inserimentooreeseguite", , , "nome='" & workerName & "'"
End Sub

Se il problema persiste, sentiti libero di caricare il tuo file su OneDrive e condividere il link con me tramite messaggio privato in modo che io possa dare un'occhiata più da vicino.

Immagine dell'utente

Spero che questo aiuti.

Nota: Segui i passaggi in la nostra documentazione per abilitare le notifiche via e-mail se desideri ricevere la notifica correlata per questa discussione.

cri 20 Punti di reputazione

2026-05-14T15:40:20.0033333+00:00

ciao Gabriel

ti allego file per capire meglio..

[Nota del moderatore: informazioni personali rimosse]
Anonimo

2026-05-15T07:25:15.1633333+00:00

Si prega di notare che il forum di domande e risposte è una piattaforma pubblica e i moderatori modificheranno la domanda per nascondere informazioni personali nella descrizione. Ti invitiamo a nascondere qualsiasi informazione personale o organizzativa la prossima volta che pubblichi un errore o altri dati per proteggere i dati personali.

Ciao cri

Grazie per l'aggiornamento. Per favore, concedimi un po' di tempo per fare ulteriori test da parte mia. Invierò il link che hai condiviso tramite messaggio privato per aiutare a proteggere la tua privacy.
Anonimo

2026-05-15T15:24:29.9933333+00:00
Ciao cri

Ho controllato il tuo file. Il tuo obiettivo è far apparire la tabella sottostante (come mostrato nel mio screenshot) quando clicchi sull'etichetta "Marco"?

Se è così, ho notato che i nomi delle etichette nel tuo Foglio Proprietà (sotto la scheda Altro) sono impostati come Etichetta2 e Etichetta3 invece dei nomi effettivi dei lavoratori. Per risolvere questo problema, devi aggiornare il tuo script in: workerName = Me.Etichetta2.Caption Ti prego di testarlo dalla tua parte.

Inoltre, ho notato altre due cose:

Riga vuota automatica: Per evitare che il modulo aggiunga sempre una nuova riga vuota in basso, puoi aggiungere Me.AllowAdditions = False al tuo script.

Nomenclatura incoerente: Per le caselle di inserimento ore qui sotto, i nomi nella scheda Altro sono un po' disorganizzati. Consiglio di ricontrollare anche quei nomi.

Ho testato queste modifiche e funzionano per me, ma fammi sapere se è questo ciò che intendevi. Spero che questo aiuti. Se hai altre domande, non esitare a chiedere.
Anonimo

2026-05-18T08:45:03.6+00:00

Ciao cri

C'è qualche aggiornamento su questa discussione?

Se il problema è stato risolto, si prega di segnare le risposte utili come risposte.

Questo aiuta altri nella comunità ad affrontare problemi simili.

Grazie per la tua comprensione.
cri 20 Punti di reputazione

2026-05-18T11:55:09.1766667+00:00

ciao Gabriel...scusa se non ti ho risposto prima...ho fatto un po' di prove e dire che è perfetto!

grazie mille ancora per il tuo aiuto...alla prossima e grazie davvero.
Anonimo

2026-05-18T12:13:05.11+00:00

Ciao cri

Sono davvero felice di sapere che le informazioni che ho condiviso ti sono state utili! Se mai avrai bisogno di altro aiuto, sentiti libero di scrivere le tue domande nel forum. Non sono solo io, tutta la comunità è qui e sempre felice di sostenerti.