Live-Forum - Die aktuellen Beiträge
Datum
Titel
25.04.2024 00:42:03
Listbox mit gefilterten Daten füllen
24.04.2024 20:38:58
Summe mit Bedingung, nur letzte Ergebnisse anzeigen
24.04.2024 19:29:30
Formel filter
24.04.2024 18:49:56
merge & select
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1080to1084
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
1080to1084
1080to1084
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

In erste leere Zeile springen

In erste leere Zeile springen
15.06.2009 12:10:12
beginner
Hallo,
weiß jemand, wie ich es einstelle (wahrscheinlich nur über Makro möglich), dass der Cursor beim Öffnen einer Excel-Datei immer in der ersten leeren Zeile erscheint? Der Bearbeiter soll nach dem Öffnen der Datei sofort erfassen können, ohne lange zu scrollen.
Die erste leere Zeile wird immer eine andere sein, da sie laufend gepflegt wird.
Würde mich mächtig über den speziellen Makro-Text freuen.
Danke und Gruß
beginner

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

Betreff
Datum
Anwender
Anzeige
Erste leere Zelle der Spalte A aktivieren
15.06.2009 12:23:12
NoNet
Hallo Beginner,
kopiere dieses Makro in das Klassenmodul DieseArbeitsmappe im VBA-Editor :
VBA-Code:
Private Sub Workbook_Open()
    Sheets("Eingaben").Activate 'Das betreffende Blatt aktivieren
    If IsEmpty([A1]) Then
        [A1].Select
    Else
        [A1].End(xlDown).Offset(1).Activate 'Erste leere Zelle der Spalte A aktivieren
        'Die letzten 2 Einträge anzeigen und Bildschirm rollen :
        If ActiveCell.Row > 2 Then ActiveWindow.ScrollRow = ActiveCell.Row - 2
    End If
End Sub
Den Namen "Eingaben" des gewünschten Tabellenblattes bitte anpassen !
Gruß, NoNet
AW: In erste leere Zeile springen
Herbert

Hallo beginner
Hier im Forum werden Beiträge mit echtem Namen schneller beantwortet (siehe Regeln für dieses Forum ;-)

Private Sub Workbook_Open()
Dim iRow As Integer
With Worksheets(1)
iRow = .Cells(Rows.Count, 1).End(xlUp).Row + 1
End With
Cells(iRow, 1).Activate
End Sub


Gruß Herbert ( ist mein richtiger Name)

@Herbert : Ein kleiner Tipp...
NoNet

Hallo Herbert,
einen kleinen Tipp an dich : Selbst in Excel 97 gibt es "schon" 65536 Zeilen pro Tabellenblatt.
Du hast die zeilenvariable vom Typ INTEGER deklariert, diese reicht jedoch nur für 32.767 Zeilen (also die Hälfte der vorhandenen Zeilen). In Excel 2007 sind es bereits über 1 Mio. Zeilen.
Verwende daher sicherheitshalber den Typ LONG für die Zeilenvariablen.
Gruß, NoNet
@NoNet
Herbert

Hi NoNet
Danke - bin von weniger als 32.767 Zeilen ausgegangen, sonst hast Du natürlich recht.
Gruß Herbert
Danke!!
beginner

Nochmal hi NoNet und hi Herbert,
habe meinen "beginner"-Status eindrucksvoll dokumentiert und meinen Dankes-Eintrag an euch als normalen, neuen Eintrag (16.06.2009, 09:54 Uhr) eingestellt... Kann man seine Beiträge (meinen missglücktes "Danke") in diesem Forum eigentlich auch löschen?
Nochmals Danke,
Björn ; - )
Anzeige
AW: In erste leere Zeile springen
15.06.2009 12:24:33
Herbert
Hallo beginner
Hier im Forum werden Beiträge mit echtem Namen schneller beantwortet (siehe Regeln für dieses Forum ;-)

Private Sub Workbook_Open()
Dim iRow As Integer
With Worksheets(1)
iRow = .Cells(Rows.Count, 1).End(xlUp).Row + 1
End With
Cells(iRow, 1).Activate
End Sub


Gruß Herbert ( ist mein richtiger Name)

