Live-Forum - Die aktuellen Beiträge
Datum
Titel
15.10.2025 09:51:49
Wenns mit Zahl und Buchstaben
15.10.2025 08:22:15
Privat Sub ObjExcel_Sheet Change....deaktivieren
14.10.2025 19:08:54
Verbindung von Excel mit maps
14.10.2025 15:55:14
wenn zwei Werte aus Liste übereinstimmen, dann wahr
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1436to1440
1436to1440
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Anzahl der markierten Zeilen ermitteln

Forumthread: Anzahl der markierten Zeilen ermitteln

Anzahl der markierten Zeilen ermitteln
31.07.2015 09:54:21
V
Hallo,
ich habe mal wieder eine Frage und hoffe auf Eure versierte Hilfe!
Meine Frage: Wie kann ich per VBA-Code die Anzahl(!) der aktuell markierten Zeilen ermitteln?
Hintergrund: Ich habe eine Tabelle, in die ich auf Knopfdruck eine Zeile einfüge. Und zwar nur dann, wenn eine komplette(!) Zeile markiert ist. Die Abfrage, um sicherzustellen, dass die komplette Zeile, nicht nur eine Zelle markiert ist, funktioniert prima ("If Selection.Columns.Count = Columns.Count Then ..."). Was mir noch fehlt ist zu erkennen, ob nicht mehrere Zeilen komplett markiert sind - und wenn ja, wieviele.
Vielen Dank an alle, die mich hier unterstützen!
Gruß
V A T

Anzeige

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

Betreff
Datum
Anwender
Anzeige
AW: Anzahl der markierten Zeilen ermitteln
31.07.2015 09:58:55
Michael
Hallo VAT,
...ähnlich wie Du ja schon Selection.Columns.Count einsetzt kannst Du ja auch die Zeilen Deiner Auswahl zählen: Selection.Rows.Count bzw. fragen ob diese über 1 sind, sinngemäß
if Selection.Rows.Count > 1 then ...
LG
Michael

Anzeige
AW: Anzahl der markierten Zeilen ermitteln
31.07.2015 10:00:05
Werner
Hallo,
If Selection.Rows.Count > 1
Gruß Werner

AW: Anzahl der markierten Zeilen ermitteln
31.07.2015 10:00:32
Nepumuk
Hallo,
na einfach analog zur Spalte:
Selection.Rows.Count
Gruß
Nepumuk

AW: Anzahl der markierten Zeilen ermitteln
31.07.2015 10:02:44
V
Hallo,
danke für Eure schnelle Antwort. Sorry, ich hätte folgende Info mitschicken müssen:
Beim googlen habe ich natürlich den Hinweis auf "Selection.Rows.Count" gefunden. Aber wenn ich mir den Wert per Messagebox anzeigen lasse ("msgbox(Selection.Rows.Count)"), bekomme ich - egal wie viele Zeilen markiert sind - immer den Wert "1".
Mach ich da was falsch oder einen Denkfehler?!
Gruß
V A T

Anzeige
AW: Anzahl der markierten Zeilen ermitteln
31.07.2015 10:25:18
EtoPHG
Hallo V A T
Rows.Count und Columns.Count gibt nur für zusammenhängende Bereiche (Range) die Anzahl Zeilen, bzw. Spalten, zurück.
Für nicht zusammenhängende Bereiche wird die Anzahl Zeilen/Spalten des ersten Elements zurück gegeben!
Gruess Hansueli

Anzeige
Selection.Rows.Count ...
31.07.2015 10:05:55
Rudi
Hallo,
... ergibt 1 wenn es sich um eine unzusammenhängende Markierung handelt.
Man müsste zusätzlich Selection.Areas.Count abfragen und hier für jede Area, ob es sich um eine komplette Zeile handelt.
Gruß
Rudi

Beispiel
31.07.2015 10:10:17
Rudi
Hallo, 
Sub aaa()
Dim a As Range
For Each a In Selection.Areas
If a.Columns.Count  Columns.Count Then
MsgBox "Nur ganze Zeilen markieren!"
Exit Sub
End If
Next
End Sub

