Beste forumleden,
Ik zit met het volgende probleem.
De situatie:
In een formulier ‘Orders’ laat ik de gegevens in uit een tabel ‘Klanten’.
In deze tabel bevindt zich een keuzeveld ‘Klantcategorie’ , met daarin 3 mogelijkheden: ‘prospect’, ‘relatie’ en ‘klant’
In het formulier ‘Orders’ mogen alleen de gegevens ingeladen worden van een ‘klant’.
Indien de keuzelijstgegevens staan op ‘relatie’ of ‘prospect’ volgt er vanuit het formulier ‘Orders’ een msgbox en wordt via > DoCmd.OpenForm "klanten" < het formulier ‘klanten’ geopend.
Het keuzeveld kan dan worden aangepast aan de positie ‘klant’ en de gegevens kunnen daarna worden ingeladen in het formulier ‘Orders’.
Bij het openen van het formulier ‘Klanten’ wordt standaard de eerste record weergegeven.
Wat ik wil is dat de betreffende ‘prospect’ cg ‘relatie’ in het formulier ‘Klanten” wordt getoond (gevonden) die overeenkomt met de gegevens die zijn ingeladen in het formulier ‘Orders’.
Het overeenkomstige id-veld is ‘klantid’
Hieronder het vba wat in het formulier ‘Orders’ bij het event ‘voor bijwerken’ is opgenomen en wat dus het formulier ‘Klanten’ opent
If [Klantcategorie_id] < 3 Then
msgbox "De opdrachtgever staat genoteerd als 'Relatie' of 'Prospect' ipv 'Klant'" _
& vbCrLf & "Pas in formulier klanten de klantcategorie aan naar >Klant< ", vbCritical, "bedrijfsnaam"
DoCmd.CancelEvent
DoCmd.OpenForm "klanten"
End If
Exit Sub
Ik hoop dat het een beetje duidelijk is.
Bedankt maar weer….
Ik zit met het volgende probleem.
De situatie:
In een formulier ‘Orders’ laat ik de gegevens in uit een tabel ‘Klanten’.
In deze tabel bevindt zich een keuzeveld ‘Klantcategorie’ , met daarin 3 mogelijkheden: ‘prospect’, ‘relatie’ en ‘klant’
In het formulier ‘Orders’ mogen alleen de gegevens ingeladen worden van een ‘klant’.
Indien de keuzelijstgegevens staan op ‘relatie’ of ‘prospect’ volgt er vanuit het formulier ‘Orders’ een msgbox en wordt via > DoCmd.OpenForm "klanten" < het formulier ‘klanten’ geopend.
Het keuzeveld kan dan worden aangepast aan de positie ‘klant’ en de gegevens kunnen daarna worden ingeladen in het formulier ‘Orders’.
Bij het openen van het formulier ‘Klanten’ wordt standaard de eerste record weergegeven.
Wat ik wil is dat de betreffende ‘prospect’ cg ‘relatie’ in het formulier ‘Klanten” wordt getoond (gevonden) die overeenkomt met de gegevens die zijn ingeladen in het formulier ‘Orders’.
Het overeenkomstige id-veld is ‘klantid’
Hieronder het vba wat in het formulier ‘Orders’ bij het event ‘voor bijwerken’ is opgenomen en wat dus het formulier ‘Klanten’ opent
If [Klantcategorie_id] < 3 Then
msgbox "De opdrachtgever staat genoteerd als 'Relatie' of 'Prospect' ipv 'Klant'" _
& vbCrLf & "Pas in formulier klanten de klantcategorie aan naar >Klant< ", vbCritical, "bedrijfsnaam"
DoCmd.CancelEvent
DoCmd.OpenForm "klanten"
End If
Exit Sub
Ik hoop dat het een beetje duidelijk is.
Bedankt maar weer….