ich habe das Problem, dass ich aus einer langen Namensliste diejenigen Personen in einer Listbox anzeigen lasse, die innerhalb der nächsten 7 Tage Geburtstag haben.
Angezeigt wird nun folgender Text:
Herr Sebastian Dümpfelmoßer wird am 21.05.1955 47 Jahre alt.
Das Geburtsdatum wird hierbei aus Spalte F ausgelesen.
Der Auszug aus dem Makro lautet so:
UserForm1.ListBox1.AddItem (Cells(z, 3).Value & " " & Cells(z, 5).Value & " " & Cells(z, 4).Value & " wird am " & " " & Cells(z, 6).Value & " " & Year(Date) - Year(Cells(i, 6).Value) & " Jahre alt.")
Wie muß das Teilmakro lauten, damit der Text wie folgt ausgegeben wird:
Herr Sebastian Dümpfelmoßer wird am 21. Mai 47 Jahre alt.
Besteht hierbei auch noch die Möglichkeit, die Einträge in der Listbox richtig zu sortieren nach Geburtstagen?
Für euere Hilfe wäre ich wirklich sehr dankbar.
mfg Klaus W.