Bed.Formatierung auf Bereich im 2.Blatt

[Mick-DUS]

Hallo Zusammen,

Um mein Sommerloch zu füllen bastel ich gerade an einem Tabellenkonstrukt.
Dabei ergibt sich folgender Sachverhalt, bei dem ich auf Euer (gerne VBA) Wissen zurückgreifen möchte.
Folgendes:
In einem kalendarischem Bereich sind Zeilen pro Person eine Zeile, in der in der entsprechenden Tageszelle eine mögliche Anwesenheit eingetragen wird ( Ähnlich eines normalen Urlaubsplaners.
Im zweiten Tabellenbaltt sollen jedoch  5 Zeilen pro Person bereitgestellt werden, die je nach Eintag aus Blatt 1 gefärbt sind. Soweit kein Problem, geht über Bedingte Formatierung auch zu lösen.
Faul wie ich bin, möchte ich aber die Formatierung per VBA auf weitere Personenbereiche übertragen und auch variabel zur Gestaltung halten. Geht mit Autoausfüllen nicht, da sich natürlich der Bezug entsprechend ändert. Und die manuelle Bearbeitung der Regeln ist leider für solch ein Vorhaben nicht Benutzerfreundlich. Außerdem denke ich, das die Performance enorm leidet, wenn ich 365 Tage a 5 Zeile x 50 Personen mit Bedingter Formatierung fülle...
Also muss ich Euch Fragen, wie ich die "täglichen" Zellen in Blatt Eins nach Ihrem Inhalt (Bereich) befrage um dann im Blatt Zwei den Bereich entsprechend der(mehreren)Kriterien zu färben



Gruß
Michael

[WillWissen]

Hi Michael,

bitte lad eine Beispieldatei hoch; hilft eher beim Helfen. https://www.clever-excel-forum.de/Thread...ng-stellen

[schauan]

Hallöchen,

Du kannst eine Bereichszuweisung variabel gestalten, wenn Du mit intelligenten Tabellen / Listen arbeitest. Du gibst entsprechend keinen festen Bereich vor, sondern beziehst Dich auf

Hier mal eine Beispieltabelle Die Tabelle1 mit der Spalte Wer ist auf Tabelle2. Wenn Du dort was oder 10 was, oder 100 was hinzufügst, passt der Bezug immer wieder

Arbeitsblatt mit dem Namen 'Tabelle1'
	A	B
1	Wer
2	ich	1

Zelle	Formel
B2	=ZÄHLENWENN(Tabelle1[[#Alle];[Wer]];A2)

Verwendete Systemkomponenten: [Windows (32-bit) NT 10.00] MS Excel 2016

Diese Tabelle wurde mit Tab2Html (v2.6.0) erstellt. ©Gerd alias Bamberg

[Mick-DUS]

@ Will Wissen

hier mal eine nachgebaute Situation

Gruß
Michael

---

ich bin zu doof heute, also nochmal...
  Forum_BedFormatierung_1.xlsx (Größe: 12,87 KB / Downloads: 4)

[schauan]

Hallöchen,

ich übernehme mal Günter's Part und bleibe bei einer Formellösung. Relevant dafür ist doch eigentlich nur eine Berechnung wo DU die Zellbereiche "spreizt". Ich hab das hier mal neben Deine Daten geschrieben. Damit könntest Du die bedingte Formatierung beliebig ausweiten - solange der Rechner dadurch nicht in die Knie geht.

Arbeitsblatt mit dem Namen 'Blatt_2'
	A	B	F	G	H	I	J	K	L
1		01.01.2019
2	Person A			1	1	0	K1	0	0
3				1	1	0	G2	A8	S5
4				1	1	0	Z1	K9	0
5				1	1	0	0	0	0
6	Person B			2	2	0	0	0	0
7				3	2	0	0	0	0
8				2	2	0	0	0	0
9				2	2	0	0	0	0
10	Person C			3	3	0	0	0	0
11				3	3	0	0	0	0
12				3	3	0	0	0	0
13				3	3	0	0	0	0

Zelle	Formel
H2	=GANZZAHL((ZEILE(A1)-1)/4)+1
I2	=INDEX(Blatt_1!B2:B10;GANZZAHL((ZEILE(A1)-1)/4)+1;1)
J2	=INDEX(Blatt_1!C2:C10;GANZZAHL((ZEILE(B1)-1)/4)+1;1)
K2	=INDEX(Blatt_1!D2:D10;GANZZAHL((ZEILE(C1)-1)/4)+1;1)
L2	=INDEX(Blatt_1!E2:E10;GANZZAHL((ZEILE(D1)-1)/4)+1;1)

Verwendete Systemkomponenten: [Windows (32-bit) NT 10.00] MS Excel 2016

Diese Tabelle wurde mit Tab2Html (v2.6.1) erstellt. ©Gerd alias Bamberg