Live-Forum - Die aktuellen Beiträge
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender

Forumthread: Jede 2. Zeile markieren

Jede 2. Zeile markieren
11.10.2002 13:33:47
Rokone
Bin ziemlicher VBA-Neuling und hab folgende Frage:

Wie ist es möglich per Makro jede zweite Zeile (z.B. die Ungeraden) zu markieren? Habe es mit einer for...next Schleife probiert, allerdings kann ich die Markierungsanweisung
"Rows("3:3").Select"
statt der 3en leider nicht mit (Zähl-)Variablen füllen. Entweder benutze ich die falsche Syntax oder ich bin komplett auf dem Holzweg...

Vielen Dank im voraus

Sören

Anzeige

11
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
Re: Jede 2. Zeile markieren
11.10.2002 13:37:48
Ralf Sögel
das geht auch ohne VBA mit bedingter Formatierung, alle Zellen markieren:
Die Formel ist: =REST(ZEILE();2)=1

Re: Jede 2. Zeile markieren
11.10.2002 13:40:59
Hajo_Zi
Hallo Ralf

er wollte nicht jede zweite Zeile eine andere Farbe sondern "markieren". Ich Vermute mal für Eingaben.

Gruß Hajo

Oha, sorry...oT
11.10.2002 13:46:48
Ralf Sögel
oT
Anzeige
Re: Jede 2. Zeile markieren
11.10.2002 13:49:06
Ralf Sögel
Wobei das keinen Sinn ergibt, weil bei der ersten Eingabe die Markierung wieder weg ist.
Re: Jede 2. Zeile markieren
11.10.2002 13:51:41
Hajo_Zi
Hallo Ralf

da hast Du Recht, aber wenn ich mir jedesmal noch einen Kopf mache was er damit realisieren will. Oder erst noch Rückfrage, dann investiere ich in den Beitrag doch eine ganze Menge Zeit.

Gruß hajo

Anzeige
Re: Jede 2. Zeile markieren
11.10.2002 13:59:26
Rokone
Es geht mir darum, die Inhalte jeder zweiten Zeile mit einen Barcode-Font zu formatieren. Da aber der Inhalt der Barcodes immer noch als Klartext da stehen muss, soll nur jede zweite Zeile markiert werden.

Danke für Eure Mühe

Sören

Re: Jede 2. Zeile markieren
11.10.2002 14:01:05
Rokone
Es muss auch nicht unbedingt ein Makro sein, da das ganze eine einmalige Aktion sein soll. Danach soll es als .pdf exportiert werden.
Anzeige
Re: Jede 2. Zeile markieren
11.10.2002 14:39:21
Ralf Sögel
Um wieviel Zeilen gehts denn eigentlich? Es geht, außer manuell, nur mit Makro.
Re: Jede 2. Zeile markieren
11.10.2002 14:41:40
Rokone
es sollen 10000 und mehr sein.
Re: Jede 2. Zeile markieren
11.10.2002 17:03:42
Aliba
Hi Sören,

wenn das ne einmalige Sache ist, würde ich folgendes machen:
In Zeile 1 einer freien Spalte a schreiben, Zeile 2 b, beide Zellen markieren, soweit wie benötigt nach unten ziehen.
Autofilter auf die Liste setzen, nach a, bzw. b filtern, die gefilterten Einträge markieren, formatieren.

Dauert vielleicht 2 Minuten.

CU Aliba

Anzeige
Re: Jede 2. Zeile markieren
11.10.2002 18:18:32
Rokone
Danke Aliba,
hab mir inzwischen nen Makro gebaut, mit dem das super klappt! trotzdem Danke

Sören

;

Forumthreads zu verwandten Themen

Anzeige
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
Anzeige

Infobox / Tutorial

Jede zweite Zeile in Excel markieren


Schritt-für-Schritt-Anleitung

