Collapse column

Autor Thema: Office 2016 Textkettemit Bedingung erzeugen  (Gelesen 1175 mal)

Offline leifczerny

  • Newbie
  • *
  • Beiträge: 9
    • Profil anzeigen
  • Office-KnowHow: Amateur
  • VBA-KnowHow- : Wenig
  • Version [Office] : Office 2016
Office 2016 Textkettemit Bedingung erzeugen
« am: Januar 18, 2018, 10:17:35 Vormittag »
Hallo liebes Forum,
habt ihr für einen Neuling eine Hilfe? Ich suche eine Formellösung, die mir in einer Zelle eine Textkette der Atumswerte einer Reihe Zellen erzeugt, wenn in anderen Zellen darunter ein Wert eingetragen ist.

Konkret handelt es sich um einen Urlaubskalender, beim jeder Kollege eine eigene Zeile hat und die Spalten den Tagen entsprechen; eine Zeile mit den ausgeschriebenen Datumswerten steht darüber.
Nun möchte ich für jeden einzelnen am Ende der Zeile eine Liste der Tage ausgeben, an denen Urlaub eingetragen wurde.

Gibt es dafür keine Formellösung? Die Excel-Referenzen und mehrere Tage googelei haben mich ratlos zurückgelassen.

Liebe Grüße
Leif
« Letzte Änderung: Januar 18, 2018, 10:36:56 Vormittag von leifczerny »

Keine Lösung gefunden? Du kannst Dich gerne an unser erfahrenes Experten-Team wenden und Dein Anliegen in Auftrag geben.
>>> Schnell und einfach ein unverbindliches Angebot anfordern. Per E-Mail an anfrage@excel-inside.de oder per Online-Formular
<<<

!!! Wichtige Information
!!! Dieses Forum steht aus technischen Gründen ab dem 11. September 2019 nur noch im Lesemodus zur Verfügung.
Das NEUE Office-Fragen-Forum kannst du aber unter der gewohnten Domain https://office-fragen.de wie gewohnt nutzen.

- Wir freuen uns auf deinen Besuch im neuen Forum.

Offline steve1da

  • Hero Member
  • *****
  • Beiträge: 1.529
    • Profil anzeigen
  • Office-KnowHow: Fortgeschritten
  • VBA-KnowHow- : Wenig
  • Version [Office] : Office 2010
Antw:Office 2016 Textkettemit Bedingung erzeugen
« Antwort #1 am: Januar 18, 2018, 10:22:39 Vormittag »
Hola,

muss es zwingend in einer Zelle sein?
Eine Beispieldatei (kein Bidl) könnte helfen.

Gruß,
steve1da

Offline leifczerny

  • Newbie
  • *
  • Beiträge: 9
    • Profil anzeigen
  • Office-KnowHow: Amateur
  • VBA-KnowHow- : Wenig
  • Version [Office] : Office 2016
Antw:Office 2016 Textkettemit Bedingung erzeugen
« Antwort #2 am: Januar 18, 2018, 10:36:28 Vormittag »
Hallo Steve,

wenn die Ausgabe in mehrere Zellen gelingt, könnte man die dann ja zusammenfassen - Anbei eine Beispieldatei.

Beste Grüße Leif

Offline steve1da

  • Hero Member
  • *****
  • Beiträge: 1.529
    • Profil anzeigen
  • Office-KnowHow: Fortgeschritten
  • VBA-KnowHow- : Wenig
  • Version [Office] : Office 2010
Antw: Office 2016 Textkettemit Bedingung erzeugen
« Antwort #3 am: Januar 18, 2018, 10:40:57 Vormittag »
Hola,

=WENNFEHLER(INDEX($C$9:$AD$9;AGGREGAT(15;6;SPALTE($C$1:$AD$1)-2/($C10:$AD10="u");SPALTE(A1)));"")
Gruß,
steve1da

Offline leifczerny

  • Newbie
  • *
  • Beiträge: 9
    • Profil anzeigen
  • Office-KnowHow: Amateur
  • VBA-KnowHow- : Wenig
  • Version [Office] : Office 2016