Gruß
Rudi

Anzeige
AW: Beispiel
31.07.2015 10:19:18
V
Du bist ja schneller, als meine Nachfrage... :-)
Vielen, vielen Dank!!!

AW: Selection.Rows.Count ...
31.07.2015 10:17:54
V
Hallo Rudi,
das geht in die richtige Richtung! Ich habe bisher jede Zeile durch anklicken des jeweiligen Zeilenkopfes bei gedrückter "Strg"-Taste markiert. Dann kommt immer "1".
Funktionieren tut es, wenn ich die Zeilen in einem Zug markiere. Allerdings pasiert das in meinem Fall nie. Bei mir sind es immer unabhängige Zeilen-Einzelmarkierungen.
Könntest Du netterweise deinen Ansatz mit den Areas nochmals etwas ausführen? Ich kann die Anzahl der Areas abfragen, aber wie kann ich ermitteln, ob es sich bei jeder der ausgwählten Areas um eine komplette Zeile handelt? Ich bin da nicht wirklich fit.
Vorab schon mal dank an dich und auch alle anderen Helfer!!!
Gruß
V A T

Anzeige
AW: Selection.Rows.Count ...
31.07.2015 10:23:00
Rudi
Hallo,
das ist doch schon mit drin.
If a.Columns.Count <> columns.Count Then
Gruß
Rudi

AW: Anzahl der markierten Zeilen ermitteln
31.07.2015 11:16:31
Daniel
Hi
die Anzahl der markierten Zeilen kannst du für lückenhaft markierte Zellbereiche so ermitteln: 
Anzahl Zeilen = Intersect(Selection.EntireRow, Columns(1).Cells).Count
Gruß Daniel
Anzeige
;

Forumthreads zu verwandten Themen

Anzahl der Zeilen steuern
Alex

Guten Morgen Liebe Excel Anwender,
auch zu diesem Problem gibt es sicher schon Beiträge im Forum, konnte sie leider nicht Finden. Und zwar möchte ich die Anzahl der Zeilen steuern die mit Formeln gefüllt werden.
Z.B
Anzahl der Zeilen 3
A1
A2
A3
...
02.10.2008 07:20:00
Thread-ID: 1013790
2 Beiträge
Wert bestimmt Anzahl der zu kopierenden Zeilen VBA
Maja

Hallo,
ich Suche eine Formel mit der ich folgenden Code modifizieren kann:
Sub Uebergabe() Dim i As Integer Dim k As Integer Dim iRowT As Integer Const zz = 1 flagg = False Sheets("Vorlage_Angebot_Sicht").Activate Sheets("Vorlage_Angebot_Sicht").Range("D2").Select i = 0 iRowT = 10 Do...
18.12.2008 13:24:00
Thread-ID: 1033843
5 Beiträge
Anzeige
variable Zeilenanzahl kopieren, einfügen (VBA)
Alex

Hallo Leute,
In meiner Arbeitsmappe kopiere ich eine! Zeile (aus dem TabBlatt „Grundformular“) - via Doppelklick auf einen Namen in „Übersicht“ - in andere TabBlätter.
(das geht wunderbar)
Sieht jemand eine Möglichkeit ob/wie das ganze mit einer variablen Zeilenanzahl, die im „Grund...
18.03.2009 17:23:56
Thread-ID: 1061522
3 Beiträge
Anzahl Zeilen(umbrüche) in einer Zelle ermitteln
Andreas

Hallo Excel-Profis
Ich hoffe ihr könnt mir bei folgenden Problem helfen:
Gibt es eine Formel mit deren Hilfe sich die Anzahl der Zeilen oder Zeilenumbrüche in einer Zelle (verbundenen Zelle) ermitteln lässt?
Ich bedanke mich im Voraus für alle Tipps und Lösungen
07.10.2009 14:55:35
Thread-ID: 1107846
3 Beiträge
Anzahl Datenzeilen ermitteln
Lutz

