von plohrer » Fr, 24.09.2010 22:15
Hallo Basic-Profis.
Ich bin ehrgeiziger Makro-Anfänger und möchte gerne folgendes Problem lösen. Ich habe im
ooo Writer eine Tabelle1 und möchte per Makro
9 Spalten mit folgenden Abständen (cm) definieren : 5-2-1.4-1.4-1.4-1.4-1.4-1.4-1.4. Die Formatvorlagen sind nichts Neues oder Eigenes : "Tabellen-Überschrift und Tabellen-Inhalt".
Die Makro-Tastatur-Eingaben sind : (Curser in der ersten Zeile), alt-t,alt-c (Tabelleneigenschaften), alt-m (Ausrichtung Manuell), ctrl-tab,ctrl-tab (Spalten), alt-1 (erste Spalte),5,2,1.4 ... , Return (OK). Makro beenden. Die Tabelle sieht perfekt aus, genau so wie erwünscht. Das Resultat ist enttäuschend. Die Basic Procedur sagt mir (als Anfänger) nichts. Ich habe im Forum auch dies gesehen, aber auch das klappt nicht ...
Sub Spaltenbreite_Zeilenhoehe()
Doc = ThisComponent
Sheet = Doc.Sheets(0)
Sheet.Columns(0).width = 5000
Sheet.rows(0).height = 5000
Hat jemand Lust und Laune mir bei diesem Problem behilflich zu sein ? Es ist nichts Dringendes, mein persönlicher Ehrgeiz ist geweckt und das MUSS doch machbar sein. Wo liegt überhaupt das Problem ?
[size=150]Hallo Basic-Profis[/size].
Ich bin ehrgeiziger Makro-Anfänger und möchte gerne folgendes Problem lösen. Ich habe im [b]ooo Writer[/b] eine Tabelle1 und möchte per Makro [b]9 Spalten[/b] mit folgenden Abständen (cm) definieren : 5-2-1.4-1.4-1.4-1.4-1.4-1.4-1.4. Die Formatvorlagen sind nichts Neues oder Eigenes : "Tabellen-Überschrift und Tabellen-Inhalt".
Die Makro-Tastatur-Eingaben sind : (Curser in der ersten Zeile), alt-t,alt-c (Tabelleneigenschaften), alt-m (Ausrichtung Manuell), ctrl-tab,ctrl-tab (Spalten), alt-1 (erste Spalte),5,2,1.4 ... , Return (OK). Makro beenden. Die Tabelle sieht perfekt aus, genau so wie erwünscht. Das Resultat ist enttäuschend. Die Basic Procedur sagt mir (als Anfänger) nichts. Ich habe im Forum auch dies gesehen, aber auch das klappt nicht ...
[i]Sub Spaltenbreite_Zeilenhoehe()
Doc = ThisComponent
Sheet = Doc.Sheets(0)
Sheet.Columns(0).width = 5000
Sheet.rows(0).height = 5000[/i]
Hat jemand Lust und Laune mir bei diesem Problem behilflich zu sein ? Es ist nichts Dringendes, mein persönlicher Ehrgeiz ist geweckt und das MUSS doch machbar sein. Wo liegt überhaupt das Problem ? :?