My code goes failure always when I try to get Date from Date Field
Code: Select all
dim form as object
form=ThisComponent.Sheets.getByName("Sheet").DrawPage.Forms.getByIndex(0)
dim MyDate as object
MyDate=form.getByName("Date Field 1")
dim d as long
d=MyDate.Date REM Incorrect property value
MsgBox(d)