Live-Forum - Die aktuellen Beiträge
Datum
Titel
28.03.2024 21:12:36
28.03.2024 18:31:49
Anzeige
Archiv - Navigation
580to584
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
580to584
580to584
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Zellfarbe umkehren

Zellfarbe umkehren
08.03.2005 14:30:14
Patrick
Hallo Leute,
habe folgendes Problem:
ich habe einen Tabelle, deren Zellen die Farben weiß und gelb (farbindex 36 oder so) haben. ich möchte nun, dass innerhalb eines bestimmten bereiches, den ich markeiere, die Farbe der Zelle umgekehrt wir.
wie könnte man das bewerkstelligen?
gruß und danke schonmal,
Patrick

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Zellfarbe umkehren
08.03.2005 14:45:47
Matthias
Hallo Patrick,
Sub FarbenUmkehren()
Dim z As Range, col As Long
Application.ScreenUpdating = False
For Each z In Range("A1:F15")
col = z.Interior.ColorIndex
If col = xlColorIndexNone Then
col = 36
ElseIf col = 36 Then
col = xlColorIndexNone
End If
z.Interior.ColorIndex = col
Next z
Application.ScreenUpdating = True
End Sub
Gruß Matthias
AW: Zellfarbe umkehren
08.03.2005 14:53:41
Patrick
Hi Matthias,
kannst du mir das auch noch so umbauen, dass diese umkehrung nur in einm bestimmten, vor der ausführung markierten bereich geschieht. habe leider selbst so gut wie keine peilung.
danke
Anzeige
AW: Zellfarbe umkehren
08.03.2005 14:59:42
Matthias
Hallo Patrick,
statt
For Each z In Range("A1:F15")
einfach
For Each z In Selection
schreiben.
Gruß Matthias
AW: Zellfarbe umkehren
08.03.2005 15:01:39
Patrick
Jo, geht... thx
wird zeit, dass ich das auch mal lerne, ist ja gar nicht so schwer.

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige