Compile error can't find project or library

Вот собственно такая ошибка "can't find project or library". Компилятор останавливается на второй строчке:
Function ReadTXTfile(ByVal filename As String) As String
 Set fso = CreateObject("scripting.filesystemobject")
 Set ts = fso.OpenTextFile(filename, 1, True): ReadTXTfile = ts.ReadAll: ts.Close
 Set ts = Nothing: Set fso = Nothing
End Function
В References включена библиотека Microsoft Scripting Runtime. Scrrun.dll зарегестрирована На компе стоит свежая установка лицензионной windows 7 home and buisnes и лицензионный office2010Помогите пожалуйста, уже не знаю какие варианты пробовать.
2 ответа

Вообще-то, все верно в коде, ошибка вылетатть не должна.Желательно ещё первой строкой добавить On Error Resume Next на случай, если считываемый файл будет пустой.Ищите проблему в другом месте. Или прикрепите файл Excel с кодом, вызывающим ошибку. (возможно, где-то переменные неправильно объявлены)
В References включена библиотека Microsoft Scripting Runtime
это совсем необязательно