Clever-Excel-Forum

Clever-Excel-Forum > Office-Anwendungen > Excel > VBA gehe zur letzten Zelle mit dem Inhalt, nach rechts
Normale Version: VBA gehe zur letzten Zelle mit dem Inhalt, nach rechts
Du siehst gerade eine vereinfachte Darstellung unserer Inhalte. Normale Ansicht mit richtiger Formatierung.

Tom2020

13.07.2020, 08:52
Hallo
Eine Frage bzgl. der Selektieren von der letzten Zelle mit dem Inhalt
Von aktivierer Zelle springt zur LETZTEN Zelle nach Rechts mit dem Inhalt:
ActiveCell.End(xlToRight).Select
findet zwar die Zelle mit dem Inhalt, (was korrekt ist) und wenn man es nochmal ausführt, springt zu XFD Spalte/Zelle (was Falsch ist).
Ich wollte dass das Makro nur die letzte Zelle mit dem Inhalt findet und beim Anklicken nicht weiter springt.

Eine Idee?


danke

Lutz Fricke

13.07.2020, 10:52
Hallo Tom2020,

damit macht Dein Makro, was es machen soll und auch Strg+rechts macht.

Du könntest natürlich auch mit
Code:
Cells(ActiveCell.row, 1).End(xlToRight).Select

versuchen die bereits markierte Zelle nochmals zu markieren (geht aber schief, wenn Du weiter vorne in der Zeile eine leere Zelle hast).

Gruß,
Lutz

snb

13.07.2020, 11:09
Code:
application.goto cells(ActiveCell.row,columns.count).End(xlToLeft)

Tom2020

13.07.2020, 17:06
Danke an Euch Beide (Lutz & snb)

kann man den Code so erweitern

Code:
Cells(ActiveCell.row, 1).End(xlToRight).Select

dass man sagt, vom ActiveCell springe in AA spalte "nach Rechts" zur Zelle?
zB.

ActiveCell (in A20) springe zu Spalte AA, Zelle AA20
ActiveCell (in A21) springe zu Spalte AA, Zelle AA21
...
ActiveCell (in A200) springe zu Spalte AA, Zelle AA200
usw.

Gruss

snb

13.07.2020, 17:25
Code:
application.goto cells(ActiveCell.row,27)
Clever-Excel-Forum > Office-Anwendungen > Excel > VBA gehe zur letzten Zelle mit dem Inhalt, nach rechts