[gelöst] Ausgeblendeter Zeilenbereich einblenden

Programmierung unter AOO/LO (StarBasic, Python, Java, ...)

Moderator: Moderatoren

Lupo121205
**
Beiträge: 32
Registriert: Mi, 05.12.2012 17:21

[gelöst] Ausgeblendeter Zeilenbereich einblenden

Beitrag von Lupo121205 »

Hi, das untenstehende Makro blendet ALLE ausgeblendeten Zeilen eines Blattes ein.
Sub FilterZurueckSetzen()
Zeilen = ThisComponent.sheets.getByName("Lagerbestand").rows
Zeilen.IsVisible = True
End Sub

Wie müßte es aussehen, damit nur ausgeblendete Zeilen bis Zeile 99 eingeblendet werden

…und die Zeilen ab Zeile 100 ausgeblendet bleiben?
(Puh! je tiefer ich einsteige, umso komplizierter wird es ohne wirkliche Programmierkenntnis ;-)

Danke im voraus Lupo
Zuletzt geändert von Lupo121205 am Di, 15.09.2020 10:34, insgesamt 1-mal geändert.
Stephan
********
Beiträge: 12369
Registriert: Mi, 30.06.2004 19:36
Wohnort: nahe Berlin

Re: Ausgeblendeter Zeilenbereich einblenden

Beitrag von Stephan »

in allen Programmversionen z.B.:

Code: Alles auswählen

Sub FilterZurueckSetzen()
	Zeilen = ThisComponent.sheets.getByName("Lagerbestand").getCellRangeByName("A1:A100").rows
	Zeilen.IsVisible = true
End Sub
in neueren Programmversionen auch über VBA:

Code: Alles auswählen

Option VBASupport 1

Sub FilterZurueckSetzen()
	Sheets("Lagerbestand").Rows("0:99").EntireRow.Hidden = False
End Sub


GRuß
Stephan
Lupo121205
**
Beiträge: 32
Registriert: Mi, 05.12.2012 17:21

[gelöst]Re: Ausgeblendeter Zeilenbereich einblenden

Beitrag von Lupo121205 »

Hallo Stephan - erneut ein herzliches DANKE - so läuft es super!
Lupo121205
**
Beiträge: 32
Registriert: Mi, 05.12.2012 17:21

[gelöst]Re: Ausgeblendeter Zeilenbereich einblenden

Beitrag von Lupo121205 »

Hallo Stephan - erneut ein herzliches DANKE - so läuft es super!
Antworten