Microsoft Excel Herbers Excel/VBA-Archiv

Zellfarbe über VBA ändern | Herbers Excel-Forum


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