Live-Forum - Die aktuellen Beiträge
Datum
Titel
19.04.2024 12:58:59
Daten einfügen aus anderem Sheet
19.04.2024 12:23:24
Wenn-Formel anpassen
19.04.2024 12:09:19
Unique (Application.WorksheetFunction.Unique)
19.04.2024 11:51:37
Nächsten identischen Treffer suchen
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
604to608
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
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
604to608
604to608
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

jede 2. Spalte in verschiedenen Farben einfärben

jede 2. Spalte in verschiedenen Farben einfärben
28.04.2005 10:55:41
Hudelist
Hallo, ich habe eine Frage.
Kann man jede 2. Spalte automatisch verschieden einfärben.
Z.B. 1. gelb, 2. rot, 3. gelb, 4. rot, 5. gelb usw.
Danke für eure Rückmeldung
Gaby

5
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: jede 2. Spalte in verschiedenen Farben einfärb
28.04.2005 11:00:20
Reinhard
Hallo Gaby,
bed. Formatierung, =REST(Spalte();2)=0 bzw 1
Gruß
Reinhard
AW: jede 2. Spalte in verschiedenen Farben einfärb
28.04.2005 11:02:04
Bernhard
Hallo,
habe das hier gefundden, und gerade kein Excel hier:-)
müßte eigentlich auch mit spalte statt zeile funktionieren.
gruß Bernhard
Wenn Sie möchten, dass jede zweite Zeile in einem Tabellenblatt farbig hervorgehoben wird, können Sie sich über einen Trick die bedingte Formatierung zu Nutze machen.
Dazu gehen Sie so vor:
Markieren Sie den Bereich, in dem die Zeilen unterschiedliche Farben bekommen sollen. Aktivieren Sie den Befehl "Format - Bedingte Formatierung". Daraufhin erscheint die Dialogbox "Bedingte Formatierung".
In dieser Box aktivieren Sie im linken Listfeld die Option "Formel ist". Dann geben Sie in das Eingabefeld die folgende Formel ein:
=REST(ZEILE(A2);2)=0
Passen Sie die Formel auf Ihren Zellbereich an. Im Beispiel oben ist die aktive Zelle die Zelle A2. Für eine anderen aktive Zelle passen Sie diesen Bezug bitte an.
Anschließend klicken Sie die Schaltfläche "Format" an. In dieser Box wählen Sie die gewünschten Farben aus und bestätigen das mit "OK". Diese Farben werden anschließend alle "zweiten" Zellen erhalten. Die Box "Bedingte Formatierung" schließen Sie dann mit der Schaltfläche "OK".
Die Zeilen des markierten Bereichs erscheinen dann in der gewünschten Darstellung.
Anzeige
AW: jede 2. Spalte in verschiedenen Farben einfärben
Johannes
probier folgenden Code; den Wert "ColorIndex" kannst du beliebig verändern
19 entspricht einem hellen Gelb.
Gruß johannes

Sub Zeilen_Färben()
'Färbt die Zeilen einer Markierung abwechselnd gelb und weiß ein
Dim Zeile As Range, ZeilenNr As Integer
For Each Zeile In Selection.Rows
ZeilenNr = ZeilenNr + 1
If ZeilenNr Mod 2 = 0 Then
Zeile.Interior.ColorIndex = 19
Else
Zeile.Interior.ColorIndex = xlAutomatic
End If
Zeile.Borders.Weight = xlThin
Next
End Sub

AW: jede 2. Spalte in verschiedenen Farben einfärb
Reinhard
Hallo Johannes,
dein Code hat einen Fehler, ZeilenNr muss als long definiert werden, integer geht nicht bis 65536.
Übrigens, sie fragte nach Spalten, nicht Zeilen *g
Gruß
Reinhard
Anzeige
AW: jede 2. Spalte in verschiedenen Farben einfärben
28.04.2005 11:17:37
Gaby
GANZ HERZLICHEN DANK. FUNKTIONIERT TADELLOS.
Ich habe
=REST(Spalte();2)=1 bzw. 1 verwendet.
Lieben Gruß
Gaby

216 Forumthreads zu ähnlichen Themen

Jede 2te Zeile in eine Spalte kopieren
Eddie

