147900
Goto Top

Alle Spalten getrennt aber als Variable ansprechen

Guten Morgen Zusammen,

Excel Zeitplan, Farbformatierung zuordnen

wie im vorherigen Thread beschrieben, suche ich eine Möglichkeit Spalten in Excel als Variable anzusprechen.

In jeder Spalte A-BZ sind 23 Leere Zellen. A-BZ30 sind die Dropdownmenü's mit den Farbformatierungen.
Jede Raute die gesetzt wird soll mit der Farbe hinterlegt werden welche auch im Dropdownmenü der jeweiligen Zeile hinterlegt ist.
Dim AktuelleFarbeD
AktuelleFarbeD = cells("D30").interior.Color  
For Each InStr(1,Worksheets("Plan").Range("D5:D28").Value, "#", vbTextCompare) = 1   
	interior.Color = AktuelleFarbeD

Spalte A-BZ
Zigtausende Zeilen.

Ich stelle mir vor E.g.
For Each InStr(1,Worksheets("Plan").Range("%5:%28").Value, "#", vbTextCompare) = 1  interior.color %30  
Inwiefern lässt sich das ganze hier komprimieren? Lässt sich das so in VBA umsetzen?
Ich habe bereits vermehrt danach gesucht, allerdings vergeblich.

Gruß

BlackArch

Content-Key: 1493640081

Url: https://administrator.de/contentid/1493640081

Ausgedruckt am: 28.03.2024 um 12:03 Uhr

Mitglied: Pjordorf
Pjordorf 11.11.2021 um 20:40:33 Uhr
Goto Top
Hallo,

Zitat von @147900:
Zigtausende Zeilen.
ES sind nur 1.048.576 Zeilen, https://support.microsoft.com/de-de/office/spezifikationen-und-beschr%C3 ...

Gruß,
Peter
Mitglied: 147900
147900 12.11.2021 um 14:51:27 Uhr
Goto Top
Zitat von @Pjordorf:

Hallo,

Zitat von @147900:
Zigtausende Zeilen.
ES sind nur 1.048.576 Zeilen, https://support.microsoft.com/de-de/office/spezifikationen-und-beschr%C3 ...

Gruß,

Ich spreche von Code

Gruß,

BlackArch