title image


Smiley Re: Listbox befüllen
Hallo RoHase!Versuchs mal folgendermassen:Private Sub Form_Open(Cancel As Integer) Dim iStart As Integer Dim iEnde As Integer Dim sListText As String 'Letzter Tag im Monat iEnde = Day(DateSerial(2000, 7 + 1, 0)) 'String zusammen basteln For iStart = 1 To iEnde sListText = sListText & iStart & ";" Next iStart 'Herkunftstyp zuweisen = Wertliste Me.lstTage.RowSourceType = "Value List" 'Datensatzherkunft zuweisen Me.lstTage.RowSource = Mid(sListText, 1, Len(sListText) - 1)End SubGrussManuelaDa könnte man auch was finden ;-)Karl Donaubauers Access-FAQ: http://www.donkarl.comDev Ashish FAQ (The Access Web): http://www.mvps.org/access/Access Archive: http://www.accessarchive.com/Microsoft Acces Knowledge-Base: http://www.microsoft.com/intlkb/germany/support/kb/B_WACCESS.HTMMicrosoft Online-Suche: http://support.microsoft.com/support/search/Microsoft dt. Online-KB: http://search.microsoft.com/germany/supportkb/Beiträge von verschiedenen Access-NGs: http://home.t-online.de/home/Heinrich.Schramm/deja.htmlWinSite Archive - Microsoft Access Files (Demos & Freeware): http://www.winsite.com/win95/access/index.html
VBA & Acces Tipps & Tricks - Tutorials - Downloads uvm.
Mathematische Definition des allgemeinen Dringlichkeitsaxioms:
D = (PZ/K) * (C + A + N) - Fazit: Alle Dinge werden unter Druck schlimmer


geschrieben von

Login

E-Mail:
  

Passwort:
  

Beitrag anfügen

Symbol:
 
 
 
 
 
 
 
 
 
 
 
 
 

Überschrift: