access tasto interruttore (si/no) "selezione multipla"

Question

Buongiorno a tutti,

avrei bisogno di creare un tasto "seleziona tutto" (tipo: "approva tutti", "annulla tutti", "nessuno").

Nel caricare una "lista/elenco nuova" da exl, avrei bisogno di un tasto si/no anche "combo" ("approva tutti", "annulla tutti" ...) per velocizzare la procedura di caricamento...

attualmente ho creato 2 pulsanti:

1. il "pulsante approva" è associato tramite formula vba a un campo data e tramite dlook up a un campo testo che dopo il clic da "nuovo" visualizza "approvato"
2. il "pulsante annulla" è associato tramite dlook up a un campo testo che dopo il clic da "nuovo" visualizza "annullato"

Vorrei creare un pulsante in grado di dare il comando "selezionatutti" o al pulsante(1) o al pulsante(2)

pur lasciando i due pulsanti nel caso ci sia bisogno di parziali modifiche.

ho trovato questa indicazione per risolvere il mio problema, qualcuno potrebbe aiutarmi a tradurla per il mio caso?

http://support.microsoft.com/kb/120275/it

Come creare pulsanti per selezionare tutti i record, cancellare la selezione ed eliminare i record selezionati

grazie per le eventuali proposte di soluzione ... rimango in ricerca

Jp

Answer 1

Ciao,

ho capito che vuoi un pulsante che ti consente di "Approva tutti" e uno che "Annulla tutti", ovvero che impostano alcuni valori in determinati campi.

Credo che la soluzione sia di creare una o più "query di aggiornamento" da eseguire con il metodo OpenQuery quando premi click sul pulsante.

Ciao

Giorgio Rancati

Answer 2

Ciao Giorgio,

proverò con una nuova simulazione ... grazie mille.

A presto

Jp

Answer 3

Ciao Jp,

per la domanda 1, puoi utilizzare l'evento dopo aggiornamento della casella combinata, ovvero dopo aver cambiato valore alla casella viene scatenato l'evento ed eseguito il codice al suo interno.

Per l'errore, ho provato a simulare maschera, tabella e query, a me funziona perfettamente, dovresti controllare meglio quello che hai fatto in particolar modo se msc1 è effettivamente il nome della maschera.

L'unico dubbio che mi viene è che [Data Fine] dovrebbe prenderlo dalla tabella in aggiornamento e non dalla maschera, in questo caso l'espressione diventa

DateAdd("AAAA";[Forms]![msc1]![validità corso (anni)];[data fine])

vedi tu se deve essere così.

Ciao

Giorgio Rancati

Answer 4

Ciao Giorgio,

grazie per la risposta n.2.

Ho trovato un errore

nella query [q_agg_approva tutti]

campo1: approva/emetti, criterio No, aggiorna Sì

campo2: annulla, criterio No, aggiorna No

campo3: ho inserito il campo [data scadenza] e ho aggiornato seguendo il tuo suggerimento ...

...ma dopo "esegui" a seguito del "criterio mancante" appare la msc "tipo di dati non corrispondente nell'espressione criterio". cosa dovrei indicare nel criterio?

ecco l'altra espressione in cui riscontro lo stesso problema:

Private Sub data_rilascio__tutti__Click()

DoCmd.OpenQuery "q_agg_data rilascio", , acEdit

End Sub

Private Sub data_rilascio__tutti__GotFocus()

Me.refresh

End Sub

Private Sub data_rilascio_AfterUpdate()

progressivo = Nz(DMax("progressivo", "nuovi attestati", "Year([data_rilascio])=" & Year(Me.data_rilascio))) + 1

End Sub

in quest'ultima non riesco a far funzionare dal cmd openquery il "progressivo" 1,2,3,.../2013 nel numero di protocollo.

riguardo alla domanda (1):

vorrei sapere se è possibile con una casella combinata modificare il campo "aggiorna" della query di aggiornamento per modificare dalla maschera i dati, non con un "pulsante di cmd openquery" come nel caso precedente, ma con la casella combinata ...

Grazie

Jp

Answer 5

Ciao Jp,

la domanda nr. 1 è per me incomprensibile ma forse è solo una generalizzazione della domanda Nr. 2 che ha più dati per essere compresa.

Per la domanda Nr. 2 devi agire nella query [q_agg_approva tutti] inserendo per il campo [data scadenza] in corrispondenza di "Aggiorna A" la formula:

DateAdd("AAAA";[Forms]![msc1]![validità corso (anni)];[Forms]![msc1]![data fine])

ho scritto la formula secondo la sintassi che si usa nell'interfaccia grafica delle query per i computer localizzati in italiano, se le modifiche le fai nel linguaggio Sql o se il tuo computer è localizzato in Inglese-Usa cambia il punto e virgola con la virgole e "AAAA" con "YYYY"

Ciao

Giorgio Rancati