@Herbert : Ein kleiner Tipp...
15.06.2009 12:29:14
NoNet
Hallo Herbert,
einen kleinen Tipp an dich : Selbst in Excel 97 gibt es "schon" 65536 Zeilen pro Tabellenblatt.
Du hast die zeilenvariable vom Typ INTEGER deklariert, diese reicht jedoch nur für 32.767 Zeilen (also die Hälfte der vorhandenen Zeilen). In Excel 2007 sind es bereits über 1 Mio. Zeilen.
Verwende daher sicherheitshalber den Typ LONG für die Zeilenvariablen.
Gruß, NoNet
Anzeige
@NoNet
15.06.2009 12:32:27
Herbert
Hi NoNet
Danke - bin von weniger als 32.767 Zeilen ausgegangen, sonst hast Du natürlich recht.
Gruß Herbert
Danke!!
16.06.2009 10:01:22
beginner
Nochmal hi NoNet und hi Herbert,
habe meinen "beginner"-Status eindrucksvoll dokumentiert und meinen Dankes-Eintrag an euch als normalen, neuen Eintrag (16.06.2009, 09:54 Uhr) eingestellt... Kann man seine Beiträge (meinen missglücktes "Danke") in diesem Forum eigentlich auch löschen?
Nochmals Danke,
Björn ; - )

300 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
Nicht leere Zellen in einer Zeile finden
Andreas

Hallo Zusammen,
Bisher kam ich ohne VBA zurecht, aber ich denke nun ...
Ich habe eine Tabelle mit folgendem Aufbau
Tabelle1:
ABCDEFG
115789
2__z_z
3zz___
4z__z_
Zeile 1: enthält eine Bezeichnung (hier als Zahl dargestellt)
z=Zahl
_=leer
in einem n...
29.09.2008 14:20:42
Thread-ID: 1013111
5 Beiträge
Leere Zelle finden und darüber Kopieren
SebastianSchelb

Hallo, ich habe noch ein Problem.
Tabelle:
Tür(A1)
Fenster(A2)
Haus(A3)
Buch(A5)
Zelt(A6)
Zelle A4 ist leer. Ich will jetzt das er die leere zelle automatisch findet und dann alle darunterbefindlichen Wörter um diese leere zelle nach oben Kopiert. Sollte dann so auss...
07.10.2008 11:28:54
Thread-ID: 1014663
3 Beiträge
Anzeige
erste numerische Zelle finden
marcl

Moin zusammen,
ich möchte im gesamten Blatt die erste numerische Zelle finden.
Ich dachte dabei an Find+IsNumeric, komme damit aber nicht weiter. Kann mir jemand helfen?
Danke
Gruß
marcl
05.11.2008 10:37:00
Thread-ID: 1021787
16 Beiträge
Erste und letzte Zelle finden
Frank

Guten morgen,
ich möchte die Zellen finden indem für Start die 06:00 und für Ende die 14:00 steht.
Beispiel:
In der Zelle A100 steht 06:00
In der Zelle A1000 steht 14:00
Wenn die Startzelle und die Endzelle gefunden wurden, dann möchte ich den Zellenbezug in G übernehme und...
18.11.2008 09:38:00
Thread-ID: 1025505
10 Beiträge
Die erste belgte Zelle in Spalte F finden
Kurt

Guten Abend,
ich möchte die 1. belegt Zelle in der Spalte F finden angefangen ab Zeile 3.
Dann möchte ich den Bereich von Spalte A bis Spalte H ab Zeile6 bis zu der 1.
belegten Zelle selectieren unm dann zu kopieren,
gruß mfg Kurt
20.11.2008 20:24:39
Thread-ID: 1026539
8 Beiträge
VBA leere Zelle finden und obere Inhalte einfügen
Carmen

Hallo Zusammen,
leider habe ich so ganz wenig Ahnung von VBA, weiß aber auch nicht wie ich mir sonst normal mit
Excel weiterhelfen könnte da es zuviele Daten sind.
Hab folgendes Problem, ich möchte gerne dass alle leeren Zellen in den Spalten B-D mit dem Inhalt der Zellen eine Zeile...
08.12.2008 17:08:41
Thread-ID: 1031133
5 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

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
4
4
2
2
15
9
7
4
2
2
7
3
7
3
3
1
3
7
1
4
2
8
3
19