Ошибка при объявлении текущей даты (vb для офиса)

Question

код моей формы такой:

Dim dtmTest As Date

dtmTest = DateValue(Now)

и ошибка: внешняя процедура недопустима.теперь оно выделяет слово

Answer 1

Просто используйте: dtmTest = Date()

Или, для даты и времени используйте:

dtmTest = Now()

Answer 2

Из вышесказанного кажется, что есть отсутствующая или неработающая ссылка. Посмотрите на ссылки (окно кода, инструменты-> ссылки) и проверьте, не отмечены ли какие-либо из них отсутствующими, если они есть, снимите галочку и найдите подходящую совпадающую ссылку. (http://support.microsoft.com/kb/283806)

Обычно лучше использовать позднюю привязку в производственной среде, поскольку библиотеки для различных продуктов Office, таких как Excel, которые часто упоминаются, различаются в зависимости от компьютера.

Если вы не найдете отсутствующую ссылку, вы можете попытаться удалить саму библиотеку VBA - она ​​не позволит вам, но по какой-то причине это, кажется, помогает.