*

Help!

PC-Problemen?
De vrijwilligers van Oplossing.be zoeken gratis met u mee!

Hulp bij posten

Recente topics

Pagina's: [1]   Omlaag

Auteur Topic: DoCmd in Access 2000  (gelezen 1785 keer)

0 leden en 1 gast bekijken dit topic.

Offline krvan

  • Lid
  • *
  • Berichten: 20
  • Oplossing.be
DoCmd in Access 2000
« Gepost op: 22 mei 2004, 15:26:28 »
Ik heb in Access 2000 en formulier met daarin een subformulier.  Tijdens de lessen VBA het ik geleerd dat ik met het commando DoCmd.Findrecord kan zoeken.
De zoekopdracht beperkt zich echter tot het formulier

Met welke commando's geraak ik in het subformulier en kan ik zo de gegevens vinden die in het subformulier staan?

Bedankt!
Gelogd
Gelieve uw systeemgegevens in te vullen. Klik HIER voor meer informatie.

Offline Andrea

  • Lid
  • *
  • Berichten: 22
Re:DoCmd in Access 2000
« Reactie #1 Gepost op: 09 september 2004, 20:53:25 »
Hallo Krvan

Maak in je formulier een "Niet-afhankelijk"keuzelijst met invoervak. in Rijbron maak je een SQL door de tabel te selecteren waar de gegevens in voorkomen.
Je wilt bv. op Familienaam zoeken in je subformulier, sleep dit dan naar de rij met Veld.
In Rijbron zie je SELECT tblXXX.Familienaam....
Verander dit naar SELECT DISTINCT tblXXX.Familienaam...
Dit om te voorkomen dat identieke familienamen meermaals zouden voorkomen in de keuzelijst.
Maak een opdrachtknop : cmdZoeken
en volgende VBA code zetten Bij klikken:
Private Sub CmdZoeken_Click()
Form_subfrmnaam.Filter = "[Familienaam]"
DoCmd.DoMenuItem acFormBar, acRecordsMenu, 2, , acMenuVer70
Form_subfrmnaam.Filter = "[Familienaam] Like " & Chr(34) & txtzoeken.Value & Chr(34)
End Sub

subfrmnaam = de naam van je subformulier.

Veel geluk!
Andrea


Gelogd
Win XP Home SP1 - intel Pentium 4 1800 Mhz - IE 6 - ADSL Skynet - MS Office 2000
Pagina's: [1]   Omhoog
 


www.combell.com