title image


Smiley Re: Filter setzen mittels Kombinationsfeld
Je nachdem, was jetzt in deinem Kombifeld drinsteht, halt so etwas wie:



Private Sub Kombi_AfterUpdate()

Me.Filter = "Datum =#" & Format(Me!Kombi,"yyyy-mm-dd") & "#"

Me.FilterOn = True

end sub





Und analog für den Druck-Button:



Private Sub Drucken_Click()

Docmd.OpenReport "DeinBericht",,,"Datum =#" & Format(Me!Kombi,"yyyy-mm-dd") & "#"

end sub





Gruß aus dem Norden
Reinhard


Bitte immer die Access-Version angeben!
DB-Wiki


Wie man Fragen richtig stellt

YaccessAccess-FAQUnd ansonsten: Wikipedia




geschrieben von

Login

E-Mail:
  

Passwort:
  

Beitrag anfügen

Symbol:
 
 
 
 
 
 
 
 
 
 
 
 
 

Überschrift: