Help!

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

Hulp bij posten

Recente topics

Auteur Topic: 2de printknop op formulier  (gelezen 1937 keer)

0 leden en 1 gast bekijken dit topic.

Offline vop

  • Lid
  • *
  • Berichten: 77
  • Geslacht: Man
  • Oplossing.be
2de printknop op formulier
« Gepost op: 30 november 2015, 14:53:24 »
Wil een 2de printknop plaatsen op Formulier.
De eerste printknop werkt juist:
     Private Sub Knop275_Click()
     DoCmd.RunCommand acCmdSaveRecord
     DoCmd.OpenReport "Toetredende", acViewPreview, , "Gegevens.VolgNr=" & Me.VolgNr

     End Sub

Probleem is de 2de printknop.
Het record is ondertussen opgeslagen door de 1ste printknop.
Dus zou er moeten gewerkt worden met een SET FOCUS denk ik.

     Private Sub Knop276_Click()
     Me.VolgNr.SetFocus
     DoCmd.OpenReport "lidkaart", acViewPreview, , "Gegevens.VolgNr=" & Me.VolgNr
     End Sub

Maar dit werkt dus niet.
Geprobeerd met in de plaats van "Me.VolgNr.SetFocus" met "Gegevens.VolgNr.Set focus".
Dit is blijkbaar ook niet juist.



Offline dizzl

  • Ambassadeur
  • *****
  • Berichten: 2.345
  • I've Upped my standards,now,up yours!
Re: 2de printknop op formulier
« Reactie #1 Gepost op: 30 november 2015, 18:44:31 »
't Zou handiger zijn als je je database hier nog eens zette?
Waarom zet je de focus op Volgnummer?

Wat is de recordbron van het rapport "Lidkaart"? Ik neem aan je tabel "gegevens"?


ik vermoed dat je beter wat hieronder staat zet
DoCmd.OpenReport "lidkaart", acViewPreview, , "VolgNr=" & Me.VolgNr

for the record...
Ik zou je tabel gegevens "tblLeden" noemen en het sleutelveld ervan "Lidnummer"
Systeem  : Intel Core i5-4440 3.1Ghz, 3.1GHz 16Giga Ram 64Bits
Software : Windows 10 professional, Avira, Office 2016 Professional

Offline vop

  • Lid
  • *
  • Berichten: 77
  • Geslacht: Man
  • Oplossing.be
Re: 2de printknop op formulier
« Reactie #2 Gepost op: 30 november 2015, 19:07:55 »
Bedankt dizzl.
Zocht het blijkbaar iets te ver.
WERKT PERFECT.

Kan deze topic afsluiten

 


www.combell.com