Die Tastenfolge: 27.12 enter

ok-war ein Scherz, dafür gibt es eine Erweiterung:http://extensions.services.openoffice.o ... /DateTime2
Gruß Karo
Moderator: Moderatoren
Das ist geklärt Aber wie bekomme ich das Datum in das Format "Tag,Monat ,Jahr"?Aber wie kann ich sie nu nUtzen?
Welche Kombination muß ich nun benutzen?
Code: Alles auswählen
Sub Datum_Feld
sDateTime_setAs = "val"
sDateTime_setWhat = "DAT"
DateTime_Init
DateTime_action
End Sub
Code: Alles auswählen
function Datum()
oZell = thisComponent.getcurrentSelection()
if not oZell.supportsService("com.sun.star.sheet.SheetCell") then
msgbox "Bitte nur eine Zelle auswählen", 48, "Fehler!"
exit function
end if
oZell.value = now()
'oZell.NumberFormat = 30 'Format 13.05.06
'oZell.NumberFormat = 31 'Format Sa 13.Mai 06
'oZell.NumberFormat = 32 'Format 05.06
'oZell.NumberFormat = 33 'Format 13.Mai
'oZell.NumberFormat = 34 'Format Mai
'oZell.NumberFormat = 35 'Format 2. Quartal 06
oZell.NumberFormat = 36 'Format 13.05.2006
'oZell.NumberFormat = 38 'Format Samstag, 13. Mai 2006
'oZell.NumberFormat = 39 'Format 13. Mai 06
end function
Füge den Code wie in der Anleitung beschrieben unter "Meine Makros" ein.Neuer Nutzer hat geschrieben:Also ein komplett neues Makro erstellen?