Live-Forum - Die aktuellen Beiträge
Datum
Titel
25.04.2024 16:50:59
2 Zellen in 2 Blättern mit unterschiedlichen Bereichen vergl
25.04.2024 15:03:35
Unterschiedliche Dateien miteinander abgleichen lassen
25.04.2024 14:05:48
Makro in aktueller Zelle ausführen mit Doppelklick
25.04.2024 12:56:25
Werte von Kunden und Artikel stehen untereinander
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1344to1348
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
1344to1348
1344to1348
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

zum letzten Eintrag gehen

zum letzten Eintrag gehen
27.01.2014 16:30:13
Dietmar
Hallo an alle,
wieder benötige ich Hilfe zu folgendem Problem :
Ich möchte gern ein Makro haben welches mich durch Betätigen einer Schaltfläche zum
letzten Eintrag in Spalte A führt.
In Spalte A stehen laufende Nummerierungen und das Makro sollte mich auf die freie Zelle hinter dem letzten Eintrag führen.
Vielen Dank und Grüße vom Niederrhein
Dietmar

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

Betreff
Datum
Anwender
Anzeige
AW: zum letzten Eintrag gehen
27.01.2014 16:35:08
Rudi
Hallo,
warum nicht einfach Strg+Pos1, Strg+Down?
Gruß
Rudi

Lol Rudi, genau!!
27.01.2014 16:49:48
Matze
Hallo Dietmar,
dann such dir mal das Beste für dich aus: 

Option Explicit
Sub erste_leere_zelle()
Dim Loletzte As Long
Loletzte = IIf(IsEmpty(Range("A65536")), Range("A65536"). _
End(xlUp).Row + 1, 65536)
Cells(Loletzte, 1).Select 'das kann gelöscht werden
End Sub
Noch einfacher geht das so:
Option Explicit
Sub erste_leere_zelle()
Dim Loletzte As Long
Loletzte = Cells(Rows.Count, 1).End(xlUp).Row + 1
Cells(Loletzte, 1).Select 'das kann gelöscht werden
End Sub
Und so sieht der Code aus, wenn Ihr die erste leere Zelle in der Zeile 1 finden möchtet:
Option Explicit
Sub erste_leere_zelle()
Dim Loletzte As Long
Loletzte = Cells(1, Columns.Count).End(xlToLeft).Column + 1
Cells(1, Loletzte).Select 'das kann gelöscht werden
End Sub
Ausserdem haben wir die Möglichkeit die letzte beschriebene Zelle des ganzen genutzten Bereiches
eines Excel Sheets abzufragen. Wie das geht seht ihr in dem folgenden Makro:
Option Explicit
Sub letzte_Zeile()
Dim loletzte As Long
loletzte = ActiveSheet.UsedRange.SpecialCells(xlCellTypeLastCell).Row
MsgBox loletzte
End Sub

Anzeige
AW: Lol Rudi, genau!!
28.01.2014 08:28:33
Dietmar
Hallo Matze,
Hallo Rudi,
für Rudi - Ich hätte gerne das Makro weil die Schaltfläche zur Betätigung in Zelle Q2 liegt. Von dort
muss ich dann zur letzten Zeile in A. Trotzdem natürlich vielen Dank.
für Matze,
vielen Dank für die Makros für verschiedene Situationen
Grüße vom Niederrhein
Dietmar

AW: Lol Rudi, genau!!
28.01.2014 15:41:17
Matze
Hallo Dietmar,
warum soll dir Rudi dir den Code geben,..ich hab die doch genau das gegeben,
nutze es. Hab mal ein paar Kommentare rein geschrieben das du weist was passiert)
Option Explicit
Sub erste_leere_zelle()
Dim Loletzte As Long
'für Spalte A steht die 1 hinter Cells(Rows.Count,1= SpalteA)
Loletzte = Cells(Rows.Count, 1).End(xlUp).Row + 1'ohne 1 am Ende ist es die letzte BENUTZTE  _
Zelle
Cells(Loletzte, 1).Select
End Sub
Gruß Matze

