Ik heb m'n voorbeeldje op m'n werk gelaten, dus ik maak wel even een nieuwe. Ondertussen even jouw stappen doornemen:
Op zich doe je alles goed, want zo heb ik het ook gedaan. Aan de formule mankeert verder ook niks. Wat is de foutmelding die je krijgt?
Wat je zou kunnen proberen: controleer eerst of je de juiste bibliotheken wel hebt geladen; zodra je met VBA code gaat programmeren op formulieren, wil Access bepaalde bibliotheken geactiveerd hebben. Je kunt dat checken door in de VBA-editor naar Extra of Tools te gaan, en dan naar Verwijzingen. Weet zo gauw de Engelse term niet, maar je hebt niet heel veel opties, dus daar kom je denk ik wel uit. Controleer daar welke bibliotheken zijn geladen, door bijvoorbeeld een Printscreen te maken en die te posten.
Tweede handeling die je kunt doen: controleer de uitkomst van de berekening, door hem eerst aan een variabele toe te kennen, te beginnen bij Schijf1.
Onder de Private Sub zet je dan eerst:
Dim tmp as Double
En de formule wordt dan:
tmp=Val(Schijf1.Value)+... etc.
en daarna:
Msgbox tmp
Als je daarna een getal wijzigt, moet er een messagebox verschijnen met het juiste getal. Is dat niet het geval, dan is dat ook een indicatie waar de fout zou kunnen zitten.
Succes!
Hier ook vast een voorbeeldje, dat bij mij in Access 2003 in ieder geval prima werkt!
Michel
