Frage stellen
0

ScrollArea - Scrollberich

gefragt 2017-06-14 10:38:23 +0100

Mandy Gravatar-Bild

Hey! Ich habe eine Calc-Datei erstellt und möchte nun das Scrollen auf den Bereich beschränken der in Benutzung ist. In Excel nennt sich diese Funktion "ScrollArea" und befindet sich im VBA-Editor. Gibt es etwas vergleichbares in Calc? Und wenn ja, wo ist es zu finden?

Viiiielen Dank für Eure Bemühungen.

Ihr seit die Größten! Eure Mandy

Bearbeiten Tags ändern Melden schließen vereinen löschen

1 Antwort

0

geantwortet 2017-06-14 13:14:03 +0100

Lupp Gravatar-Bild

updated 2017-06-14 15:58:22 +0100

Da LibreOffice und seine API nicht an eine bestimmte Scriptsprache gebunden sind, kann das so nicht gehen. Du kannst aber die unbenutzten Spalten und Reihen verbergen. Die Rollbalken passen sich an.

Falls das mit LibreOffice-BASIC-Sub gemact werden soll, kannst du das folgende Paar verwenden:

Sub showUnusedColumnsAndRows()
theDoc   = ThisComponent
theSheet = theDoc.Sheets(theDoc.CurrentSelection.RangeAddress.Sheet)
myCursor = theSheet.CreateCursor
myCursor.GotoEndOfUsedArea(0)
myCursor = theSheet.GetCellRangeByPosition(myCursor.RangeAddress.StartColumn+1, myCursor.RangeAddress.StartRow+1, theSheet.RangeAddress.EndColumn, theSheet.RangeAddress.EndRow )
myCursor.Columns.IsVisible = true
myCursor.Rows.IsVisible    = true
End Sub

Sub hideUnusedColumnsAndRows()
theDoc   = ThisComponent
theSheet = theDoc.Sheets(theDoc.CurrentSelection.RangeAddress.Sheet)
myCursor = theSheet.CreateCursor
myCursor.GotoEndOfUsedArea(0)
myCursor = theSheet.GetCellRangeByPosition(myCursor.RangeAddress.StartColumn+1, myCursor.RangeAddress.StartRow+1, theSheet.RangeAddress.EndColumn, theSheet.RangeAddress.EndRow )
myCursor.Columns.IsVisible = false
myCursor.Rows.IsVisible    = false
End Sub

Es gibt auch diese Demo.

(Editierung: Einige überflüssige Codezeilen entfernt.)

Bearbeiten Melden löschen Link mehr

Kommentare

Vielen lieben Dank, das hilft mir weiter.

Mandy Gravatar-BildMandy ( 2017-06-15 09:29:43 +0100 )Bearbeiten
Registrieren oder einloggen, um zu antworten

Antwortwerkzeuge

1 Beobachter

Statistik

Gefragt: 2017-06-14 10:38:23 +0100

Angesehen: 94 Mal

Aktualisiert: Jun 14 '17