Я использовал этот макрос в течение многих лет, чтобы назначить сегодняшнюю дату в качестве даты по умолчанию для поля, когда дата не выбрана. Я скачал версию 7.6.4 rev2, и она перестала работать.
REM Этот макрос записывает сегодняшнюю дату в поле даты myDateField
Sub writeDate
Dim today As New com.sun.star.util.Date
today.Month = Month( Now )
today.Day = Day( Now )
today.Year = Year( Now )
form = ThisComponent.DrawPage.Forms(0) ' first form
form.datReceivedDate.BoundField.UpdateDate( today )
End Sub
Ошибка в этой строке form = ThisComponent.DrawPage.Forms(0) ' первая форма
Основная ошибка выполнения. Свойство или метод не найдены DrawPage.