writeDate 매크로를 수년간 사용한 후 버전 7.6.4 rev2에서 작동하지 않습니다.

writeDate 매크로를 수년간 사용한 후 버전 7.6.4 rev2에서 작동하지 않습니다.

나는 날짜가 선택되지 않은 경우 오늘 날짜를 필드의 기본 날짜로 할당하기 위해 수년 동안 이 매크로를 사용해 왔습니다. 버전 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.

관련 정보