Функции Now и Date. Oшибка 'Не удаётся загрузить объект, поскольку к нему нет доступа на данном компьютере. Ошибка компиляции.'

При использовании функций Now и Date выдаётся ошибка 'Не удаётся загрузить объект, поскольку к нему нет доступа на данном компьютере. Ошибка компиляции.' Подскажите, пожалуйста, как её предотвратить и можно ли использовать какие-то другие функции.

Не проходит сонтекст:
dim mydate
mydate=Month(Date)

или

dim mydate
mydate=Month(Now)

Чем быстрее, тем лучше. Заранее, большое спасибо.

0

Во-первых, почему не продолжаешь свою первоначальную тему и засоряешь форум?

http://www.relib.com/forums/topic.asp?tp=1&id=716920

Во-вторых, где ты это все пытаешься проделать? Например, у меня все работает (VB):

Private Sub Command1_Click()
Dim mydate
mydate = Month(Date)
MsgBox 'mydate=' & mydate
End Sub

----
Ответ 'mydate=7'

0

Функцию Date и Now использую в Visul Basic for Application (Excel)

0

Единственное что приходит в голову:
поврежден, удален или недоступен файл с библиотечными функциями VBA

'C:Program FilesCommon FilesMicrosoft SharedVBAVba332.dll'

0