Um in Excel jede zweite Zeile zu markieren, kannst du die bedingte Formatierung nutzen oder ein einfaches VBA-Makro erstellen. Hier sind die Schritte für beide Methoden:

Methode 1: Bedingte Formatierung

  1. Alle Zeilen markieren: Wähle den Bereich aus, in dem du die Formatierung anwenden möchtest.
  2. Bedingte Formatierung auswählen: Gehe zu Start > Bedingte Formatierung > Neue Regel.
  3. Formel zur Bestimmung der zu formatierenden Zellen verwenden: Wähle „Formel zur Ermittlung der zu formatierenden Zellen verwenden“.
  4. Formel eingeben: Gib die folgende Formel ein:
    =REST(ZEILE();2)=1
  5. Format festlegen: Wähle das gewünschte Format (z.B. Hintergrundfarbe) aus.
  6. Regel anwenden: Klicke auf „OK“, um die Regel zu speichern.

Methode 2: VBA-Makro

  1. Entwicklertools aktivieren: Gehe zu Datei > Optionen > Menüband anpassen und aktiviere die Entwicklertools.
  2. VBA-Editor öffnen: Klicke auf Entwicklertools > Visual Basic.
  3. Neues Modul einfügen: Rechtsklicke auf „VBAProject“ > Einfügen > Modul.
  4. Makro einfügen: Füge den folgenden Code ein:
    Sub JedeZweiteZeileMarkieren()
       Dim i As Long
       For i = 2 To 10000 Step 2 'Anpassen der Zeilenanzahl
           Rows(i).Select
       Next i
    End Sub
  5. Makro ausführen: Schließe den Editor und führe das Makro über Entwicklertools > Makros aus.

Häufige Fehler und Lösungen

  • Fehler: Bedingte Formatierung funktioniert nicht.

    • Lösung: Überprüfe die eingegebene Formel auf Tippfehler. Stelle sicher, dass du den richtigen Zellbereich ausgewählt hast.
  • Fehler: VBA-Makro markiert nicht die gewünschten Zeilen.

    • Lösung: Stelle sicher, dass die Schleife die korrekte Anzahl an Zeilen abdeckt. Ändere den Wert in For i = 2 To 10000 Step 2.

Alternative Methoden

Eine weitere Möglichkeit, jede zweite Zeile zu markieren, wäre die Verwendung von Autofilter:

  1. Hilfsspalte erstellen: Füge in einer neuen Spalte die Werte „A“ und „B“ für jede zweite Zeile ein.
  2. Autofilter aktivieren: Gehe zu Daten > Filter > AutoFilter.
  3. Nach „A“ oder „B“ filtern: Wähle die gewünschten Zeilen aus und formatiere sie entsprechend.

Praktische Beispiele

Wenn du beispielsweise eine Liste von 10.000 Einträgen hast und nur jede zweite Zeile farbig markieren möchtest, kannst du die oben genannten Methoden nutzen.

  • Bedingte Formatierung: Ideal, um die Sichtbarkeit zu erhöhen.
  • VBA-Makro: Nützlich, wenn du häufig große Datenmengen bearbeiten möchtest.

Tipps für Profis

  • Verwende die Formatierung in Kombination mit Filtern, um nicht nur jede zweite Zeile zu markieren, sondern auch gezielt Daten auszuwählen.
  • Erstelle ein Makro, das nicht nur jede zweite Zeile markiert, sondern auch automatisch die Formatierung anwendet.

FAQ: Häufige Fragen

1. Wie kann ich jede zweite Zeile grau markieren? Du kannst die oben beschriebene bedingte Formatierung verwenden und die Hintergrundfarbe auf grau setzen.

2. Kann ich auch jede zweite Zelle markieren? Ja, du kannst die Formel in der bedingten Formatierung anpassen, um jede zweite Zelle zu markieren, indem du die Formel änderst in =REST(SPALTE();2)=1 für Spalten.

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige