Macrocontro llo data duplicata

antcru

il 05 nov 2018, 01:11

14 risposte

antcru

Pochi posts

Iscritto da: mar, 2008

Messaggi:: 38

Macrocontro llo data duplicata

05 nov 2018, 01:30

Ciao a tutti,
non mi dite che cocciutamente continuo con le macro, ma sto continuando in questo percorso, molto ho iniziato a capire e mi farebbe piacere, per mia curiosità e completezza, continuare.
Vi chiedo questa info,

ho una tabella con un campo data e vorrei non si ripetesse
Uso, come farei d'altronte in vba, la funzione DLookUp, ma non funziona
ecco cosa scrivo
DLookUp("[id]";"Proiezione";"[campodata]=#" & Format([txtdata],"mm/dd/yyyy") & "#") Is Not Null ma mi da ereore
dove sbaglio?
Grazie

14 Risposte

@Alex
Super Famoso
Iscritto da
feb, 2012
Messaggi:
8750
Re: Macrocontro llo data duplicata
05 nov 2018, 07:51
Prima di tutto usa i TAG quando posti codice.

Poi spiega cosa vuoi ottenere e cosa fa quello che hai scritto sotto:
```
DLookUp("[id]";"Proiezione";"[campodata]=#" & Format([txtdata],"mm/dd/yyyy") & "#") Is Not Null 
```
La funzione DlookUp la conosciamo, ma il confronto con Is Not Null...? Lo sai che questo restituisce così come è scritto un Boolean non una data...?
Sicuro che lo usi in VBA... non funzionerebbe allo stesso modo...

Spiegaci bene, poi se vuoi usare le Macro.... ognuno è libero di farsi male, e probabilmente riceverai meno aiuti qualificati.
A
antcru
Pochi posts
Iscritto da
mar, 2008
Messaggi:
38
Re: Macrocontro llo data duplicata
05 nov 2018, 08:18
Scusate per i tag.
Si so che così restituisce un boolean, infatti la DLookUp restituisce il valore se trova un record che corrisponde ai criteri altrimenti restituisce NULL.
A me non interessa il valore, mi interessa solo che se trova un record con la data scritta nel controllo txtdata, quindi non è NULL, significa che la data è già presente e do un messaggio.
O
OsvaldoLaviosa
Super Famoso
Iscritto da
apr, 2012
Messaggi:
7501
Re: Macrocontro llo data duplicata
05 nov 2018, 09:36
antcru ha scritto:
ho una tabella con un campo data e vorrei non si ripetesse
Per me ti basterebbe una "query ricerca duplicati", c'è anche la procedura guidata.

Non riesco a entrare nel merito dell'espressione che hai postato. Né a cosa ti serve. Avrei dubbi sulla sintassi. Nelle macro si usa sempre il punto-virgola (in VBA sempre la virgola), tui hai postato una espressione "mista".
@Alex
Super Famoso
Iscritto da
feb, 2012
Messaggi:
8750
Re: Macrocontro llo data duplicata
05 nov 2018, 10:32
antcru ha scritto:
Scusate per i tag.
Si so che così restituisce un boolean, infatti la DLookUp restituisce il valore se trova un record che corrisponde ai criteri altrimenti restituisce NULL.
A me non interessa il valore, mi interessa solo che se trova un record con la data scritta nel controllo txtdata, quindi non è NULL, significa che la data è già presente e do un messaggio.
DCOUNT ti piace proprio poco...?
Se restituisce ZERO altrimenti >0...

Io, da VBA preferisco scrivere:
```
DCount("[id]";"Proiezione";"[campodata]=" & Clng(Forms!NomeForm!txtData))>0
```
A
antcru
Pochi posts
Iscritto da
mar, 2008
Messaggi:
38
Re: Macrocontro llo data duplicata
05 nov 2018, 10:43
OsvaldoLaviosa ha scritto:
Per me ti basterebbe una "query ricerca duplicati", c'è anche la procedura guidata.
non saprei come questirla con la macro