Antw: Office 2016 Textkettemit Bedingung erzeugen
« Antwort #4 am: Januar 18, 2018, 10:59:19 Vormittag »
Hallo Steve,

vielen Dank! aber so ganz steige ich noch nicht dahinter - gibt das nicht nur für den ersten Eintrag der Zeile das entsprechende Datum zurück?
Oder ist es so gedacht, dass ich damit die Tabelle nochmal spiegele, und dann zusammenfasse?

Liebe Grüße
Leif

Keine Lösung gefunden? Du kannst Dich gerne an unser erfahrenes Experten-Team wenden und Dein Anliegen in Auftrag geben.
>>> Schnell und einfach ein unverbindliches Angebot anfordern. Per E-Mail an anfrage@excel-inside.de oder per Online-Formular
<<<

!!! Wichtige Information
!!! Dieses Forum steht aus technischen Gründen ab dem 11. September 2019 nur noch im Lesemodus zur Verfügung.
Das NEUE Office-Fragen-Forum kannst du aber unter der gewohnten Domain https://office-fragen.de wie gewohnt nutzen.

- Wir freuen uns auf deinen Besuch im neuen Forum.

Offline steve1da

  • Hero Member
  • *****
  • Beiträge: 1.529
    • Profil anzeigen
  • Office-KnowHow: Fortgeschritten
  • VBA-KnowHow- : Wenig
  • Version [Office] : Office 2010
Antw: Office 2016 Textkettemit Bedingung erzeugen
« Antwort #5 am: Januar 18, 2018, 11:04:11 Vormittag »
Hola,

die Formel muss nach rechts und nach unten gezogen werden.

Gruß,
steve1da

Offline leifczerny

  • Newbie
  • *
  • Beiträge: 9
    • Profil anzeigen
  • Office-KnowHow: Amateur
  • VBA-KnowHow- : Wenig
  • Version [Office] : Office 2016
Antw: Office 2016 Textkettemit Bedingung erzeugen
« Antwort #6 am: Januar 18, 2018, 11:09:12 Vormittag »
Hallo Steve,
könnte es nicht auch so in einer Zelle klappen:
=WENNFEHLER(TEXTVERKETTEN(",";WAHR;INDEX($C$9:$AD$9;AGGREGAT(15;6;SPALTE($C$1:$AD$1)-2/($C13:$AD13="u");SPALTE(A1)));INDEX($C$9:$AD$9;AGGREGAT(15;6;SPALTE($C$1:$AD$1)-2/($C13:$AD13="u");SPALTE(A2))); ... );"")
?
Dann wäre mein einziges Problem nur, dass Excel mir dien DAT-Wert statt des Datumstextes ausgibt...

Beste Grüße
Leif

Offline steve1da

  • Hero Member
  • *****
  • Beiträge: 1.529
    • Profil anzeigen
  • Office-KnowHow: Fortgeschritten
  • VBA-KnowHow- : Wenig
  • Version [Office] : Office 2010
Antw: Office 2016 Textkettemit Bedingung erzeugen
« Antwort #7 am: Januar 18, 2018, 11:10:38 Vormittag »
Hola,

kann ich nicht sagen, da ich kein Excel 2016 und somit kein Textverketten habe.

Gruß,
steve1da

Offline leifczerny

  • Newbie
  • *
  • Beiträge: 9
    • Profil anzeigen
  • Office-KnowHow: Amateur
  • VBA-KnowHow- : Wenig
  • Version [Office] : Office 2016
Antw: Office 2016 Textkettemit Bedingung erzeugen
« Antwort #8 am: Januar 18, 2018, 11:19:50 Vormittag »
Ah, ok. Es scheint mit TEXT(...;"TT.MMM") um die Index-Funktion herum zu klappen. Dann muss ich die Sequenz nur noch von C-AD wiederholen...
Wenn klappt, poste ich evtl. gleich noch einmal eine Datei. Vielen Dank!

