Dieses Forum nutzt Cookies
Dieses Forum verwendet Cookies, um deine Login-Informationen zu speichern, wenn du registriert bist, und deinen letzten Besuch, wenn du es nicht bist. Cookies sind kleine Textdokumente, die auf deinem Computer gespeichert werden. Die von diesem Forum gesetzten Cookies werden nur auf dieser Website verwendet und stellen kein Sicherheitsrisiko dar. Cookies aus diesem Forum speichern auch die spezifischen Themen, die du gelesen hast und wann du zum letzten Mal gelesen hast. Bitte bestätige, ob du diese Cookies akzeptierst oder ablehnst.

Ein Cookie wird in deinem Browser unabhängig von der Wahl gespeichert, um zu verhindern, dass dir diese Frage erneut gestellt wird. Du kannst deine Cookie-Einstellungen jederzeit über den Link in der Fußzeile ändern.

Freitag, der 13. [Excel 365, 2021, Online]
#1
Moin!
Wer schon immer mal wissen wollte, an welchen Daten sich der böse Tag in diesem Jahrhundert befindet, braucht kein VBA mehr, sondern spillt mit folgender Formel die Daten:
=LET(
 Beginn;DATUM(2000;1;1);Jahre;100;
 Zeitraum;SEQUENZ(365,2425*Jahre;;Beginn);
 FILTER(Zeitraum;(TAG(Zeitraum)=13)*(WOCHENTAG(Zeitraum;2)=5)))


Gruß Ralf
Gib einem Mann einen Fisch und du ernährst ihn für einen Tag. 
Lehre einen Mann zu fischen und du ernährst ihn für sein Leben. (Konfuzius)
[-] Folgende(r) 2 Nutzer sagen Danke an RPP63 für diesen Beitrag:
  • ws-53, wisch
Antworten Top
#2
Moin Ralf

Nett.
Wenn ich das Startdatum auf meinen Geburtstag setze dann habe ich heute Freitag den 13. zum 100. Mal erlebt.
 19
Wir sehen uns!
... Detlef

Meine Beiträge können Ironie oder Sarkasmus enthalten.

Antworten Top
#3
Ich hätte jetzt nicht gedacht, dass Du schon soooo alt bist!  Blush
Ernsthaft:
Ich sehe da keine Fehler-Ursache.
Gerade erst geschnallt!  19
Ich eruiere kurz …

Hah!
Ich habe 103!
Du Jungspund mit Baujahr 64!
19
Gib einem Mann einen Fisch und du ernährst ihn für einen Tag. 
Lehre einen Mann zu fischen und du ernährst ihn für sein Leben. (Konfuzius)
Antworten Top
#4
Nette Spielerei und ein schönes Beispiel für LET!
Antworten Top
#5
(13.01.2023, 18:38)RPP63 schrieb: Hah!
Ich habe 103!
Damit liegt dein Geburtsdatum im Zeitraum 13.07.62 bis 13.09.63.
Wir sehen uns!
... Detlef

Meine Beiträge können Ironie oder Sarkasmus enthalten.

Antworten Top
#6
Hej,

ich habe 111
(Prost Smile )
.      \\\|///      Hoffe, geholfen zu haben.
       ( ô ô )      Grüße, André aus G in T  
  ooO-(_)-Ooo    (Excel 97-2019+365)
Antworten Top
#7
Nö!  05
Wenn, dann doch eher im Zeitraum vom 14.07.1962 bis …
Wink
Ich habe übrigens ein KFZ-Kennzeichen für mein nächstes Auto reserviert:
Stadt-RP 3563
war noch frei!
Gib einem Mann einen Fisch und du ernährst ihn für einen Tag. 
Lehre einen Mann zu fischen und du ernährst ihn für sein Leben. (Konfuzius)
Antworten Top
#8
Zitat:Stadt-RP 3563

Wie das?
.      \\\|///      Hoffe, geholfen zu haben.
       ( ô ô )      Grüße, André aus G in T  
  ooO-(_)-Ooo    (Excel 97-2019+365)
Antworten Top
#9
Als es noch keinen SPILL-FILTER gab, musste man ein wenig mehr rechnen (mit dem Vorteil, theoretisch auch 1.000.000 Folgedatümer bilden zu können, weil kein Wegfilterbedarf bestand):

C2: Ausgangsdatum
C3: Folgedatümer mit feststehendem Datumstag und -wochentag des Ausgangsdatums
=C2+(CODE(TEIL(WENN(TAG(C2)=TAG(C2+(CODE(TEIL(
"J'F0FF`J0=J=J'F0FJ`J0=J=J'F0FJ`J0=J=J'm0FJmJ0JJd";
MONAT(C2)+MAX(TAG(C2)-28;)*12;1))-35)*7);
"J'F0FF`J0=J=J'F0FJ`J0=J=J'F0FJ`J0=J=J'm0FJmJ0JJd";
"0=F0FFS`0S=00=F0FFS`0S=00=F0F`S`0S=0==`0F`z`0`=z");
MONAT(C2)+MAX(TAG(C2)-28;)*12;1))-35)*7
-UND(TAG(C2+{0;366})=31)*(MONAT(C2)=12)*518


... im folgenden umgemünzt auf eine Spillformel:
C3#:
=LET(b;C2;n;103;
x;"J'F0FF`J0=J=J'F0FJ`J0=J=J'F0FJ`J0=J=J'm0FJmJ0JJd";
SCAN(b;SEQUENZ(n);LAMBDA(a;c;
a+(CODE(TEIL(WENN(TAG(a)=TAG(a+(CODE(TEIL(x;
MONAT(a)+MAX(TAG(a)-28;)*12;1))-35)*7);x;
"0=F0FFS`0S=00=F0FFS`0S=00=F0F`S`0S=0==`0F`z`0`=z");
MONAT(a)+MAX(TAG(a)-28;)*12;1))-35)*7
-UND(TAG(a+{0;366})=31)*(MONAT(a)=12)*518)))
Antworten Top
#10
(13.01.2023, 18:38)RPP63 schrieb:
Hah!
Ich habe 103!
Du Jungspund mit Baujahr 64!
19

… nun ja, ich überbiete: 135! 05
Beste Grüße
  Günther

Excel-ist-sexy.de
  …schau doch mal rein!
Der Sicherheit meiner Daten wegen lade ich keine *.xlsm bzw. *.xlsb- Files mehr herunter! -> So geht's ohne!
Antworten Top


Gehe zu:


Benutzer, die gerade dieses Thema anschauen: 1 Gast/Gäste