Hallo,
ich möchte die Anzahl der Datenzeilen ermitteln.
Der Datenbereich kann unterschiedlich groß sein.
Bei eingeschaltetem Autofilter sollen nur die sichtbaren Werte gezählt werden.
Mit der funktion Teilergebnis kam ich nicht weiter, da die Spalten nicht durchgängig befüllt si...
09.03.2010 09:53:40
Thread-ID: 1144479
8 Beiträge
Anzahl farbige Zellen zählen
Jens-Claus

Hallo Excelfreunde,
ich habe ein Arbeitsblatt wo Zellen in verschiedenen Farben markiert sind.
Wer hat mir ein Makro mit welchem ich die Anzahl der Zellen pro Farbe
anzeigen kann.
Das wäre super.
Besten Dank im voraus
Jens
04.11.2010 17:18:09
Thread-ID: 1185243
4 Beiträge
Anzeige
markierte Zeilen anzeigen
Antje

Hallo Profi's,ich bräuchte mal eine kleine Hilfestellung!
Wie kann ich mir nur die in einer bestimmten Schriftfarbe markierten Zeilen anzeigen lassen?Danke1Gruß
Antje
14.05.2002 14:49:24
Thread-ID: 120771
4 Beiträge
Anzahl der Zeilen innerhalb einer Spalte
Klaus

Hallo Forum,mit welcher Formel bekomme ich in Excel die Anzahl der Zeilen
in einer Spalte angezeigt?BsP
A1 01EZ0201
B1 01EM9999
C1 01ZZ9805Das Ergebnis in D1 müsste dann 3 ergeben.
Danke
Klaus
23.05.2002 12:25:24
Thread-ID: 123053
2 Beiträge
Anzahl markierte Zeilen
Uppe

Hallo,
ich möchte per VBA auslesen, wieviele Zeilen markiert sind.
Mit Selection.Rows.Count kann ich nur die Anzahl Zeilen auslesen, wenn die Zeilen zusammenhängend sind.
Wie kann ich die Anzahl markierter Zeilen feststellen, wenn ich z.B. Zeile 1, 3 und 7 markiere?
Danke und Gr...
14.07.2011 11:31:23
Thread-ID: 1222100
3 Beiträge
Seitenanzahl in Wiederholzeilen integrieren
Marco

