Office - Word, Excel und Co. 9.744 Themen, 41.408 Beiträge

Verfolgung starten Optionen

Excel: Letzte Eintragung in Zeile automatisch zentrieren.

minbari / 11 Antworten / Flachansicht Nickles

Moin,

Folge-Thread.

Ich habe eine Exceltabelle, in welche mittels Userform Daten eingetragen werden sollen.

Mittlerweile funktioniert alles einwandfrei. Jetzt möchte ich noch, dass die letzte Eintragung
automatisch zentriert wird.
Ich schätze, dass es eine Liste mit ca 3000-4000 Eintragungen wird. Da neue Eintragungen unten eingefügt werden, würde ich es sehr mühsam finden, zum Überprüfen 30 Seiten nach unten zu scrollen.

Habt Ihr eine Idee?

Großes Dankeschön!!

minbari

bei Antwort benachrichtigen
Bitte beschreibe Dein Vorhaben etwas genauer: Jede Zeile, die Du mit dem UserForm und dem dazugehörigen VBA-Code in die ... mawe2
Ja, im Grunde ist es genau das. Ich möchte, dass die Tabelle dann automatisch zum letzten eintrag springt. Wie bei minbari
Wenn die Eintragungen in Spalte A sind folgender VBA-Code: Sub Makro Range A1 .Select Selection.End xlDown .Select ... Edgar Rau
Das funktioniert nicht. Ich habe den Code in den Code der Userform eingefügt - nichts. Habe den Code auf B6 geändert. ... minbari
Edgar Rau minbari „Das funktioniert nicht. Ich habe den Code in den Code der Userform eingefügt - nichts. Habe den Code auf B6 geändert. ...“
Optionen
Range("A1").Select

Es wird die Zelle A1 selektiert.

Selection.End(xlDown).Select

Die letzte beschriebene Zelle in Spalte A wird selektiert.

Selection.HorizontalAlignment = xlCenter

Die letzte beschriebene Zelle in Spalte A wird horizontal ausgerichtet.

Bei Dir müsste es "Range("B6").Select" heißen.

Es dürfen allerdings zwischen "B6" und dem Ende keine Leerzellen enthalten sein.

Das funktioniert nicht.

Das ist mir ein Rätsel!

Wer brauchen ohne zu gebraucht, braucht brauchen gar nicht zu gebrauchen
bei Antwort benachrichtigen
Das, was Dein Script macht, ist gar nicht das Ziel. Weil ich aus dem Startposting auch nicht ganz schlau geworden bin, ... mawe2
Hallo mawe2, vielen Dank für die Erklärung. Dann habe ich es tatsächlich falsch verstanden. Ich dachte, er wollte den ... Edgar Rau
Hier nochmal der Code der Userform: Private Sub Abbrechen_Button_Click Eingabefenster schließen Unload Eingabemaske End ... minbari
Wenn keiner einen brauchbaren Vorschlag hat, dann folgende Infos. Rows.Count, ist die letzte mögliche Zeile. Zeile 65536 ... hddiesel
Das war die Lösung!! Vielen, vielen Dank!!!!! minbari
Hallo minbari, Danke für deine Rückmeldung. hddiesel