Live-Forum - Die aktuellen Beiträge
Datum
Titel
18.04.2024 21:09:11
4 Spalten aus smarter Tabelle in andere smarte Tab. kopieren
18.04.2024 20:45:35
Worksheet_Activate für alle Sheets
18.04.2024 19:30:20
VBA - Tabelle mit Mannschaftsergebnissen sortieren
18.04.2024 18:04:29
Formel fehler Wert#
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1656to1660
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
1656to1660
1656to1660
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Letzte sichtbare Zelle berechnen

Letzte sichtbare Zelle berechnen
12.11.2018 20:20:34
Roland
Hallo,
ich habe diese Thema zwar schon mal ins Forum gestellt aber keine befriedigende Lösung gefunden.
Ich habe einen Tabellenbereich (A1:D26)(in Wirklichkeit viel größer...), in dem einige Zellen leer sind, einige Zeilen ausgeblendet sind und einige Zellen Text enthalten. Nun möchte ich die letzte sichtbare Zelle einer Spalte (abhängig von der Spaltenvorgabe in Zelle "E1") ermitteln und daraus einen Bereich ableiten. Das Ergebnis liefert die Matrixformel in "F1"
{="B2:D"&MAX(NICHT(ISTLEER(INDIREKT(E2&"1"):INDIREKT(E2&"27")))*ZEILE(INDIREKT("1:27"))+WENN(E2="a"; 1;0)) }
Diese Formel liefert aber nur die letzte gefüllte Zelle und berücksichtigt nicht die Sichtbarkeit der Zelle. Wie muss ich die Formel modifizieren damit die letzte sichtbare Zelle ermittelt wird?
Vielen Dank für jede Hilfe!!
Hier eine Beispieldatei:
https://www.herber.de/bbs/user/125346.xlsx

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

Betreff
Datum
Anwender
Anzeige
AW: Letzte sichtbare Zelle berechnen
12.11.2018 21:01:17
Rainer
Hallo Roland,
ich denke, um mit nur sichtbaren Zellen zu rechnen kommst du um ein Makro nicht herum.
Was willst du denn genau berechnen?
Gruß,
Rainer
AW: Letzte sichtbare Zelle berechnen
12.11.2018 21:24:40
Roland
ein Makro wäre auch OK, ich will den sichtbaren Bereich definieren um in dann zu kopieren, damit ich die Leerzeilen abschneiden kann.
AW: Letzte sichtbare Zelle berechnen
12.11.2018 21:34:36
Rainer
Hallo,
also wäre in deiner Beispieldatei die letzte Zeile Nummer 6?
Rainer
Letzter Wert in einer gefilterten Liste
12.11.2018 21:39:31
WF
Hi,
hier betr. Spalte B mit folgender Arrayformel:
{=INDEX(B:B;MAX(TEILERGEBNIS(3;INDIREKT("B"&ZEILE(1:100)))*ZEILE(1:100)))}
Das andere, was Du wünschtst, musst Du dazufummeln.
WF
Anzeige
AW: Letzter Wert in einer gefilterten Liste
12.11.2018 22:27:54
Piet
Hallo
probier bitte mal zum Testen diesen Code aus. Würde mich freuen wenn es klappt.
Falls ja Thread bitte schliessen, Haeckchen nicht mehr aktivieren!
mfg Piet
Sub Test_LastZell()
Dim Bereich As String, LastZelle As String
Bereich = ActiveSheet.UsedRange.SpecialCells(xlCellTypeVisible).Address(0, 0)
LastZelle = Right(Bereich, Len(Bereich) - InStrRev(Bereich, ":"))
MsgBox LastZelle
End Sub

AW: Letzter Wert in einer gefilterten Liste
12.11.2018 22:55:53
Roland
Hallo erst mal danke!
Leider funktionieren sowohl die Formel als auch das Makro nicht so wie ich es brauche.
Es wird die letzte gefüllte Zeile (Makro) bzw. der Inhalt der letzten Zelle (Formel) angezeigt. Falls einige Zeilen am Ende ausgeblendet werden funktioniert das aber nicht. ich brauche aber die letzte sichtbare Zeile (die ausgeblendeten Zeilen sollen ignoriert werden)!
Anzeige
AW: Letzter Wert in einer gefilterten Liste
12.11.2018 23:37:07
Rainer
Hallo,
ich wiederhole meine Frage:
Wäre in deiner Beispieldatei die letzte Zeile Nummer 6?
Rainer
AW: Letzter Wert in einer gefilterten Liste
13.11.2018 00:02:58
Roland
Hallo Rainer, sorry ich habe deine Frage übersehen.
Ja, je nach Inhalt in Zelle E1 müsste das Ergebnis 6 (D) bzw. 20 (C) oder 26 (B) sein.
Gruß Roland
AW: Letzter Wert in einer gefilterten Liste
13.11.2018 09:23:21
Rainer
Hallo Roland,
so kannst du die letzte Zeile ermitteln:
Sub Letzter_Eintrag_in_Spalte()
letztezeile = ActiveSheet.Cells(Rows.Count, 1).End(xlUp).Row
strSpalte = Range("E2")
SpaltenNr = Range(strSpalte & 1).Column
For i = letztezeile To 1 Step -1
If Not IsEmpty(Cells(i, SpaltenNr)) And _
Rows(i).Hidden = False Then Exit For
Next i
MsgBox "Letzte Zeile ist Nr. " & i
End Sub
Gruß,
Rainer
Anzeige
AW: Letzter Wert in einer gefilterten Liste
13.11.2018 13:08:16
Roland
Super, genau was ich brauche!
Danke!
AW: Letzter Wert in einer gefilterten Liste
13.11.2018 14:47:17
Rainer
Hallo Roland,
viel Spaß damit und danke für die Rückmeldung.
Das Häkchen musst du im Herber-Forum nur aktivieren, wenn das Problem noch nicht gelöst ist. Beiträge mit Häkchen erscheinen in der Rubirk "noch offen".
Gruß,
Rainer

