Farbgestaltung

Bild

Betrifft: Farbgestaltung
von: Matthias
Geschrieben am: 27.11.2003 10:06:38

Hallo Zusammen,

ist es Möglich, in einem Tabellenlatt jede 2. Zeile mit einer Farbe zu kennzeichen?
Das ganze soll ab der 2. Zeile im Tabellenblatt anfangen und so lange gehen bis in der Spalte A nichts mehr steht.
Das ganze soll die Übersichtlichkeit in einer erstellten Liste verbessern.

Schon mal besten Dank für die Unterstützung!

Gruß
Matthias

Bild


Betrifft: AW: Farbgestaltung-Nur mit VBA
von: Gabor
Geschrieben am: 27.11.2003 10:22:43

Hi Matthias,

ja, ausser VBA fällt mir da aber nichts ein.

Gruß

Gabor


Bild


Betrifft: AW: Farbgestaltung
von: JRobert
Geschrieben am: 27.11.2003 10:23:30

Hallo Matthias,
markiere dein gewünschte Bereich, dann auf Format/Bedingte Fomatierung/
/Formel ist/ =Rest(Zeile();2)=0
und in Format die Farbe aussuchen

mfg Robert


Bild


Betrifft: Oder als Makro
von: Franz W.
Geschrieben am: 27.11.2003 10:28:28

Hallo Matthias,

hier ein Makrovorschlag, beginnend ab Zeile 3:


Sub ZweiteZeileFaerben()
Dim loLetzte&    '(As Long)
Dim s&
Application.ScreenUpdating = False
    With ActiveSheet
        .Unprotect
        loLetzte = 65536
        If .Range("A65536") = "" Then loLetzte = .Range("A65536").End(xlUp).Row
        ' Vorher alle Farben löschen:
        .Range(.Cells(3, 1), .Cells(65536, 11)).Interior.ColorIndex = xlNone
            For s = 3 To loLetzte Step 2
                .Range(.Cells(s, 1), .Cells(s, 11)).Interior.ColorIndex = 36
            Next s
        .Protect
    End With
Application.ScreenUpdating = True
End Sub


Bei mir läuft das Makro automatisch beim Einfügen oder Löschen einer Zeile. Darum werden vor dem Einfärben erstmal alle Farben gelöscht.

Grüße
Franz


Bild


Betrifft: AW: Farbgestaltung
von: Reinhold
Geschrieben am: 27.11.2003 10:35:43

Hallo Matthias,
markiere deinen gewünschte Bereich, dann auf Format/Bedingte Fomatierung/
/Formel ist/ =UND($A1<>"";REST(ZEILE($A1);2)=0)
und in Format die Farbe aussuchen.

Damit werden nur jene Zeilen eingefärbt, wo in A1 was steht, und auch davon nur jede 2. Zeile.

mfg Reinhold


Bild

Beiträge aus den Excel-Beispielen zum Thema " Werte in dynamischer Liste bestimmen"