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


 



geschrieben von

Login

E-Mail:
  

Passwort:
  

Beitrag anfügen

Symbol:
 
 
 
 
 
 
 
 
 
 
 
 
 

Überschrift: