Alle Spalten und Zeilen ausblenden bis auf ...

Antwort erstellen

BBCode ist eingeschaltet
[img] ist ausgeschaltet
[url] ist eingeschaltet
Smileys sind ausgeschaltet
Die letzten Beiträge des Themas
   

Ansicht erweitern Die letzten Beiträge des Themas: Alle Spalten und Zeilen ausblenden bis auf ...

Re: Alle Spalten und Zeilen ausblenden bis auf ...

von Karolus » Mi, 04.03.2009 21:57

Hallo

Code: Alles auswählen

Sub Main
oSheet = thisComponent.sheets(0)'1.Blatt
oSheet.getColumns().isvisible = false
	for si = 0 to 10 
		oSheet.getColumns().getbyindex(si).isvisible = true
	next  
oSheet.getrows().isvisible = false
	for zi = 0 to 24
		oSheet.getrows().getbyindex(zi).isvisible = true
	next
End Sub
Gruß Karo

Nach oben