ScrollRow funktioniert nicht mit Variabel

Bild

Betrifft: ScrollRow funktioniert nicht mit Variabel
von: Ueli
Geschrieben am: 31.03.2005 14:21:39
Hallo
Warum scrollt mir untenstehender Teil des Makros nicht die gewünschten Zeile an den oberen Rand? Die Anzahl Zeilen werden richtig angegeben. Gebe ich in der letzten Zeile anstelle von "Zeilen" einen fixen Wert ein (z.B 300) funktioniert das Ganze.
Worksheets("Swagelok").Activate
Range("A1").Activate
Selection.End(xlDown).Select
Zeilen = ActiveCell.Row
ActiveWindow.ScrollRow = Zeilen
Besten Dank für Tipps.
Ueli

Bild

Betrifft: AW: ScrollRow funktioniert nicht mit Variabel
von: c0bRa
Geschrieben am: 31.03.2005 14:29:12
hallo...
sub test()
    Worksheets("Swagelok").Activate
    Range("A1").End(xlDown).Select
    Zeilen = ActiveCell.Row
    ActiveWindow.ScrollRow = Zeilen
end sub

also bei mir springt er an die letzte zeile...

Rückmeldung nicht vergessen...
c0bRa
Bild

Betrifft: AW: ScrollRow funktioniert nicht mit Variabel
von: ANdreas
Geschrieben am: 31.03.2005 14:29:42
Hallo Ueli,
so sollte es gehen:

Sub Scrollen()
Dim i&
    Worksheets("Swagelok").Activate
        i = Range("A1").End(xlDown).Row
        Cells(i, 1).Select
        ActiveWindow.ActivePane.ScrollRow = i
End Sub

Gruß
Andreas
Bild

Betrifft: AW: ScrollRow funktioniert nicht mit Variabel
von: Ueli
Geschrieben am: 31.03.2005 14:56:56
Hallo Cobra, hallo Andreas
Besten Dank an euch beide. Beide Tipps funktionieren bestens (und sind noch schlanker als meine Idee.) :-)
Gruss
Ueli
 Bild

Beiträge aus den Excel-Beispielen zum Thema "ScrollRow funktioniert nicht mit Variabel"