Errore Dlookup

di Anonimizzato28019 il
8 risposte
Ciao A Tutti, sto eseguendo un controllo del valore Anno se esiste o no:

If Not IsNull(DLookup("Calcolato", "Anno", _
"Calcolato = " Me!Calcolato


MsgBox Me!Calcolato & " L'anno calcistico è già inserito.", vbOKOnly, "Anno calcistico Duplicato"

Me.Undo
DoCmd.GoToRecord , , acNewRec
Me.NuovoAnno.SetFocus
End If

Mi restituisce un errore. Dove sto sbagliando???

8 Risposte

  • Le parentesi... im matematica hanno una funzione importante vanno aperte e chiuse in eguale numero... poi manca il Then
    Mi pare tutto un pasticcio.
    Devi usare il TAG per il.codice.
  • Scusa Alex, non mi da errore, ma anche se inserisco un nuovo anno, mi dice che è esistente.
    Ho scritto questo piccolo vba per il controllo di anni duplicati in fase di inserimento.
    In merito al tag, dove devo inserirlo??? ho fatto delle prove ma mi da errore.
    Mi fai un esempio per favore???

    If Not IsNull(DLookup("Calcolato", "Anno", _
    Calcolato = Calcolato)) Then

    MsgBox Me!Calcolato & " L'anno calcistico è già inserito.", vbOKOnly, "Anno calcistico Duplicato"
  • bruno59 ha scritto:


    In merito al tag, dove devo inserirlo???
    Quando scrivi i messaggi qui nel forum, prima clicca sul tasto in basso "Editor completo & Anteprima".
    Vedrai apparire in alto una serie di tasti/comandi di formattazione.
    Quando scrivi del codice (VBA o SQL), ricorda di selezionarlo, poi fai clic sul tasto </> (codice). In questo modo quello che scrivi in codice apparirà con i tipici caratteri monotype più familiari ai programmatori.
  • Scusa Alex, non mi da errore, ma anche se inserisco un nuovo anno, mi dice che è esistente.
    Ho scritto questo piccolo vba per il controllo di anni duplicati in fase di inserimento.
    In merito al tag, dove devo inserirlo??? ho fatto delle prove ma mi da errore.
    Mi fai un esempio per favore???

    If Not IsNull(DLookup("Calcolato", "Anno", _
    Calcolato = Calcolato)) Then

    MsgBox Me!Calcolato & " L'anno calcistico è già inserito.", vbOKOnly, "Anno calcistico Duplicato"
  • bruno59 ha scritto:


    Scusa Alex, non mi da errore, ma anche se inserisco un nuovo anno, mi dice che è esistente.
    Ho scritto questo piccolo vba per il controllo di anni duplicati in fase di inserimento.
    In merito al tag, dove devo inserirlo??? ho fatto delle prove ma mi da errore.
    Mi fai un esempio per favore???

    If Not IsNull(DLookup("Calcolato", "Anno", _
    Calcolato = Calcolato)) Then

    MsgBox Me!Calcolato & " L'anno calcistico è già inserito.", vbOKOnly, "Anno calcistico Duplicato"
    ciao bruno il tag lo trovi dove è la parte cerchiata
  • bruno59 ha scritto:


    Scusa Alex, non mi da errore, ma anche se inserisco un nuovo anno, mi dice che è esistente.
    Ho scritto questo piccolo vba per il controllo di anni duplicati in fase di inserimento.
    In merito al tag, dove devo inserirlo??? ho fatto delle prove ma mi da errore.
    Mi fai un esempio per favore???

    If Not IsNull(DLookup("Calcolato", "Anno", _
    Calcolato = Calcolato)) Then

    MsgBox Me!Calcolato & " L'anno calcistico è già inserito.", vbOKOnly, "Anno calcistico Duplicato"
    Non ho capito perché hai riscritto la stessa cosa 2 volte...?
    Hai fretta...?

    La condizione è sbagliata ovvio che non funziona e restituisce SEMPRE un valore... per come l'hai scritta corrisponde a TRUE...
    Calcolato = Calcolato sarà sempre vera.

    P.s. non fare PUSHING per ottenere risposte perché oltre al richiamo ottieni il contrario.
  • Detto questo direi che abbiamo detto anche troppo.

    Argomento che nemmeno doveva essere aperto.
Devi accedere o registrarti per scrivere nel forum
8 risposte