|
Also, wenn Ich ein Tabellenblatt wie folgt erstelle:
Und folgende Zeile:
If cell.Interior.Color <> RGB(242, 242, 242) Or cell.Value = ChrW(9670) Then
durch folgende ersetze: (einfachheitshalber)
If cell.Interior.Color = RGB(255, 0, 0) Then
Dann, die erste Zeile bzw A1 bis zb I1 markiere, habe ich in der Objetkvariablen cellsToExecute , die Areas.Count-Eigenschaft = 2
Mit cellsToExecute.Select werden (A1:C1) und (F1:H1) selektiert.
Mit cellsToExecute.Areas(1).Select wird (A1:C1) selektiert.
Mit cellsToExecute.Areas(2).Select wird (A1:C1) selektiert.
Stand jetzt, müsstest Du von links nach rechts, oben nach unten oder jeweils umgekehrt, das Schleifen von dem gezeigten Code ableiten können.
Das ist offensichtlich aber nicht Dein Ziel.
An meinem Beispiel hier, versuchst Du Dir jetzt was genau zu ermöglich?
|