popolare automaticamente un campo

Anonimo
2012-07-31T10:07:44+00:00

Ho creato un Db  

Ho creato 3 tabelle ;

              1 - Fornitori (Fornitore, Città, Centro di Costo )

               2 - GL (Fornitore, Data Fattura, Centro di Costo , Importo)

Ho fatto una Query che hg collegato le tabelle tramite il campo Fornitore.

Nella tabella GL:

Ho collegato il campo Fornitore in modo che sia swlwzionabile dalla tabella Fornitori tramite una  finestra a tendina ; fin qui tutto bene.

Vorrei che selezionando il Fornitore che mi serve venisse popolato automaticamente il campo Centro di Costo associato .

Come si fa??

Grazie

Microsoft 365 e Office | Access | Per la casa | Windows

Domanda bloccata. Questa domanda è stata eseguita dalla community del supporto tecnico Microsoft. È possibile votare se è utile, ma non è possibile aggiungere commenti o risposte o seguire la domanda.

0 commenti Nessun commento
Risposta accettata dall'autore della domanda
Anonimo
2012-08-01T15:56:13+00:00

Ciao,

se i campo della tabella GL si chiama centro di costo, la casella di testo che hai nella maschera, associata al campo CdC, probabilmente si chiamerà centro_di_Costo se tu non gli hai dato un altro nome per cui:

Private Sub ConnettiTabella()

Dim con As Object

Dim rs As Object

Set con = Application.CurrentProject.Connection

Set rs = CreateObject("ADODB.Recordset")

rs.Open "Select [Centro di costo] AS CC FROM Fornitori Where Fornitore ='" & tendina.SelText & "'", con, 1

myVar = rs("CC")

MsgBox Prompt:=myVar

me.centro_di_Costo = myvar

 End Sub

m invece di tutto questo accrocchio potevi semplicemnte fare:

Sub Tendina_Change()

me.centro_di_Costo=Dlookup("[Centro di costo]" , "Fornitori", "Fornitore='" & tendina.SelText & "'")

End Sub

La risposta è stata utile?

0 commenti Nessun commento

33 risposte aggiuntive

Ordina per: Più utili
  1. Anonimo
    2012-08-01T08:21:06+00:00

    Ti ringrazio ma per la creazione di maschere e quant'altro non ci sono problemi. In realtà Access non serve a nulla. Nel senso che se dovessi creare un'applicazione-nterfaccia potrei crearmela scrivendo il codice nativo. Access non serve a nulla.Ripeto, magari mi sbaglio e vi chiedo scusa ma sono perplesso.

    E' anche vero che on so gestire le macro. Per esempio in tabella riesco a fare una "inclusione" da un'altra tabella; infatti selezionando un fornitore da una combo il dato proviene dalla tabella fornitori. Io, senza saper leggere nè scrivere, avrei associato alla combo con ID pippo un evento tipo change che avrebbe chiamato un metodo pluto il quale, a sua volta, avrebbe fatto la query.. ma  non so come utilizzare VB con Access...

    Grazie per il supporto.

    Giuseppe

    La risposta è stata utile?

    0 commenti Nessun commento
  2. Anonimo
    2012-08-01T08:05:15+00:00

    Ciao,

    Ok prova a disegnare una maschera.

    Posizionati sulla tabella Gl e, dal menu in alto, seleziona crea-maschera.

    Purtroppo devi studiare da solo perchè non posso guidarti più di tanto.

    Mimmo

    La risposta è stata utile?

    0 commenti Nessun commento
  3. Anonimo
    2012-07-31T17:32:21+00:00

    Non deve essere per forza fatto in tabella basta una interfaccia tipo maschera...

    La risposta è stata utile?

    0 commenti Nessun commento
  4. Anonimo
    2012-07-31T15:25:33+00:00

    Purtroppo stai facendo un utilizzo di Access che non conosco (direttamente in tabella).

    La funzione:

    =DLookup("Centro di costo";"Fornitore";"Fornitore = " '" & Fornitore & "'")

    fa' esattamente quello che tu dici, prendi il campo Centro di costo dalla tabella Fornitori dove fornitore è uguale alla stringa fornitore appena digitato, ma è utilizzabile su una maschera, su una query o su codice VBA.

    Purtroppo non posso esserti di aiuto. Resta in attesa qualcuno dei nostri amici si farà vivo.

    Ciao Mimmo

    La risposta è stata utile?

    0 commenti Nessun commento