На первой же строчке( "HeadDate = MainForm.DTPicker1.Value" ) вылетает ошибка:

Compile error:

Can't find project or library

Можно ли какнибудь решить эту проблему?

Вот сам код:

Private Sub OK_Click()
HeadDate = MainForm.DTPicker1.Value
EndDate = MainForm.DTPicker2.Value
Sheets(1).Range("A3").Value = "за период: c " + Trim(HeadDate) + " по " + Trim(EndDate)
Directory = Sheets("Config").Range("B2").Value
Filename = Sheets("Config").Range("B3").Value
Open Filename For Output Shared As #1
Write #1, "Период для просчета:"
Write #1,
Write #1, НачДата
Write #1, КонДата
Close #1
MainForm.Hide
LoadMatrix.Загрузка
End Sub