Guten morgen zusammen,
ich möchte die Seitenzahlen in meinen Dokumentenkopf integrieren. D.h. ich möchte die Seitenzahlen nicht standardmäßig oben/unten rechts/links einfügen, sondern in einer bestimmten Zelle in meinen Wiederholzeilen oben.
Ist das ohne Makroprogrammierung möglich. (Da...
25.07.2011 09:13:20
Thread-ID: 1223462
9 Beiträge
Anzeige
Anzahl Zellen zählen mit Farbindex 3 u.55
Thomas

Hallo Excelfreunde,
ich habe hier im Forum diesen Code gefunden Sub farben() Dim bereich As Range Dim zelle Dim x Columns("AK").Clear For x = 2 To 32 If Cells(x, 1).Interior.ColorIndex > 1 Then Cells(x, 37) = Cells(x, 1).Interior.ColorIndex End If Next End Sub
der mir den Farbindex...
27.10.2011 20:08:22
Thread-ID: 1235659
3 Beiträge
Anzahl ungleiche Zellen mit einer Bedingung zählen
Ingo4711

Hallo Forum,
ich möchte euch um Hilfe beim Zählen bitten.
Ich habe rund 5.000 Zeilen mit Auftragsdaten. Für alle Artikel eines jeden Auftrags möchte ich die Anzahl der unterschiedlichen Lieferanten zählen. Mit der Formel Summenprodukt bekomme ich die Bedingung 'zähle nur unterschiedlich...
28.10.2011 11:51:26
Thread-ID: 1235775
7 Beiträge
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
Anzeige
Anzeige

Infobox / Tutorial

Anzahl der markierten Zeilen in Excel ermitteln

Schritt-für-Schritt-Anleitung

  1. Öffne Excel und öffne die Tabelle, in der du die markierten Zeilen zählen möchtest.

  2. Aktiviere das VBA-Fenster durch Drücken von ALT + F11.

  3. Füge ein neues Modul hinzu: Rechtsklicke im Projektfenster auf „VBAProject (dein Dokument)“ > „Einfügen“ > „Modul“.

  4. Kopiere den folgenden Code in das Modul:

    Sub AnzahlMarkierterZeilen()
   Dim anzahlZeilen As Long
   Dim a As Range
   anzahlZeilen = 0

   For Each a In Selection.Areas
       If a.Columns.Count = Columns.Count Then
           anzahlZeilen = anzahlZeilen + a.Rows.Count
       End If
   Next a

   MsgBox "Anzahl der markierten Zeilen: " & anzahlZeilen
End Sub

  5. Schließe das VBA-Fenster und gehe zurück zu Excel.

  6. Markiere die Zeilen, deren Anzahl du ermitteln möchtest.

  7. Führe das Makro aus: Drücke ALT + F8, wähle „AnzahlMarkierterZeilen“ aus und klicke auf „Ausführen“.

Jetzt solltest du die Anzahl der markierten Zeilen in einer Messagebox angezeigt bekommen.

Häufige Fehler und Lösungen

  • Fehler: Anzeige von „1“ bei mehreren markierten Zeilen

    • Lösung: Achte darauf, dass du zusammenhängende Zeilen markierst. Bei nicht zusammenhängenden Bereichen musst du die Selection.Areas.Count verwenden, um jede Area einzeln zu prüfen.

  • Fehler: Markierte Zellen werden nicht gezählt

    • Lösung: Stelle sicher, dass du die EntireRow-Eigenschaft in deinem Code verwendest, um die gesamte Zeile zu erfassen.

Alternative Methoden

Eine andere Möglichkeit, die Anzahl markierter Zellen zu zählen, ist die Verwendung von Formeln direkt in Excel:

  • Formel: Wenn du die Anzahl der markierten Zellen in einer bestimmten Spalte zählen möchtest, kannst du die folgende Formel verwenden:

    =ANZAHL2(Bereich)

Hierbei ersetzt du „Bereich“ durch den tatsächlichen Bereich deiner markierten Zellen.

Praktische Beispiele

  1. Beispiel zur Zählung mit VBA:

    • Wenn du die Anzahl markierter Zeilen in einem Datensatz zählen möchtest, kannst du den oben beschriebenen VBA-Code verwenden.

  2. Verwendung der Formel:

    • Angenommen, du hast in Spalte A mehrere markierte Zellen und möchtest die Anzahl ermitteln. Du könntest die Formel =ANZAHL2(A:A) in eine Zelle eingeben, um die Anzahl der nicht leeren Zellen in Spalte A zu zählen.

Tipps für Profis

  • VBA anpassen: Du kannst den VBA-Code anpassen, um die Anzahl der markierten Zellen anzuzeigen oder eine andere Aktion auszuführen, wenn die Anzahl der markierten Zeilen größer als 1 ist.

  • Tastenkombinationen: Erstelle eine benutzerdefinierte Tastenkombination für dein Makro, um es schneller ausführen zu können.

FAQ: Häufige Fragen

1. Wie kann ich die Anzahl der markierten Zellen in einer bestimmten Zeile ermitteln?
Du kannst die Anzahl der markierten Zellen mit der Formel =ANZAHL2(Zeile:Zeile) zählen, wobei „Zeile:Zeile“ die spezifische Zeile ist, die du prüfen möchtest.

2. Warum wird die Anzahl der markierten Zeilen nicht korrekt angezeigt?
Stelle sicher, dass du komplette Zeilen markierst und dass nicht zusammenhängende Bereiche korrekt behandelt werden, indem du die Areas-Eigenschaft im VBA-Code verwendest.

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
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