Guten Morgen @ all
Ich habe mal wieder ein kleines problem :-)
Ich würde gerne Daten, die alle in einer Spalte sind auteilen.... dazu soll entweder der 1,3,5,7.... oder 2,4,6,8 ... Wert immer in die danebenliegende Spalte kopiert werden
IST:
Hallo
Hello
Gut
Good
...
20.08.2008 07:52:00
Thread-ID: 1003065
6 Beiträge
Anzeige
Einfügen mit jeder 2. Zeile als Leerzeile
Ulrich

Hallo zusammen,
wie kann ich einen Bereich einer Tabellen markieren, kopieren und in einem anderen Tabellenblatt über "Inhalte einfügen" und "verknüpfen" automatisch mit jeder zweiten Zeile als Leerzeile versehen, ohne das die Verknüpfung verrutscht?
Danke im Voraus und Grüße,
Ulr...
26.08.2008 14:15:00
Thread-ID: 1004799
4 Beiträge
jede zweite Zelle in Datenreihe
sarina

Hallo!
Ich habe ein Problem ;)
Und zwar würde ich gerne ein Diagramm erstellen, dass als Datenreihe aus meiner vorhandenen Tabelle jede zweite Zelle nimmt, z.B. aus der Spalte A von 1:250 also dann A1, A3, A5,....
Und das ohne eine neue Tabelle zu erstellen.
Geht das? Hat jema...
29.08.2008 09:48:58
Thread-ID: 1005687
5 Beiträge
Anzeige
Maxwert aus jeder zweiten Spalte
Stefan

Hallo,
kennt jemand eine möglichkeit, wie man ohne VBA das Maximum aus den Werten jeder 2. Spalte einer Zeile auslesen kann, ohne die Spalten einzeln aufzuzählen (=max(d2;d4;d6;d8...))?
Gruß Stefan
16.01.2009 14:24:00
Thread-ID: 1040577
5 Beiträge
Jede 2. Zeile einfärben
Frank

Hallo und Guten Abend Zusammen!
Mit folgendem Code
Sub Zeilen_formatieren() Sheets("DATEN").Activate Range("A14:K65536").Select For Zeile = 1 To Selection.Rows.Count If Zeile Mod 2 > 0 Then Selection.Rows(Zeile).Interior.ColorIndex = 15 End If Next Zeile End Sub
kann ich jede z...
17.01.2009 19:20:00
Thread-ID: 1040966
4 Beiträge
jede zweite Zelle in Spalte durch Doppelklick mark
mike49

Hallo,
wie kann man das lösen?
Ich möchte in meinem Spaltenbereich A13:A145 erreichen, dass durch Doppelklick ein "X" in die Zelle gesetzt wird und bei erneutem Doppelklick wieder verschwindet. Dies soll aber nur in jeder zweiten Zelle möglich sein. Also in A13, A15, A17 usw. bis einsch...
02.05.2009 13:05:13
Thread-ID: 1072411
6 Beiträge
alle befüllten Zeilen einer Mappe zählen
Steffen

Hallo Ex(cel)perten,
wie muss ich meinen Code ergänzen, um alle befüllten Zeilen einer kompletten Arbeitsmappe ausgezählt zu bekommen?
für ein einzelnes Blatt kriege ich es hin, da keine leeren Zeilen zwischendrin vorhanden sind
all = Cells(Rows.Count, 1).End(xlUp).Row
Gruß
...
06.05.2009 10:51:40
Thread-ID: 1073279
5 Beiträge
Jede 2. Zeile Hintergrund ändern
Blum

Hallo zusammen
Habe da noch eine Frage.
In Excel kann man doch jede 2. Zeile anders darstellen, so dass das lesen von grossen Dateien einfacher wird.
z.B. 1. Zeile weiss, 2. Zeile hellgrün, 1. Zeile weiss, 3 wieder hellgrün usw.
Hemm weiss jemand noch wie das automatisiert geht?...
25.06.2009 17:40:07
Thread-ID: 1084417
6 Beiträge
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige
Archiv - Verwandte Themen
Forumthread
Beiträge
5
14
3
4
4
4
3
5
4
5
4
5
2
8
3
3
5
3
3
2
2
3
9
12
8