Archief - [PROG][VBA] Acces Toepassing

Hi all;

Ik hoop dat jullie mij kunnen helpen, ben al een tijdje opzoek nr de oplossing voor een probleem in een acces toepassing van me.

Ik zit namelijk met een subformulier waar ik een keuzelijstje heb met artikelen. Nu zou bij het selecteren van een artikel automatisch mee de prijs exlu BTW en het BTW percentage moeten mee ingevuld worden, deze waarden komen dan vanuit de tabel Producten waar deze bedragen staan. Dit gaat nie via de functie opbouwen, mits dat bij een nieuwe selectie in het keuzelijstje de waarde moeten veranderen.

Dit moet naar het schijnt gebeuren in VBA code, maar dit is niet echt mijn specialiteit. Ik heb dit al proberen te zoeken via google; maar vind niet iets dat mij kan helpen.

Hebben jullie mss een ideetje?

probleem :




Groetjes

Gaat ge da dees weekend afmaken, anders geef ik u de maandag mijne cursus VBA van int middelbaar mee .

Zelf ken ik het ook allemaal ni zo goe mee, maar om u al op gang te zetten:

Ga naar de eigenschappen van het vak waar een gebeurtenis moet bij gebeuren, dus in uw geval die artikelnaam ofzo? Dan in eigenschappen > gebeurtenis > en dan hebde verschillende gebeurtenissen, "bij klikken", "bij wijzigen" enz, als ge dan op de drie puntjes ernaast klikt opent de VBA editor en maakt em automatisch een functie aan.

Via den help kunde misschien al wel wa vinden erover, tis redelijk hetzelfde als VB.net, maar dan iets minder intellisense enz

Als die gegevens in de tabel van de producten staan, waarom zou je ze dan nog eens willen opslaan?
Maak een query en haal de gegevens op uit de tabel producten.
Baseer het subformulier vervolgens op die query. Als je een artikel selecteert, dan zal die query er automatisch voor zorgen dat de andere data van het artikel getoond zal worden.

Heb zo iets ongeveer voor mijn GIP moeten maken..
Bekijk dit eens:
www.bartdevos.be/facturatie.pdf

het wordt interessant vanaf pagina 14 voor u

Enygm zei:

Als die gegevens in de tabel van de producten staan, waarom zou je ze dan nog eens willen opslaan?
Maak een query en haal de gegevens op uit de tabel producten.
Baseer het subformulier vervolgens op die query. Als je een artikel selecteert, dan zal die query er automatisch voor zorgen dat de andere data van het artikel getoond zal worden.

Klik om te vergroten...

omdat je soms de prijs van een product wijzigt, of het niet meer in je assortiment hebt.... Facturen moeten bewaard blijven, zonder rekening te houden met parijsaanpassingen etc...

TiZon zei:

omdat je soms de prijs van een product wijzigt, of het niet meer in je assortiment hebt.... Facturen moeten bewaard blijven, zonder rekening te houden met parijsaanpassingen etc...

Klik om te vergroten...

Hierin heb je absoluut gelijk.

Om dan nog even op de vraag te antwoorden. (zonder de echte oplossing te geven)

Je zal als het product op het order wijzigt, de prijs moeten gaan opzoeken in de tabel van de producten en dan de prijs van de tabel orders updaten met de dagprijs.
Hiervoor moet je programmeren tegen het 'After Update'-event van de keuzelijst met de producten (in de Ndlse versie: het 'Voor bijwerken' event)
In dit event moet je dan het tekstveld van de prijs updaten met de juiste waarde. (die waarde moet je dan gaan opzoeken in de tabel van de producten hé)

Dat kun je als volgt doen:
strFilter = "ProductID = " & Me!ProductID
Me!UnitPrice = DLookup("BedragExclBTW", "Producten", strFilter)

Je vindt deze oplossing terug in de standaarddatabase die bij Access meegeleverd is: de Nortwind-database
Die kan je het snelst openen door Access op te starten en dan te klikken op 'Help' - 'Sample Databases' - 'Nortwind Sample Database'
Open daar het formulier 'Orders' en je krijgt de oplossing op een blaadje