BITTE helfen Sie uns HEUTE mit einer SPENDE
Helfen Sie das LibreOffice Forum zu erhalten!
> KEINE WERBUNG FÜR REGISTRIERTE BENUTZER!<
Ihre Spende wird für die Deckung der laufenden Kosten sowie den Erhalt und Ausbau 🌱 des LibreOffice Forums verwendet.
🤗 Als Dankeschön werden Sie im Forum als LO-SUPPORTER gekennzeichnet. 🤗
[gelöst] Calc Zeilen scrollen
[gelöst] Calc Zeilen scrollen
Hi,
habe noch ein Problem...
Ich habe eine Tabelle mit fixiertem Kopfbereich, wo ein paar Schaltflächen sind.
Beim drücken wird eine neue Zeile eingefügt.
Somit füllt sich die Tabelle langsam.
Zeile 1-10 ist fest und immer sichtbar.
Zeile 11 - 35 ist auch noch sichtbar.
Wenn ich nun bei Zeile 36 und größer bin, fügt meine Schaltfläche alles korrekt ein, aber ich muß von Hand runterscrollen, damit ich noch was sehe.
Gibt es eine Möglichkeit, daß wenn man z.B. bei Zeile 30 ist, daß dann automatisch eine Zeile hochgescrollt wird?
Also das man immer den aktuellen Eintrag sieht..
Gruß
Fabi
habe noch ein Problem...
Ich habe eine Tabelle mit fixiertem Kopfbereich, wo ein paar Schaltflächen sind.
Beim drücken wird eine neue Zeile eingefügt.
Somit füllt sich die Tabelle langsam.
Zeile 1-10 ist fest und immer sichtbar.
Zeile 11 - 35 ist auch noch sichtbar.
Wenn ich nun bei Zeile 36 und größer bin, fügt meine Schaltfläche alles korrekt ein, aber ich muß von Hand runterscrollen, damit ich noch was sehe.
Gibt es eine Möglichkeit, daß wenn man z.B. bei Zeile 30 ist, daß dann automatisch eine Zeile hochgescrollt wird?
Also das man immer den aktuellen Eintrag sieht..
Gruß
Fabi
Zuletzt geändert von fbarc am Fr 2. Sep 2022, 04:22, insgesamt 1-mal geändert.
Gruß
Fabi
--------------------------------
Mein System: Linuxmint 20.2 | LibreOffice Version: 7.3.4.2
--------------------------------
Meine Signatur steht auf der Rückseite
Fabi
--------------------------------
Mein System: Linuxmint 20.2 | LibreOffice Version: 7.3.4.2
--------------------------------
Meine Signatur steht auf der Rückseite
Re: Calc Zeilen scrollen
Hallo fbarc,
etwas spät die Antwort, aber vielleicht hilft sie ja trotzdem weiter.
Die erste sichbare Zeile kannst du wie folgt angeben:
Calc zeigt als erste Zeile dann die Zeile 54 an.
Beispiel:
Der Code oben zeigt immer die letzten 15 gefüllten Zeilen an. Wenn du die Zeilen mit "row = w.Cells(Rows.Count, 1).End(xlUp).Row" und "ThisComponent.getCurrentController().setFirstVisibleRow(row - 15)" in eine Do-Loop-Schleife oder eine For-Next-Schleife einbaust, dann wandern die Zeilen automatisch nach oben und du kannst immer sehen, wie die Zellen befüllt werden.
etwas spät die Antwort, aber vielleicht hilft sie ja trotzdem weiter.
Die erste sichbare Zeile kannst du wie folgt angeben:
Code: Alles auswählen
ThisComponent.getCurrentController().setFirstVisibleRow(54)
Beispiel:
Code: Alles auswählen
Sub move_cells()
Dim w As Worksheet
Set w = ThisWorkbook.Worksheets("Tabelle1")
Dim row As Long
row = w.Cells(Rows.Count, 1).End(xlUp).Row 'findet die letzte befüllte Zeile in Spalte 1
ThisComponent.getCurrentController().setFirstVisibleRow(row - 15)
End Sub
Re: Calc Zeilen scrollen
Vielen Dank... hat mir geholfen...
Allerdings nur die Zeile
der restlichen Code paßt irgendwie gar nicht...
und
kennt mein Calc nicht.
Aber wie gesagt, die eine Zeiler war genau das was ich gebraucht hatte.
Allerdings nur die Zeile
Code: Alles auswählen
ThisComponent.getCurrentController().setFirstVisibleRow(row - 15)
Code: Alles auswählen
Worksheet
Code: Alles auswählen
w.Cells(Rows.Count, 1).End(xlUp).Row
Aber wie gesagt, die eine Zeiler war genau das was ich gebraucht hatte.
Gruß
Fabi
--------------------------------
Mein System: Linuxmint 20.2 | LibreOffice Version: 7.3.4.2
--------------------------------
Meine Signatur steht auf der Rückseite
Fabi
--------------------------------
Mein System: Linuxmint 20.2 | LibreOffice Version: 7.3.4.2
--------------------------------
Meine Signatur steht auf der Rückseite
Re: [gelöst] Calc Zeilen scrollen
Hallo fbarc,
Oh, sorry, mein Fehler. Das funktioniert nur mit aktiviertem VBA-Support.
Ganz oben in dem Modul muss dazu folgendes stehen:
Dann funktioniert auch der restliche Code.
---
edit: Tippfehler korrigiert
Code: Alles auswählen
der restlichen Code paßt irgendwie gar nicht...
Ganz oben in dem Modul muss dazu folgendes stehen:
Code: Alles auswählen
Option VbaSupport 1
---
edit: Tippfehler korrigiert
An alle, die das LibreOffice-Forum nutzen:
Bitte beteiligen Sie sich mit 7 Euro pro Monat und helfen uns bei unserem Budget für das Jahr 2024.
Einfach per Kreditkarte oder PayPal.
Als Dankeschön werden Sie im Forum als LO-SUPPORTER gekennzeichnet.
❤️ Vielen lieben Dank für Ihre Unterstützung ❤️