Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
1236to1240
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
Inhaltsverzeichnis

ausgewählte Zelle in die linke obere Ecke stellen

ausgewählte Zelle in die linke obere Ecke stellen
Peter
Hallo liebe Freunde,
wie kann ich mittels VBA eine ausgewählte Zelle auf einfache Weise in die linke obere Ecke des Bildschirms positionieren? Wenn ich eine Zelle aus der Spalte A markiere, dann wählt Excel die Position in der Mitte des Bildschirms. Durch Scrollen kann ich dann für meinen persönlichen Bildschirm die Zelle zwar in die linke obere Ecke befördern, ein anderer Benutzer, mit einer anderen Bildschirmgröße, hat die ausgewählte Zelle dann jedoch sehr wahrscheinlich auf einer anderen Position auf dem Bildschirm stehen. Es geht also darum: Wie kann ich eine ausgewählte Zelle immer - egal welche Bildschirmgröße der Benutzer verwendet - in die linke obere Ecke bringen?
Vielen Dank im Voraus für Eure Hilfe.
Peter Kloßek

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Benutzer
Anzeige
AW: mit Application.Goto
22.11.2011 09:17:19
hary
Hallo
geht damit.

Application.Goto Range(ActiveCell.Address), True
'oder
Application.Goto Reference:=ActiveCell, Scroll:=True

gruss hary
AW: mit Application.Goto
22.11.2011 11:02:52
Peter
Hallo Hary,
das klappt hervorragend. Nochmals vielen Dank.
M.f.G. Peter Kloßek
Application.Goto ..., True
22.11.2011 09:18:53
Matthias
Hallo Peter
im Prinzip so:
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Application.Goto Range(ActiveCell.Address(0, 0)), True
End Sub
ob Du nun das SelectionChange
oder ein anderes Ereignis nutz ist Dir überlassen.
Ich persönlich würde eher den Doppelklick benutzen:
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
Application.Goto Range(ActiveCell.Address(0, 0)), True
Cancel = True
End Sub
Gruß Matthias
Anzeige
AW: Application.Goto ..., True
22.11.2011 11:04:45
Peter
Hallo Matthias,
vielen Dank für Deine Vorschläge. Es klappt hervorragend.
M.f.G. Peter Kloßek

304 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige