Microsoft Excel

Excel und VBA: Beitrag aus Herbers Excel-Forumsarchiv

Zellfarbe über VBA ändern

Betrifft: Zellfarbe über VBA ändern
von: Josh
Geschrieben am: 30.05.2004 16:35:38

Hallo

Gibt es einen Befehl mit dem man Zellfarben verändern kann?

ich will die Zelle "Cells(y,6)" verändern. Dabei ist y eine fortlaufende Variable.

Für eine Antwort wäre ich sehr dankbar!

Gruß Jochen
  


Betrifft: AW: Zellfarbe über VBA ändern
von: Manuel Marhold
Geschrieben am: 30.05.2004 16:37:38

Hi Josh,

Range("F" & y).Select
With Selection.Interior
.ColorIndex = 6
.Pattern = xlSolid
End With

Die 6 ist die ColorNummer (in diesem Fall GELB)

Ich hoffe das hilft.

MfG

Manuel


  


Betrifft: AW: Zellfarbe über VBA ändern
von: Kurt
Geschrieben am: 30.05.2004 16:46:03

Hallo Jochen,
Cells(y, 6).Interior.ColorIndex = 3 'rot

Hallo Manuel,
gewöhn dir das "select" ab, das ist nur in den seltensten Fällen notwändig

und Tschüss Kurt


  


Betrifft: AW: Zellfarbe über VBA ändern
von: Manuel Marhold
Geschrieben am: 31.05.2004 11:31:55

Hi Kurt,

danke für den Tipp, ich werde es in Zukunft beachten..

So spart man auch einiges an Code (Wie man ja hierran sehr schön sehen kann (von 5 auf 1))..

MfG

Mnauel


  


Betrifft: AW: Zellfarbe über VBA ändern
von: Josh
Geschrieben am: 30.05.2004 17:00:05

Hi Manuel,

Danke, das ist es!

Gruß Jochen


  


Betrifft: AW: Zellfarbe über VBA ändern
von: Ulf
Geschrieben am: 30.05.2004 16:46:21

If y < 57 then
cells(y,6).interior.colorindex = y
end if

Ulf