Keine Lösung gefunden? Du kannst Dich gerne an unser erfahrenes Experten-Team wenden und Dein Anliegen in Auftrag geben.
>>> Schnell und einfach ein unverbindliches Angebot anfordern. Per E-Mail an anfrage@excel-inside.de oder per Online-Formular
<<<

!!! Wichtige Information
!!! Dieses Forum steht aus technischen Gründen ab dem 11. September 2019 nur noch im Lesemodus zur Verfügung.
Das NEUE Office-Fragen-Forum kannst du aber unter der gewohnten Domain https://office-fragen.de wie gewohnt nutzen.

- Wir freuen uns auf deinen Besuch im neuen Forum.

Offline leifczerny

  • Newbie
  • *
  • Beiträge: 9
    • Profil anzeigen
  • Office-KnowHow: Amateur
  • VBA-KnowHow- : Wenig
  • Version [Office] : Office 2016
Antw: Office 2016 Textkettemit Bedingung erzeugen
« Antwort #9 am: Januar 18, 2018, 12:05:42 Nachmittag »
So ganz funktioniert es noch nicht -für die ersten 4 Werte klappt es, aber dann beim Fünften habe ich bei MA8 einen Fehler, so dass keine Werte ausgegeben werden, und wenn ich mehr dazu packe, schließlich bei den anderen auch - irgendwo kommt eine Division durch Null her. (siehe Anhang). Für MA1 sieht es jetzt so aus,

=WENNFEHLER(TEXTVERKETTEN(", ";WAHR;TEXT(INDEX($C$9:$AD$9;AGGREGAT(15;6;SPALTE($C$1:$AD$1)-2/($C10:$AD10="u");SPALTE($A$1)));"TT. MMM.");TEXT(INDEX($C$9:$AD$9;AGGREGAT(15;6;SPALTE($C$1:$AD$1)-2/($C10:$AD10="u");SPALTE($B$1)));"TT. MMM.");TEXT(INDEX($C$9:$AD$9;AGGREGAT(15;6;SPALTE($C$1:$AD$1)-2/($C10:$AD10="u");SPALTE($C$1)));"TT. MMM.");TEXT(INDEX($C$9:$AD$9;AGGREGAT(15;6;SPALTE($C$1:$AD$1)-2/($C10:$AD10="u");SPALTE($D$1)));"TT. MMM.");TEXT(INDEX($C$9:$AD$9;AGGREGAT(15;6;SPALTE($C$1:$AD$1)-2/($C10:$AD10="u");SPALTE($E$1)));"TT. MMM."));"")

aber ich hätte natürlich gerne nind 20 mögliche Werte (4x5 Arbeitstage) Habt ihr noch Ideen?


Liebe Grüße
Leif

Offline steve1da

  • Hero Member
  • *****
  • Beiträge: 1.529
    • Profil anzeigen
  • Office-KnowHow: Fortgeschritten
  • VBA-KnowHow- : Wenig
  • Version [Office] : Office 2010
Antw: Office 2016 Textkettemit Bedingung erzeugen
« Antwort #10 am: Januar 18, 2018, 12:12:10 Nachmittag »
Hola,

warum nimmst du nicht einfach meine Formel, ziehst die nach unten und nach rechts und machst dann Textverketten() auf die jeweiligen Zellen?
=textverketten(",";WAHR;AE10:AM10)
Die Syntax hab ich mir jetzt mal aus dem Netz zusammengesucht.

Gruß,
steve1da

Offline Kapt.Ulrich

  • Newbie
  • *
  • Beiträge: 33
    • Profil anzeigen
    • Amt für Arbeitsschutz Hamburg
  • Office-KnowHow: Amateur
  • VBA-KnowHow- : Wenig
  • Version [Office] : Office 2010
