ausgeblendete Zeilen löschen

Das Tabellenkalkulationsprogramm

Moderator: Moderatoren

leewise
Beiträge: 2
Registriert: Mi, 07.03.2007 13:19

ausgeblendete Zeilen löschen

Beitrag von leewise » Mi, 07.03.2007 13:47

Hallo,
ich stehe vor dem Problem Tabellen angeliefert zu bekommen, in denen Zeilen (manuell) ausgeblendet wurden, die für eine Weiterverarbeitung entfernt werden müssen. Die sichtbaren Zeilen zu kopieren funktioniert leider nicht, da bei einem Einfügen in ein neues Tabellenblatt auch die ausgeblendeten (dann eingeblendet) mit übernommen werden. Gibt es eine Funktion diese bereits ausgeblendeten Zeilen gänzlich aus der Tabelle zu entfernen?

Karolus
********
Beiträge: 7063
Registriert: Mo, 02.01.2006 19:48
Kontaktdaten:

Beitrag von Karolus » Mi, 07.03.2007 15:25

Hallo
Ja, per Makro:

Code: Alles auswählen

Sub ZeileloeschenWennausgeblendet
odoc = thisComponent
osheet = odoc.sheets(0) '1.Blatt
oZeile = oSheet.getrows()
for z = 0 to 1000
if oZeile().getByIndex(1000-z).isVisible = false then
ozeile.removebyindex(1000-z,1)
end if
next
msgbox("alle ausgeblendeten Zeilen gelöscht !")
End Sub
löscht bsplw. alle ausgeblendeten Zeilen im 1. Tabellenblatt bis Zeile 999.

Gruß Karo

leewise
Beiträge: 2
Registriert: Mi, 07.03.2007 13:19

Beitrag von leewise » Do, 08.03.2007 07:43

Weltklasse!

Vielen Dank an Karo für die superschnelle Hilfe -
funktioniert einwandfrei.

Gruß
Liane

ChhH

Re: ausgeblendete Zeilen löschen

Beitrag von ChhH » So, 24.06.2018 16:17

Vielen Dank, auch mir hat der Tipp geholfen.
Grüße
ChhH

paljass
******
Beiträge: 677
Registriert: Do, 25.10.2012 07:25

Re: ausgeblendete Zeilen löschen

Beitrag von paljass » So, 24.06.2018 16:50

Es gibt zwischenzeitlich auch eine Erweiterung:
http://www.chip.de/downloads/Sichtbare- ... 14608.html

Gruß
paljass
EDV ist wie U-Boot fahren - machst du ein Fenster auf, fangen die Probleme an.

Antworten