Springen naar inhoud


- - - - -
Solved

Meerdere Velden Invullen Op Basis Van Keuzelijst



  • Log in a.u.b. om te beantwoorden
Er zijn 3 reacties in dit onderwerp

#1 KimDS

KimDS

    Starting Developer

  • Leden
  • 2 berichten
    Laatst bezocht 11 mei 2014 16:14

Geplaatst op 21 augustus 2012 - 23:20

Ik ben een Access database aan het maken om de werkplaats en werktijden van personeel te registreren.
In mijn database zitten enkele tabellen zoals de personeelsgegevens (ID, naam, werkplaats, ...) en de werktijdregistratie (datum, personeelID, vaste werkplaats, uitgeoefende werkplaats,...)

Via een formulier vul ik in een nieuw record in de tabel werktijdregistratie het ID van een personeelslid in dmv een keuzelijst. Nu wil ik op basis van deze keuze (personeelslid) enkele velden uit het record van personeelsgegevens kopieren naar velden van het record dat ik aanmaak in de tabel werktijdregistratie. Bijvoorbeeld het veld werkplaats uit personeelsgegevens kopieren naar het veld vaste werkplaats in werktijdregistratie.

De reden hiervoor is dat de gegevens in personeelsgegevens in de tijd (maanden, jaren) kunnen wijzigen, maar in de tabel werktijdregistratie moet ik enkele personeelsgegevens opslaan die op dat tijdstip geldig waren.

Bestaat hiervoor een eenvoudige manier in Access? of wordt dit code?

Bedankt voor je hulp!

#2 guest_ingrid_*

guest_ingrid_*
  • Gasten
    Laatst bezocht

Geplaatst op 22 augustus 2012 - 11:45

Ik zou geen 'eenvoudige manier' weten hoe je dat kan doen. Via VBA lijkt mij de meest voor de hand liggende oplossing.

#3 Aspergio

Aspergio

    Starting Developer

  • Leden
  • 1 berichten
    Laatst bezocht 30 aug 2012 09:07

Geplaatst op 29 augustus 2012 - 16:47

Zorg ervoor dat de keuzelijst alle velden bevat die je wenst in te vullen
bv keuzelijst bevat 'ID', 'naam' en 'werkplaats'
Als je het personeelslid selecteert op basis vd naam, kan je ook 'ID' en 'werkplaats' laten invullen:
Stel dat je 'ID' wenst in te vullen in txtID en dat je 'werkplaats' wenst in te vullen in txtWerkplaats, gebruik dan
me.txtID=me.keuzelijst.column(0)
me.txtWerkplaats=me.keuzelijst.column(2)

#4 KimDS

KimDS

    Starting Developer

  • Leden
  • 2 berichten
    Laatst bezocht 11 mei 2014 16:14

Geplaatst op 29 augustus 2012 - 23:19

Ik had het ondertussen ook gevonden. Toch bedankt!





Ook met taq Solved voorzien

0 gebruiker(s) lezen dit onderwerp

0 lid(leden), 0 bezoeker(s), 0 anonieme gebruikers

Inloggen


[Solved] Untitled 1

Met dank aan Jürgen voor de jarenlange inzet van visualbasic.be (anno dec 2000)
Met dank aan Mike en Ronneke voor de jarenlange inzet van vbib.be (anno dec 2010)
Met dank aan PascalBianca voor de jarenlange inzet van vbib.be (anno dec 2016)