Anzeige
Cells(Loletzte, 1).Select
28.01.2014 16:10:20
Rudi
Hallo,
damit die Zelle auch in den sichtbaren Bereich rutscht:
Application.GoTo Cells(Loletzte, 1), True
Gruß
Rudi

302 Forumthreads zu ähnlichen Themen

Letzte beschriebene Zeile suchen
Thomas3

Guten Morgen zusammen,
ich muß aus über 1000 Listen Daten auslesen. Das ist kein Problem.
Jede Liste sollte so beschrieben werden, dass ab Zeile 13 bis je nach Eintragungen x-Zeile Spalte O gefüllt ist.
In der Spalte 1 ist in der Datenliste eine Formel hinterlegt, die sichtbar aut...
19.08.2008 08:29:00
Thread-ID: 1002780
10 Beiträge
Anzeige
Sortieren bis zum letzten Eintrag
Werner

Hallo allerseits,
habe ein Problem beim Sortieren einer Tabelle. Diese besteht aus Zellen von A2:X200.
A:A =Lfd.-Nr. B:B Vorname, Name C:C Familienname ....
Zellen der Spalte C beinhalten Formel zum Trennen aus Einträgen der Spalte B.
Nach Markierung Bereich A2:X200 und ansch...
09.09.2008 20:45:00
Thread-ID: 1008577
6 Beiträge
aktive Zelle soll in Spalte "L" springen
Karsten

Hallo... ,
Suche folgenden Makrobefehl:
Die aktive Zelle soll in der Zeile bleiben, in der sie sich befindet, allerdings nach Spalte "L" springen.
Danke für eure Hilfe!
Gruß
Karsten
03.10.2008 16:34:44
Thread-ID: 1014058
3 Beiträge
Anzeige
Von aktiver Zelle in Spalte A springen
Susi

Hallo liebe Excel-Freunde,
wie ich in einer Tabelle die aktive Zelle ermitteln kann, weiß ich schon.
Von dieser aktiven Zelle aus (z.B. D10) soll nun der Wert in Spalte A dieser Zeile (hier also A10) ermittelt werden und in eine andere Zelle (z.B. A1) übertragen werden.
Leider kann...
16.10.2008 12:36:20
Thread-ID: 1016826
3 Beiträge
VBA - Summe unter letzter Zeile bilden
mgr

hallihallo!
ich hab jetzt schon ziemlich lang rumgesucht, komm aber leider nicht zum durchbruch. dabei - so unterstelle ich - hab ich ein problem, das schon viele gehabt haben müssten und das wahrscheinlich auch nicht unlösbar ist.
ich habe eine tabelle mit einer variablen anzahl von ze...
07.11.2008 13:39:07
Thread-ID: 1022657
3 Beiträge
Max,Min, Mittelwert von letzter Zeile
letzter

Hallo
Ich habe in einer Tabelle Temperaturwerte die jeden Tag ergänzt werden. Nun möchte ich für den jeweils letzten eingetragenen Tag die Min, Max und Mittelwerte angezeigt bekommen. Kann ich das ohne VBA mit den Excel Funktionen lösen, das immer die letzte Zeile verwendet wird?
Zude...
08.01.2009 08:53:00
Thread-ID: 1037754
3 Beiträge
VBA letzte Zeile Ermitteln
Gerhard

Hallo!
Habe ein kleines Problem. Lasse über VBA die letztz Zeile ermitteln.
intPosAktionNummerEnde = Range("K65536").End(xlUp).Offset(0, 0).Row
Das funktioniert immer nur jetzt habe ich in den Zellen eine Formel stehen, die soll aber nicht gezählt werden nur wenn eine Zahl drinnen s...
14.01.2009 17:52:00
Thread-ID: 1039758
5 Beiträge
In erste freie Spalte springen
Thomas

Hallo Exelgemeinde,
Ich möchte per Schaltbutton in die erste freie Spalte im Bereich CU 8 bis GF 8 springen.
Ist das möglich, und wie müßte das Makro dafür sein ?
Wäre schön wenn mir jemand weiterhelfen könnte.
Gruß Thomas
19.01.2009 16:48:17
Thread-ID: 1041558
3 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
9
8
5
2
3
2
2
2
4
2
7
4
3
4
3
1
4
2
3
7
2
2
6
2
19