Libre office writer宏插入日期和日期+ n天

Question

这里有一个类似的问题，但使用计算结果，但是回答woul似乎是具体的计算方法。我想在libre writer中编写一个宏，插入当前日期，逗号和空格，然后是当前日期+ 2天，逗号和空格，然后是当前日期+ 14天。

记录日期插入的marco提供以下内容但是老实说我不知道​​如何解释此代码并且可以在网上找到一些帮助。

sub recall_period
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 ----------------------------------------------------------------------
dispatcher.executeDispatch(document, ".uno:InsertDateField", "", 0, Array())


end sub

感谢任何帮助或想法。干杯 达米安

Answer 1

Andrew Pitonyak's macro document有很多使用日期的例子。

• 第7.7.1节显示了将日期字段插入Writer文档的示例。
• 第7.7.2节还说明了如何将10天添加到日期。
• 清单5.100给出了一个向日期添加任何金额的功能。
• 第6.7节显示了使用Now()获取当前日期的示例。

注意：录制宏通常不是学习基本编程的好方法，因为它记录了丑陋的调度程序调用，而不是更优雅的API代码。