https://bugs.documentfoundation.org/show_bug.cgi?id=128316
--- Comment #18 from Heiko Tietze <[email protected]> ---
How about a solution per macro?
Option VBASupport 1
Sub Main
Dim oDoc As Object
Dim oText As Object
oDoc = ThisComponent
oText = oDoc.Text
oVCurs = oDoc.CurrentController.getViewCursor()
oTCurs = oText.createTextCursorByRange(oVCurs.getStart())
sToday = LCase( WeekdayName( WeekDay( Now() )))
oText.insertString( oTCurs, sToday, FALSE )
End Sub
--
You are receiving this mail because:
You are the assignee for the bug.
_______________________________________________
Libreoffice-bugs mailing list
[email protected]
https://lists.freedesktop.org/mailman/listinfo/libreoffice-bugs
