BITTE helfen Sie uns HEUTE mit einer SPENDE
Helfen Sie das OpenOffice 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 OpenOffice Forums verwendet.
🤗 Als Dankeschön werden Sie im Forum als OO-SUPPORTER gekennzeichnet. 🤗
Alle Spalten einblenden
Re: Alle Spalten einblenden
Hallo Mikele,
ich würde es dann tatsächlich mit Variante 2 machen wollen.
Viele Grüße
Sonja
ich würde es dann tatsächlich mit Variante 2 machen wollen.
Viele Grüße
Sonja
Re: Alle Spalten einblenden
Hallo Mikele,
A2:N200
kann ich den Bereich dann ggf. selber anpassen? Sollte sich doch mla was ändern?
Gruß
Sonja
A2:N200
kann ich den Bereich dann ggf. selber anpassen? Sollte sich doch mla was ändern?
Gruß
Sonja
Re: Alle Spalten einblenden
Hallo,
sollte machen, was du möchtest.
Code: Alles auswählen
sub entfiltern
oTab=ThisComponent.CurrentController.ActiveSheet
'Festlegung des Bereiches in dem der Autofilter aktiviert ist
sBereichsname="A2:N200"
oDat=oTab.getCellRangeByName(sBereichsname)
oFilter=oDat.createFilterDescriptor(false)
Dim aFilterFields()
oFilter.setFilterFields(aFilterFields)
oDat.filter(oFilter)
end sub
Gruß,
mikele
mikele
Re: Alle Spalten einblenden
Hallo Mikele,
ja, macht genau was es soll. Vielen Dank
Jetzt benötige ich noch das "alle Spalten einbelnden" auf dem aktuellen Register und nicht nur dem 1. Register.
Hast Du da auch die Lösung für mich?
Viele Grüße
Sonja
ja, macht genau was es soll. Vielen Dank
Jetzt benötige ich noch das "alle Spalten einbelnden" auf dem aktuellen Register und nicht nur dem 1. Register.
Hast Du da auch die Lösung für mich?
Viele Grüße
Sonja
Re: Alle Spalten einblenden
Hallo,
Code: Alles auswählen
sub einblenden
ThisComponent.CurrentController.ActiveSheet.Columns.isVisible=true
end sub
Gruß,
mikele
mikele
Re: Alle Spalten einblenden
Hallo Mikele,
jetzt ist mir noch folgendes Problem aufgefallen:
Wenn ich die Tabelle gefiltert habe funktioniert das Einblenden der Zeilen einwandfrei. Allerdings ist der Filter noch immer gesetzt (der Pfeil ist farbig hinterlegt). Wenn ich dann neu filtern möchte ist es nicht möglich, bzw. der neue Filter filtert dann nur aus den bereits vorher gefilterten. Der Code "Zeilen einblenden" löst daher leider doch nicht mein Problem.
Hast Du wieder eine Lösung für mich?
Viele Grüße
Sonja
jetzt ist mir noch folgendes Problem aufgefallen:
Wenn ich die Tabelle gefiltert habe funktioniert das Einblenden der Zeilen einwandfrei. Allerdings ist der Filter noch immer gesetzt (der Pfeil ist farbig hinterlegt). Wenn ich dann neu filtern möchte ist es nicht möglich, bzw. der neue Filter filtert dann nur aus den bereits vorher gefilterten. Der Code "Zeilen einblenden" löst daher leider doch nicht mein Problem.
Hast Du wieder eine Lösung für mich?
Viele Grüße
Sonja
Re: Alle Spalten einblenden
Hallo Donna,
um die Filterung aufzuheben, nimmst du die sub entfiltern. Nur die Zeilen wieder einzublenden hilft wahrlich nicht.
um die Filterung aufzuheben, nimmst du die sub entfiltern. Nur die Zeilen wieder einzublenden hilft wahrlich nicht.
Gruß,
mikele
mikele
Re: Alle Spalten einblenden
Hallo Mikele,
ich habe das SUB entfiltern von Dir verwendet. Es werden aber nur die Zeilen eingeblendet. Der Filter wird sich "gemerkt"
Gruß
Sonja
ich habe das SUB entfiltern von Dir verwendet. Es werden aber nur die Zeilen eingeblendet. Der Filter wird sich "gemerkt"
Gruß
Sonja
Re: Alle Spalten einblenden
Hallo Donna,
ich wollte nur sicher gehen, dass es wirklich die richtige sub ist.
Gerade habe ich es nochmal unter AOO4.1.1 (unter Windows XP) getestet und kann deine Beobachtung nicht bestätigen.
Welche Version und welches Betriebssystem benutzt du?
ich wollte nur sicher gehen, dass es wirklich die richtige sub ist.
Gerade habe ich es nochmal unter AOO4.1.1 (unter Windows XP) getestet und kann deine Beobachtung nicht bestätigen.
Welche Version und welches Betriebssystem benutzt du?
- Dateianhänge
-
- beispiel makro filter entfernen.ods
- (13.55 KiB) 239-mal heruntergeladen
Gruß,
mikele
mikele