OsvaldoLaviosa ha scritto:
Non riesco a entrare nel merito dell'espressione che hai postato. Né a cosa ti serve. Avrei dubbi sulla sintassi. Nelle macro si usa sempre il punto-virgola (in VBA sempre la virgola), tui hai postato una espressione "mista".
Si, ho sbalgiato a scrivere, le virgole dovevano essere dei punti e virgola, comunque mi da errore.
@Alex ha scritto:
DCOUNT ti piace proprio poco...?
Se restituisce ZERO altrimenti >0...

Io, da VBA preferisco scrivere:
DCount("[id]";"Proiezione";"[campodata]=" & Clng(Forms!NomeForm!txtData))>0
Si in VBA spesso uso anche DCOUNT

Resta che volevo provare con la macro, mi sa che devo rinunciare
O
OsvaldoLaviosa
Super Famoso
Iscritto da
apr, 2012
Messaggi:
7501
Re: Macrocontro llo data duplicata
05 nov 2018, 10:47
antcru ha scritto:
OsvaldoLaviosa ha scritto:
Per me ti basterebbe una "query ricerca duplicati", c'è anche la procedura guidata.
non saprei come questirla con la macro
Non conosco il tuo contesto generale di automatizzazione, ma tu predisponi la query ricerca duplicati e dagli un nome, poi esiste l'azione macro ApriQuery
O
OsvaldoLaviosa
Super Famoso
Iscritto da
apr, 2012
Messaggi:
7501
Re: Macrocontro llo data duplicata
05 nov 2018, 10:50
@Alex ha scritto:
Io, da VBA preferisco scrivere:
DCount("[id]";"Proiezione";"[campodata]=" & Clng(Forms!NomeForm!txtData))>0
Attento @Alex, hai scritto con i punto-virgola...mo mo gli abbiamo detto che in VBA si usa la virgola...
A
antcru
Pochi posts
Iscritto da
mar, 2008
Messaggi:
38
Re: Macrocontro llo data duplicata
05 nov 2018, 10:56
OsvaldoLaviosa ha scritto:
antcru ha scritto:
OsvaldoLaviosa ha scritto:
Per me ti basterebbe una "query ricerca duplicati", c'è anche la procedura guidata.
non saprei come questirla con la macro
Non conosco il tuo contesto generale di automatizzazione, ma tu predisponi la query ricerca duplicati e dagli un nome, poi esiste l'azione macro ApriQuery
Il mio contesto è una maschera basata su tabella in cui inserisco i dati, tra cui una data, e non appena inserisco la data, sull'evento prima di aggiornare, vorrei controllare che quella data non sia già presente nella tabella, se già presente apprare un messaggio e non mi muovo da quel controllo(azione AnnullaEvento)
OsvaldoLaviosa ha scritto:
@Alex ha scritto:
Io, da VBA preferisco scrivere:
DCount("[id]";"Proiezione";"[campodata]=" & Clng(Forms!NomeForm!txtData))>0
Attento @Alex, hai scritto con i punto-virgola...mo mo gli abbiamo detto che in VBA si usa la virgola...
Cmq c'ero arrivato a capirlo
O
OsvaldoLaviosa
Super Famoso
Iscritto da
apr, 2012
Messaggi:
7501
Re: Macrocontro llo data duplicata
05 nov 2018, 11:03
antcru ha scritto:
Il mio contesto è una maschera basata su tabella in cui inserisco i dati, tra cui una data, e non appena inserisco la data, sull'evento prima di aggiornare, vorrei controllare che quella data non sia già presente nella tabella, se già presente apprare un messaggio e non mi muovo da quel controllo(azione AnnullaEvento)
Per quanto si possa gestire tutto "elegantemente" in VBA (o macro?), sappi che potresti impostare nativamente nella tabella al campo [data] la proprietà Indicizzato: Sì (Duplicati non ammessi). Quando vai a inserire una data già esistente, Access ti invia un messaggio di errore.
A
antcru
Pochi posts
Iscritto da
mar, 2008
Messaggi:
38
Re: Macrocontro llo data duplicata
05 nov 2018, 11:30
OsvaldoLaviosa ha scritto:
Per quanto si possa gestire tutto "elegantemente" in VBA (o macro?), sappi che potresti impostare nativamente nella tabella al campo [data] la proprietà Indicizzato: Sì (Duplicati non ammessi). Quando vai a inserire una data già esistente, Access ti invia un messaggio di errore.
Certo, ma l'errore vorrei gestirlo io, non appena inserisco la data e non quando salvo il record, tra l'altro con un mio messaggio d'errore. (A tal proposito so che potrei intercettare l'errore e farmi stampare un mio messaggio, ma poi cmq mi visualizza il messaggio di sistema)
O
OsvaldoLaviosa
Super Famoso
Iscritto da
apr, 2012
Messaggi:
7501
Re: Macrocontro llo data duplicata
05 nov 2018, 11:46
antcru ha scritto:
Certo, ma l'errore vorrei gestirlo io, non appena inserisco la data e non quando salvo il record, tra l'altro con un mio messaggio d'errore. (A tal proposito so che potrei intercettare l'errore e farmi stampare un mio messaggio, ma poi cmq mi visualizza il messaggio di sistema)
Il messaggio di errore ti arriva immediatamente dopo aver lasciato il campo [data] (e non dopo salva record).
Si può personalizzare il messaggio di errore ed evitare quello di sistema...io non tanto lo so fare…@Alex saprà certamente indicarti la soluzione adeguata. Oppure prova a dare un'occhiata qui
https://it.comp.appl.access.narkive.com/TLsVfJgG/duplicati-non-ammessi-e-messaggio-di-errore
https://www.iprogrammatori.it/forum-programmazione/access/messaggio-errore-personalizzato-cliente-gia-esistente-t8667.html
@Alex
Super Famoso
Iscritto da
feb, 2012
Messaggi:
8750
Re: Macrocontro llo data duplicata
05 nov 2018, 11:53
OsvaldoLaviosa ha scritto:
@Alex ha scritto:
Io, da VBA preferisco scrivere:
DCount("[id]";"Proiezione";"[campodata]=" & Clng(Forms!NomeForm!txtData))>0
Attento @Alex, hai scritto con i punto-virgola...mo mo gli abbiamo detto che in VBA si usa la virgola...
Dipende dove inserisci la formula... se si usa l'EDITOR da QBE o GENERATORE di ESPRESSIONI serve il PuntoVirgola.
@Alex
Super Famoso
Iscritto da
feb, 2012
Messaggi:
8750
Re: Macrocontro llo data duplicata
05 nov 2018, 11:54
antcru ha scritto:
OsvaldoLaviosa ha scritto:
Per quanto si possa gestire tutto "elegantemente" in VBA (o macro?), sappi che potresti impostare nativamente nella tabella al campo [data] la proprietà Indicizzato: Sì (Duplicati non ammessi). Quando vai a inserire una data già esistente, Access ti invia un messaggio di errore.
Certo, ma l'errore vorrei gestirlo io, non appena inserisco la data e non quando salvo il record, tra l'altro con un mio messaggio d'errore. (A tal proposito so che potrei intercettare l'errore e farmi stampare un mio messaggio, ma poi cmq mi visualizza il messaggio di sistema)
Ma vuoi usare le Macro... decidi cosa vuoi fare da grande però, io nell'ottica di Macro chiudo il supporto...!
A
antcru
Pochi posts
Iscritto da
mar, 2008
Messaggi:
38
Re: Macrocontro llo data duplicata
05 nov 2018, 12:05
OsvaldoLaviosa ha scritto:
Il messaggio di errore ti arriva immediatamente dopo aver lasciato il campo [data] (e non dopo salva record).
Questo è vero se inserisci i dati nella tabella, non se li inserisci tramite una maschera.

@Alex ha scritto:
Ma vuoi usare le Macro... decidi cosa vuoi fare da grande però, io nell'ottica di Macro chiudo il supporto...!
Volevo gestirlo con la macro senza usare vba.
Cmq grazie lo stesso, se troverò una soluzione la posto

Devi accedere o registrarti per scrivere nel forum

14 risposte