(gelöst:) per Makro nach oben scrollen

[erikafuchs]

Liebe Gemeinde,
gibt es eine Möglichkeit per Makro in einem Tabellenblatt nach oben zu scrollen?
Googeln zeigt für VBA die Funktion "ActiveWindow.ScrollColumn = 1 " - die gibt es hier nicht.
In einem anderen Post habe ich von Winfried den Code:

Code: Alles auswählen

oViewController = ThisComponent.getCurrentController()
oViewController.setFirstVisibleRow( oViewController.getFirstVisibleRow() + 1 ) 

gefunden, der klappt (bei mir) auch nicht.

[WiM]

Hallo Pit,
nachfolgendes Makro habe ich bei mir getestet (AOO 4.1.3 || Debian/Jessie):

Code: Alles auswählen

Sub Gehezu 'z. B. A1
   'von DPunch: http://de.openoffice.info/viewtopic.php?t=46373#p167310
        oDoc = thisComponent
        oSheet = oDoc.Sheets.getByIndex(0)
        oCell = oSheet.getCellByPosition(0,0)
        oDoc.CurrentController.Select(oCell) 'A1 wird selektiert und markiert.

   'Falls keine Markierung gewünscht
   'Auszug aus MK springen() von Stephan
   'de.openoffice.info/viewtopic.php?t=9040
        oRanges = oDoc.createInstance("com.sun.star.sheet.SheetCellRanges")
        oDoc.CurrentController.Select(oRanges) 'Die Selektion bleibt, die Markierung wird aufgehoben.
End Sub

Gruß Wim

[erikafuchs]

Funktioniert!
Prima, Danke (auch an DPunch)

[Toxitom]

Hey Erikafuchs,

.....der klappt (bei mir) auch nicht.

Hmm, also der Code ist korrekt und funktioniert

Allerdings: Wenn Du nach oben scrollen willst, muss es natürlich -1 heissen - und FirstVisibleRow ist immer die erste sichtbare Zeile:)

VG Thomas

[erikafuchs]

und FirstVisibleRow ist immer die erste sichtbare Zeile:)

vielleicht liegt da das Problem - ich möchte nicht zur ersten sichtbaren Zeile scrollen sondern zum Blattanfang.

[Jörg]

Hallo Fachleute,
beim Stöbern bin ich auf dieses Thema gestoßen. Muß es denn ein Makro sein?
Über Extras->Anpassen->Symbolleisten->Hinzufügen->Bereich(Navigation)->Befehle(Zum Dateianfang)(Symbol auswählen)
erreicht man doch das gleiche Ziel.

[erikafuchs]

Lieber Jörg,
ja, muss. Meine Schüler müssen Matheaufgaben lösen (siehe:-> IGS-Kelsterbach -> Downloads -> Rechentrainer). Diese erscheinen in einem Dialog. Wenn dieser geöffnet ist, kann man nicht mehr auf der Seite nach oben scrollen, dort finden sich aber noch Graphiken und weitere Infos.
Pit

[Jörg]

Hallo,
danke für den Hinweis..