Google Groups no longer supports new Usenet posts or subscriptions. Historical content remains viewable.
Dismiss

tastenkombination sprung in letzte zeile

16 views
Skip to first unread message

Martin Gross

unread,
Apr 3, 2007, 10:43:25 AM4/3/07
to
Folgendes Problem,
ich habe eine grosse Excel Tabelle ca. 2000 Zeilen,
in dieser Tabelle suche ich Zeilen z.B Zeile 768 und Kopiere sie
in die letzte Zeile z.B. 2001,

nun will ich zurück auf die Zeile 768 Springen,
manchmal vergesse ich aber in welcher Zeile ich war.

Gibt es eine Tastenkombination die zur letzte Zeile (768) springt,

Danke
Martin

Message has been deleted

Claus Busch

unread,
Apr 3, 2007, 11:17:43 AM4/3/07
to
Hallo Martin,

es gibt Tastenkombinationen für den Sprung in die erste oder letzte Zelle
einer Spalte, Zeile oder Tabelle. Aber für so mittendrin gibt es meines
Wissens nichts. Du könntest aber das Ganze über VBA lösen. Ein Makro, das
dir die Zeile kopiert, am Ende einfügt und wieder zum Ausganspunkt
zurückspringt. Wenn du diesem Makro eine Tastenkombination zuweist, bist du
in etwa dort, wo du hinwolltest. Teste es mal:
Sub KopierenUndZurück()
Dim Ziel As Range
Dim LRow As Long

LRow = Cells(Rows.Count, 1).End(xlUp).Row
Set Ziel = ActiveCell
Rows(Ziel.Row).Copy
Range("A" & LRow + 1).PasteSpecial
Ziel.Activate
Application.CutCopyMode = False
End Sub


--
Mit freundlichen Grüssen
Claus Busch

Win XP Prof SP2; Office 2000 SP3
claus_busch(at)t-online.de

Jean Ruch

unread,
Apr 3, 2007, 12:14:33 PM4/3/07
to

"Martin Gross" <martin...@gmx.de> schrieb im Newsbeitrag
news:1htpa2fi4pogs.1wr0geyo1eqao$.dlg@40tude.net...

Hallo Martin,

Ich glaube dass, wenn Du schreibst *zur letzten Zelle" man verleitet
ist, die letzte Zelle der Tabelle zu verstehen, wozu Dir schon short
Cuts genannt wurden ..
Soweit ich Dich aber verstehe (aus Deinen Adressenangaben), willst Du
ja wissen in welcher Zeile Du zuletzt etwas herauskopiert hast, (das
ist aber nicht die letzte Zeile Deiner Tabelle)

Ich kenne leider hierfür keine Short-cut Lösung.
Vielleicht kann Dir der Ameisenpfad, der die kopierte(n) Zelle(n)
umrandet,
helfen. Aber bei großen Tabellen muss man den Zoom (25%) benutzen, den
Ameisenpfad finden und dann in der Gegend wiedser auf 100% gehen
Umständlich aber man kommt zum Ziel.....

Vielleicht kann Dir auch der Befehl *rückgängig* weiter helfen
(ist aber auch nicht sehr produktiv)

Am besten ist, Du merkst Dir die Zeile / Zelle. :-(
Du kannst ja zellengenau jede Zelle in der Tabelle anspringen, indem
Du ihre Adresse in das Namensfeld eintippst.

mit freundlichem Gruß

Jean


Martin Gross

unread,
Apr 3, 2007, 1:57:58 PM4/3/07
to
>
> es gibt Tastenkombinationen für den Sprung in die erste oder letzte Zelle
> einer Spalte, Zeile oder Tabelle. Aber für so mittendrin gibt es meines
> Wissens nichts. Du könntest aber das Ganze über VBA lösen. Ein Makro, das
> dir die Zeile kopiert, am Ende einfügt und wieder zum Ausganspunkt
> zurückspringt. Wenn du diesem Makro eine Tastenkombination zuweist, bist
du
> in etwa dort, wo du hinwolltest. Teste es mal:
> Sub KopierenUndZurück()
> Dim Ziel As Range
> Dim LRow As Long
>
> LRow = Cells(Rows.Count, 1).End(xlUp).Row
> Set Ziel = ActiveCell
> Rows(Ziel.Row).Copy
> Range("A" & LRow + 1).PasteSpecial
> Ziel.Activate
> Application.CutCopyMode = False
> End Sub
>

Bingo, das ist es,
Schade das es kein ShortCut gibt,
aber die Lösung ist auch elegant

Danke

Martin


Claus Busch

unread,
Apr 3, 2007, 2:05:01 PM4/3/07
to
Hallo Martin,

Am Tue, 3 Apr 2007 19:57:58 +0200 schrieb Martin Gross:

> Bingo, das ist es,
> Schade das es kein ShortCut gibt,
> aber die Lösung ist auch elegant

gern geschehen. Freut mich, wenn ich helfen konnte. Danke für die
Rückmeldung.
Du hättest du doch deinen gewünschten ShortCut, wenn du diesem Makro einen
zuweisen würdest.

Martin Gross

unread,
Apr 3, 2007, 2:18:33 PM4/3/07
to
>
> gern geschehen. Freut mich, wenn ich helfen konnte. Danke für die
> Rückmeldung.
> Du hättest du doch deinen gewünschten ShortCut, wenn du diesem Makro einen
> zuweisen würdest.
>
Ja,
das werde ich tun,

nochmal Danke

Martin


0 new messages