Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender

Forumthread: mehrere Einträge im Kalender

mehrere Einträge im Kalender
13.10.2024 10:42:47
Marcus
Guten Morgen,

ich habe einen Kalender nach einem Youtube Video nachgebaut und funktioniert einwandfrei.

Leider habe ich im Vorfeld nicht beachtete, dass ich nur 1 Ereignis pro Tag eintragen lassen kann mit dem Kalender.

Ich bräuchte aber die Möglichkeit mehrere z.B. Geburtstage an einem Tag anzeigen zu lassen.

Hat jemand einen Tipp oder kann sonst wie weiterhelfen, bitte?

Danke im voraus
und einen schönen Sonntag
Marcus

https://www.herber.de/bbs/user/172857.xlsm
Anzeige

10
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
Ändere die Formel...
13.10.2024 11:06:29
Case
Moin, :-)

... so ab: ;-)

=WENN(E8>"";TEXTVERKETTEN(", ";WAHR;FILTER(Termine!$B$6:$B$185;Termine!$D$6:$D$185=E8;""));"")&WENN(WOCHENTAG(E8)=2;" KW"&ISOKALENDERWOCHE(E8);"")

Servus
Case
AW: mehrere Einträge im Kalender
13.10.2024 19:28:19
Marcus
Hallo zusammen,

jetzt meinte mein Sohn es wäre noch cool, wenn der Eintrag Kalenderwoche KWxy farbig wäre.

Kann man das in der Formel einbauen? mit bedingter Formatierung komme ich nicht auf das KW mit Zahl runter und per VBA habe ich keinen Plan, wie.

Hier der z.B. Code

=WENN(W34>"";TEXTVERKETTEN(", ";WAHR;FILTER(Termine!$B$6:$B$1850;Termine!$D$6:$D$1850=W34;""));"")&WENN(WOCHENTAG(W34)=2;" KW"&ISOKALENDERWOCHE(W34);"")

Danke im voraus Marcus
Anzeige
AW: mehrere Einträge im Kalender
13.10.2024 19:51:45
Onur
"Kann man das in der Formel einbauen?" ? Eine Formel kann keine Zellen färben.
Ginge über bedingte Formatierung, aber immer nur für die GANZE Zelle, nicht nur für den Eintrag "KWxy".
Wenn du das möchtest,...
14.10.2024 08:29:51
Case
Moin Marcus, :-)

... musst du auf VBA zurückgreifen. ;-)

Allerdings ändert das ein paar Dinge. Es kommt auch darauf an, wie mit dem Kalender gearbeitet wird. ;-)

Servus
Case
Anzeige
AW: Ändere die Formel...
13.10.2024 18:35:03
Marcus
@Onur, funktioniert auch perfekt - wo liegt der Unterschied? zwischen den 2 Formeln?

Dankeschön
Marcus
AW: Ändere die Formel...
13.10.2024 18:38:30
Onur
Keine Ahnung - warum soll ich mir jetzt noch andere Lösungsmöglichkeiten anschauen? Es gibt bestimmt Tausende davon. :)
Anzeige
AW: Ändere die Formel...
13.10.2024 18:33:37
Marcus
besten Dank funktioniert einwandfrei.
AW: Ändere die Formel...
14.10.2024 20:44:56
Marcus
@case

bei deinem Code wo muss ich das (10) für Zeilenumbruch einfügen?

=WENN(A4>"";TEXTVERKETTEN(", ";WAHR;FILTER(Termine!$B$6:$B$1850;Termine!$D$6:$D$1850=A4;""));"")&WENN(WOCHENTAG(A4)=2;" KW"&ISOKALENDERWOCHE(A4);"")

Danke
Marcus
Anzeige
Da muss man etwas...
15.10.2024 02:30:56
Case
Moin Marcus, :-)

... aufpassen, ob nur KW oder KW plus Geburtstage/Feiertage in der Zelle steht: ;-)
=WENN(M14>"";TEXTVERKETTEN(ZEICHEN(10);WAHR;FILTER(Termine!$B$6:$B$185;Termine!$D$6:$D$185=M14;""));"")&WENN(WOCHENTAG(M14)=2;WENN(LÄNGE(TEXTVERKETTEN(ZEICHEN(10);WAHR;FILTER(Termine!$B$6:$B$185;Termine!$D$6:$D$185=M14;"")))>0;ZEICHEN(10);"")&"KW"&ISOKALENDERWOCHE(M14);"")

Oder, wenn du die KW am Anfang willst: ;-)
=WENN(WOCHENTAG(M14)=2;"KW"&ISOKALENDERWOCHE(M14)&WENN(M14>"";ZEICHEN(10);"");"")&WENN(M14>"";TEXTVERKETTEN(ZEICHEN(10);WAHR;FILTER(Termine!$B$6:$B$185;Termine!$D$6:$D$185=M14;""));"")

Bereiche anpassen.

Servus
Case
Anzeige
;

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige