CALC: Automatischer Zeilenumbruch [gelöst]

[kuraschima]

Hallo,
im grunde bescheid der betreff schon mein ganzen problem.
ich möchte per makro für eine zeile eines calc dokumentes den automatischen zeilenumbruch einstellen.
im internet bin ich leider nicht fündig geworden

Gruß


Moderation,4: verschoben in BASIC-Unterbereich, wo alle Makro-Fragen hin gehören; Betreff angepasst

[F3K Total]

Hi,
dies Makro funktioniert für die Zeile in der der Cursor steht:

Code: Alles auswählen

Sub S_automatischer_Zeilenumbruch
    osel = thiscomponent.currentselection
    nRow = osel.Rangeaddress.StartRow
    osheet = thiscomponent.currentcontroller.ActiveSheet
    ocursor = osheet.createcursor
    ocursor.gotoendofusedarea(false)
    nEndcolumn = ocursor.Rangeaddress.Endcolumn
    oRow = osheet.rows(nRow)
    for i = 0 to nEndcolumn
        ocell = orow.getCellByPosition(i,0)
        ocell.IsTextWrapped = true
    next i
End Sub

Viel Erfolg,
Gruß R

[kuraschima]

super vielen dank!