19 Forumthreads zu ähnlichen Themen

letzten Wert einer Spalte in Zelle einfügen
Sascha

Hallo,
ich möchte ein Kassenbuch für meine Bedürfnisse schreiben. Bis jetzt kam ich da sehr gut ohne VBA mit zurecht. Im Grunde genommen habe ich für jeden Monat ein Tabellenblatt mit Einnahmen und Ausgaben und rechne damit den Bestand zusammen. Wenn ich nun aber in den nächsten Monat wechs...
13.05.2009 10:50:10
Thread-ID: 1074744
7 Beiträge
Anzeige
Werte aus einer Spalte in listbox ausgeben
Wessselmann

Guten Abend,
ich habe eine Spalte mit Namen in der es auch Dubletten gibt. Die Namen und die Anzahl der Häufigkeit sollen in einer Listbox ausgeben werden.
Das kann eigentlich nicht schwer sein, aber ich bekomme es nicht hin.
Ich Danke im Voraus für die Hilfe
21.04.2013 23:12:53
Thread-ID: 1309741
8 Beiträge
Wert in einer Zele finden und spalte ausgeben
Peter

Hallo Zusammen,
ich möchte einem Wert z.B. 15.01.2015 in der Zeile 8 finden und die dazugehörige Spaltennummer bestimmen.
Geht das auch ohne einer Schleife?
Vielen Dank für Eure Antworten im voraus,
Peter.
02.12.2015 23:36:10
Thread-ID: 1462079
2 Beiträge
Anzeige
Letzten Wert einer Zeile ausgeben
Martin

Hallo,
ich habe mal wieder eine Frage nach einer Formel.
Wie kann ich aus einer Zeile, die von links nach rechts mit Werten gefüllt wird in der letzten Zelle den Wert der letzten Eintragung anzeigen.
Beispiel: Es werden Wochenwerte eingetragen, ich habe somit 52 Zellen, die nach u...
23.01.2018 14:56:01
Thread-ID: 1604152
3 Beiträge
den letzten Wert aus einer Spalte ermitteln
Harro

Hallo Community,
Ich möchte daß in Spalte C immer der letzte Wert einer Spalte (Bereich=D3:AI67) übernommen wird.
D.h. aktuell letzte Spalte ist L, dann soll in C3 der Wert aus L3 stehen.
Der Bereich wir immer spaltenweise von Zeile 3 bis Zeile 67 beschrieben.
Kann mir bitte jem...
17.02.2019 11:33:37
Thread-ID: 1676118
8 Beiträge
die letzten 5 Werte einer Spalte markieren?
Martin

Hallo,in einer Tabelle trage ich regelmässig Werte ein.
Von einer Spalte möchte ich von den jeweile 5 letzten Werten den Durchschnitt errechnen lassen.Mit dem MakroSub Durchschnitt()Dim myRange As Range
Dim WertSet myRange = Worksheets("Sheet1").Range("F11:" & Range("F11").End(xlDown).Add...
25.03.2003 10:45:40
Thread-ID: 236065
5 Beiträge
Den letzten Eintrag einer Spalte ausgeben!
Andreas

Hallo!
Ich habe folgendes Problem:
Ich möchte immer den letzten Eintrag in einer Spalte in einer anderen Zelle anzeigen.
Z.b. In A1 soll immer der aktuelle Wert stehen. In Spalte B wird immer ein Datum eingegeben. Wenn in B1 ein Datum steht, soll es in A1 angezeigt werden. Wenn in B...
01.01.1970 00:00:00
Thread-ID: 416240
7 Beiträge
letzten wert einer spalte löschen
benji

hallo ich möchte gerne den letzten wert einer spalte löschen aber die spaltenlänge verändert sich von dokument zu dokument.
Gruss benji
25.01.2005 14:29:27
Thread-ID: 554341
5 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
6
4
7
1
10
2
7
4
6
4
10
4
2
2
6
1
2
5
11