Supportnet / Forum / Tabellenkalkulation
Excel: Zellenfarbe als String in eine andere Zelle schreiben
Frage
Hallo,
ich bräuchte ein kleines Script, welches für jede nichtleere Zeile meiner Excel-Tabelle die Farbe in Spalte A in die Spalte J der gleichen Zeile schreibt.
Ich dachte mir das so:
Dim zeilezeile = 1
While oDoc.Cells(i, 1).Value <> ""
oDoc.Cells(i, 10).Value = oDoc.Cells(i, 1).Interior.Color
i = i + 1
Wend
funktioniert aber nicht, wie geht es?
Danke für die Antwort
Felix
Antwort 1 von Hajo_Zi
Antwort 2 von Felix099
danke!