[Solved] How to insert personalized fields with hotkeys?

[JRMAS]

I use a hotkey to put the date, but I need it with the dd/mm/yyyy format, instead of dd/mm/yy.

Also, I also need to make it in a way that there is no grey background in the field. I know that the background will not appear on a PDF or printed, but I need it without the grey shade for EVERYONE, even for people who open the document with another computer.

[Villeroy]

You are not using OOo 3.1 on WIndows 7, do you?

[JRMAS]

You are not using OOo 3.1 on WIndows 7, do you?

Sorry, 4.1

[Villeroy]

Anyway, see chapter 3 on "AutoText" in the Writer guide: https://wiki.openoffice.org/wiki/Docume ... e_Chapters

[JeJe]

If its a fixed date, does it have to be a field? You can insert the date as text in your chosen format with a simple macro - and obviously there will be no field shading.

Code: Select all

Sub insertDate
vc =thiscomponent.currentcontroller.viewcursor
vc.string = format(date,"dd/mm/yyyy")
vc.collapsetoend
End Sub

[JeJe]

The macro recorder gives the following macro for inserting a date field in the format you want.

Code: Select all

sub insertDateField
rem ----------------------------------------------------------------------
rem define variables
dim document   as object
dim dispatcher as object
rem ----------------------------------------------------------------------
rem get access to the document
document   = ThisComponent.CurrentController.Frame
dispatcher = createUnoService("com.sun.star.frame.DispatchHelper")

rem ----------------------------------------------------------------------
dim args1(5) as new com.sun.star.beans.PropertyValue
args1(0).Name = "Type"
args1(0).Value = 0
args1(1).Name = "SubType"
args1(1).Value = 0
args1(2).Name = "Name"
args1(2).Value = ""
args1(3).Name = "Content"
args1(3).Value = "0"
args1(4).Name = "Format"
args1(4).Value = 8036
args1(5).Name = "Separator"
args1(5).Value = " "

dispatcher.executeDispatch(document, ".uno:InsertField", "", 0, args1())


end sub

[JeJe]

You can hide the grey field shading by setting the background color to white (assuming a white page background).

[JRMAS]

Thanks to everyone! It worked!