Antw: Office 2016 Textkettemit Bedingung erzeugen
« Antwort #11 am: Januar 18, 2018, 12:33:50 Nachmittag »
Hallo Leif,
irgendwie finde ich "meine" Urlaubsliste schöner und vor allem übersichtlicher. Schreibt allerdings keine Daten auf.
Wenn Du die nicht brauchen kannst, schmeiß gleich weg..
Arbeitet mit macros, die die Farben zusammenzählen (Quellcode aus dem Forum)

Urlaubstage markieren und dann oben auf die "knöpfe" drücken zum Einfärben
Gruß  UL
« Letzte Änderung: Januar 18, 2018, 13:01:26 Nachmittag von Kapt.Ulrich »

Keine Lösung gefunden? Du kannst Dich gerne an unser erfahrenes Experten-Team wenden und Dein Anliegen in Auftrag geben.
>>> Schnell und einfach ein unverbindliches Angebot anfordern. Per E-Mail an anfrage@excel-inside.de oder per Online-Formular
<<<

!!! Wichtige Information
!!! Dieses Forum steht aus technischen Gründen ab dem 11. September 2019 nur noch im Lesemodus zur Verfügung.
Das NEUE Office-Fragen-Forum kannst du aber unter der gewohnten Domain https://office-fragen.de wie gewohnt nutzen.

- Wir freuen uns auf deinen Besuch im neuen Forum.

Offline leifczerny

  • Newbie
  • *
  • Beiträge: 9
    • Profil anzeigen
  • Office-KnowHow: Amateur
  • VBA-KnowHow- : Wenig
  • Version [Office] : Office 2016
Antw: Office 2016 Textkettemit Bedingung erzeugen
« Antwort #12 am: Januar 18, 2018, 12:53:18 Nachmittag »
@steve1da:
Naja, weil ich das Datum zunächst als Text brauche, Habe ich noch die TEXT-Funktion reingehauen. Sonst ist es schon deine Formel und sollte doch so funktioneren, egal ob ich das Zwischenergebnis hinschreibe oder nicht; Textverketten ist genauso eingesetzt, wie Du es beschreibst...

Liebe Grüße Und vielen Dank
Leif

Offline leifczerny

  • Newbie
  • *
  • Beiträge: 9
    • Profil anzeigen
  • Office-KnowHow: Amateur
  • VBA-KnowHow- : Wenig
  • Version [Office] : Office 2016
Antw: Office 2016 Textkettemit Bedingung erzeugen
« Antwort #13 am: Januar 18, 2018, 12:59:10 Nachmittag »
@kpt. Ulrich: Das ist sicher sehr schön, aber ob ich und die Kollegen überhaupt adäquat mit deiner Liste Umgehen können...
Mit Farben wollte ich es ursprünglich auch machen, kam damit aber nicht zurecht, weil verbrauchte Urlaubstage per ZählenWenns gezählt werden sollen usf..

Liebe Grüße
Leif

Offline leifczerny

  • Newbie
  • *
  • Beiträge: 9
    • Profil anzeigen
  • Office-KnowHow: Amateur
  • VBA-KnowHow- : Wenig
  • Version [Office] : Office 2016
Office 2016 Antw: Office 2016 Textkettemit Bedingung erzeugen
« Antwort #14 am: Januar 18, 2018, 13:08:01 Nachmittag »
Hallo Steve,

es schein zu klappen, wenn ich WENNFEHLER in die TEXT-klammer verschiebe - Text von nichts ist ja immer noch nichts und wird auch dann von Textverketten ignoriert:

=TEXTVERKETTEN(", ";WAHR;TEXT(WENNFEHLER(INDEX($C$9:$AD$9;AGGREGAT(15;6;SPALTE($C$1:$AD$1)-2/($C10:$AD10="u");SPALTE($A$1)));"");"TT. MM.");[...])
...

Nochmals vielen Dank!
« Letzte Änderung: Januar 18, 2018, 13:12:53 Nachmittag von leifczerny »

Wenn du dich noch intensiver mit Excel beschäftigen möchtest, dann empfiehlt sich ein Online-Kurs,
in dem du sehr viel über Excel erfährst und das gelernte umgehend in der Praxis anwenden kannst.