Hallo Andreas,
> 
> in OOo benutzte ich folgendes (Ereignis-)Makro zum Eliminieren des
> Postfixes in der Titelzeile.
> 
> Sub TitelPostfixAusblenden
>   For i = 0 to Stardesktop.Frames.count-1
>   titel = stardesktop.Frames(i).title
>   If right(titel,24) = " - OpenOffice.org Writer" Then
>   stardesktop.Frames(i).title = left(titel,(len(titel)-24))
>   End If
>   Next i
> End sub

" - OpenOffice.org Writer" ist 24 Zeichen lang
> 
> In LibreOffice 3.3 funktioniert
> 
> Sub TitelPostfixAusblenden
>   For i = 0 to Stardesktop.Frames.count-1
>   titel = stardesktop.Frames(i).title
>   If right(titel,24) = " - LibreOffice Writer" Then
>   stardesktop.Frames(i).title = left(titel,(len(titel)-24))
>   End If
>   Next i
> End sub

" - LibreOffice Writer" ist 21 Zeichen lang

Die Bedingung wird also nie erfüllt.

Gruß

Robert

-- 
Informationen zur Abmeldung: E-Mail an [email protected]
Listenarchiv: http://listarchives.libreoffice.org/de/users/
Alle E-Mails an diese Liste werden unlöschbar öffentlich archiviert

Antwort per Email an