Seite 1 von 1

Zellen automatisiert auf optimale Spaltenbreite anpassen

Verfasst: Di, 18.04.2006 09:03
von sascha11
hey!

ich habe in Excel Zellen per Makro gefüllt- leider weiß ich im Voraus nicht, wie groß diese werden, deshalb sollte ich Sie auch gleichzeitig im Makro auf die optimale Spaltenbreite vergrößern, wenn nötig. Gibt es dazu einen Befehl, z. Bsp.: oT3.fitAll()?

Vielen Dank!

Sascha

Verfasst: Di, 18.04.2006 10:54
von Toxitom
Hey Sascha,

jede Spalte unterstützt die Eigenschaft "OptimalWidth". Übergib "True", dann sollte die Spaltenbreite entsprechend des längsten Eintrags eingestellt werden. Der folgende Code setzt alle Spalten der Tabelle1 auf die optimale Breite:

Code: Alles auswählen

Sub SpaltenOptimiern
	oDoc = thisComponent
	oSheet = oDoc.sheets(0)
	oSp = oSheet.getColumns()
	oSp.optimalWidth = true
End Sub
Gruss
Thomas

Verfasst: Di, 18.04.2006 11:02
von sascha11
danke!

Sascha