Live-Forum - Die aktuellen Beiträge
Datum
Titel
24.04.2024 00:20:14
Bestimmte Spalten als xls exportieren per Makro
23.04.2024 22:08:10
Auflisten in Spalte VBA
23.04.2024 21:33:46
Nur farbige/nicht farbige Zellen markieren
23.04.2024 21:29:56
Bestimmte Zellen auf andere Arbeitsblätter kopieren
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
360to364
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
360to364
360to364
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Anzahl eingeblendeter Zeilen ermitteln

Anzahl eingeblendeter Zeilen ermitteln
07.01.2004 20:12:19
Mayk
Hallo zusammen,
ich habe gerade ein Problem, dass ich irgendwie nicht lösen kann (vielleicht liegt es auch an der Uhrzeit)....
Wie kann ich die Anzahl der eingeblendeten Zeilen, die nach Zeile 4 noch da sind, per VBA herausbekommen?
Hat da jemand eine Idee?
Danke,
Mayk

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

Betreff
Datum
Anwender
Anzeige
Falls jemanden die Lösung interessiert
07.01.2004 20:39:30
mayk
habe es einfach mal ausprobiert und es hat funktioniert ;-)

Sub eingblendet()
Dim i As Integer
Dim lZeile As Integer
Dim eingeb As Integer
eingeb = 0
lZeile = ActiveCell.SpecialCells(xlLastCell).Row
For i = 5 To lZeile
If Rows(i).Hidden = False Then eingeb = eingeb + 1
Next
MsgBox (eingeb)
End Sub

Schönen Abend noch!
AW: Falls jemanden die Lösung interessiert
07.01.2004 20:41:20
K.Rola
Hallo,
etwas schneller und einfacher:

Sub sichtbare()
MsgBox [a5:a65536].SpecialCells(xlCellTypeVisible).Rows.Count
End Sub

Gruß K.Rola
AW: Anzahl eingeblendeter Zeilen ermitteln
07.01.2004 20:40:27
Josef Ehrensberger
Hallo Mayk!
Z.B. so.


Sub test()
Dim sht As Worksheet
Dim objRow As Object
Dim lngC As Long
Set sht = ActiveSheet
   For Each objRow In sht.Range("A5:A65536").Rows
      If objRow.Hidden = False Then
      lngC = lngC + 1
      End If
   Next
MsgBox "Es sind " & lngC & "Zeilen Sichtbar"
End Sub

     Code eingefügt mit Syntaxhighlighter 2.5

Gruß Sepp
Anzeige
AW: Anzahl eingeblendeter Zeilen ermitteln
07.01.2004 20:44:49
mayk
Ja... cool!
So geht es natürlich auch - ich glaube, ich nehme deins... Ist schicker ;-)
AW: Anzahl eingeblendeter Zeilen ermitteln
07.01.2004 20:51:36
Beni
Hallo Mayk,
Gruss Beni

Sub Anzahl_eingeblendete_Zeilen()
i = 0
For z = 5 To 65536
If Cells(z, 1).EntireRow.Hidden = False Then i = i + 1
Next z
MsgBox i
End Sub

307 Forumthreads zu ähnlichen Themen

Anzahl Zeilen mit identischen Eintrag errechnen
Matthias

Hallo,
ich will die folgenden Aufgabe per Makro lösen: ich will wissen, wie viele Zeilen es unterhalb einer Ausgangszeile mit dem gleichen Inhalt gibt, bis der Inhalt der nächsten darunter liegenden Zelle wechselt.
Beispiel:
Dresdner Bank Banken
Historie
Historie
...
16.10.2008 12:50:00
Thread-ID: 1016833
2 Beiträge
Anzeige
Zeilen mit ähnlichem Inhalt kopieren
Lauren

Hallo zusammen,
sitze wiedermal hier in VBA/Excel fest und hoffe auf Hilfe :)
Ich habe eine Excel Datei mit ca. 7000 Zeilen.........nun möchte ich die Inhalte etwas übersichtlicher gestalten aber händisch wäre das ja ein riiiiiiiiiesen Aufwand, daher bin ich auf der Suche nach einem Mak...
10.02.2009 14:31:49
Thread-ID: 1049097
4 Beiträge
Alle Zeilen mit bestimmtem Inhalt löschen
Lutz

Hallo Excel-Profis,
ich habe eine Tabelle die "Liste" heisst und in der Buchungen per Makro eingefügt werden.
Jetzt möchte ich per Makro einen Vorgang der aus mehreren Zeilen bestehen kann löschen.
D.h. ich möchte per Box fragen welcher Beleg (steht in Spalte "E") gelöscht werden so...
13.03.2009 18:53:36
Thread-ID: 1059979
3 Beiträge
Anzeige
Anzahl Zellen mit gleichen Inhalt / welcher Wert?
StefanS

Hallo zusammen,
...und schon wieder ich - konnte im Archiv nichts finden!
Für Euch bestimmt suuuper einfach, für mich die Hölle.
Ich möchte gerne überprüfen, ob in der Spalte B:B Zellen mit gleichen Inhalt doppel oder mehrfach vorhanden sind und wenn ja, welchen Wert diese Zellen ha...
14.05.2009 14:06:36
Thread-ID: 1075153
5 Beiträge
Vba count.row bei leer zeilen
Carmen

Hallo zusammen,
hänge mal wieder bei vba. und zwar hab ich eine export tabelle (Tabelle1)die zwischen den relevanten Zeile leere zeilen und spalten hat. nun möchte ich diese tabelle in ein neues blatt kopieren, weiß aber nicht wie ich die größe ermitteln kann trotz der leerzeilen und spalte...
23.05.2009 15:46:16
Thread-ID: 1076869
16 Beiträge
Gefüllte Zeilen zählen und Variable zuweisen
Bowl

Hallo zusammen
Hab da noch ein kleines allerletztes Problem ^^
Wie kann man in einer-Excel Tabelle die Anzahl der Gefüllten Zeilen in den denen eine bestimmte Zelle gefüllt ist zählen und den Wert einer Variablen zuweisen?
Hab da schon einiges versucht, das ganze klappt aber irgen...
01.07.2009 12:00:13
Thread-ID: 1085646
14 Beiträge
Anzahl Codezeilen ermitteln
Joachim

Hi,
Kurze Frage
geht es eingentlich per VBA, die Anzahl der Zeilen Code, aus dem ein komplettes Projekt besteht, zu ermitteln ?
Falls Ja, wie ?
Danke
Joachim
22.07.2009 14:40:58
Thread-ID: 1090543
27 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

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
1
5
3
2
2
4
15
13
26
2
7
5
7
3
6
7
3
5
2
5
10
3
15
2
4