DLookup + casella combinata.

Question

Salve vorrei sapere se è possibile utilizzare la funzione dlookup su una casella combinata, precisamente sull'evento dopo aggiornamento.

Qui di seguito il codice che ho utilizzato :

Private Sub Citta_AfterUpdate()

Me.Cap = DLookup("[cap]", "indirizzo", "[citta]= forms![utente]![citta]")

End Sub

Io non riesco a farlo funzionare.

Avrei bisogno di chiarimenti.

Grazie.

Answer 1

Ciao Vito_69,

così come scritto il codice presuppone che tu abbia una casella combinata chiamata Citta e una tabella/query chiamata Indirizzo in cui sono presenti almeno 2 campi, Cap e Citta.

Se quanto sopra fosse corretto a quel codice mancherebbero gli apici necessari per il confronto tra stringhe, di conseguenza dovresti modificare in questo modo:

---

Private Sub Citta_AfterUpdate()

    Me!Cap.Value = DLookup("Cap", "Indirizzo", "Citta= '" & Me!Citta.Value & "'")

End Sub

---

Non ci spieghi però l'origine dati della tua casella combinata. Se, come immagino, fosse la tabella Indirizzo allora potresti aggiungere alla combo una seconda colonna (Cap) ed evitare di utilizzare la funzione DlookUp in questo modo:

---

Private Sub Citta_AfterUpdate()

    Me!Cap.Value = Me!Citta.Column(1)

End Sub

---

Ultima annotazione: non conosco il contesto tuttavia fai attenzione che in città di grandi dimensioni i cap variano in base agli indirizzi (a livello di strada e a volta di civico), per cui il vecchio 00100 per Roma o 20100 per Milano non sono più Cap validi ai fini postali.

David

Answer 2

Ciao,

se il tuo scopo è valorizzare la casella di testo "Cap" su dopo aggiornamento della casella combinata "Citta" dando il valore della stessa casella combinata, non serve scomodare DLookup, ma basta:

Me!Cap = Me!citta.Value

Ciao

Massimo