title image


Smiley Re: Datum von bis in Kombibox


Dim Res as string, VonDate as date, BisDate as date, D as date

D = VonDate

Do until D > BisDate

Res = Res & ";" & Format(D,"dd.mm.yyyy")

D = Dateadd("d",1,D)

Loop

Me!MeinKombi.Rowsource = Mid(Res,2)





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: