Hallo nochmal,
Werner hat mir schon ein riesen stück weiter geholfen.
Ich muss nachträglich allerdings noch einen zusätzlichen Filter einbauen, komme aber nicht ganz zurecht.
Und zwar möchte ich irgendwie ermöglichen, dass nur Jubilare ab 50 und darüber (in 5er Schritten) übernommen werden (also 50, 55,60,65, ....95) etc, sofern sie denn am aktuellen Datum Geburtstag hätten. Per Formel mit wenn(oder(Stammdaten!F2=50;Stammdaten!F2=55;Stammdaten!F2=60;.etc.;);F2;"") ginge das, bringt aber hier wenig.
Ich hatte daran gedacht das Alter aus "Stammdaten" F gegen ein Array zu prüfen und den Datensatz zu überspringen wenn der Wert aus F nicht im Array zu finden ist. Macht das Sinn?
So in der Art müsste das funktionieren?
Dim myArray, ageSuch As integer
ageSuch=raZelle.offset(,1)
myArray = Array(50,55,60,65,70,75,80,85,90,95,100)
If IsError(Application.Match(ageSuch, myArray, 0)) Then
->Überspringe aktuellen Datensatz <-
Else
-> mach weiter und koppiere den ganzen spass wie gehabt<-
End If
Wenn das so funzt wüste ich jedoch nicht an welcher Stelle genau ich das im obigen Code wie einbasteln müsste XD
Wäre cool wenn jemand die Richtugn weisen kann.
Gruß Mathias
|