def GetSelection(arg):
    """Получает выделенный текст..."""
    model = XSCRIPTCONTEXT.getDocument()
    selection = model.getCurrentController().getSelection().getByIndex(0).getString()
    model.Text.End.String = selection
    return None

from com.sun.star.beans import PropertyValue
from com.sun.star.io import XOutputStream
from unohelper import Base
tmp_html = '/tmp/ooomsg.html'
class OutputStream( Base, XOutputStream ):
    def __init__( self ):
        self.closed = 0
    def closeOutput(self):
        self.closed = 1
    def writeBytes( self, seq ):
        sys.stdout.write( seq.value )
    def flush( self ):
        pass
def toHtml():
    filterName = "HTML (StarWriter)"
    outProps = (
        PropertyValue( "FilterName" , 0, filterName , 0 ),
        PropertyValue( "Overwrite" , 0, True , 0 ),
        PropertyValue( "OutputStream", 0, OutputStream(), 0)
    )
    doc = XSCRIPTCONTEXT.getDocument()
    doc.storeToURL(u'file://' + tmp_html, outProps)
    os.system("thunderbird -compose body='%s'" % open(tmp_html, 'r').read())
    return None