"Can't find project or library."

[Starik]

Привет всем!
Ещё одна проблема, программа не на всех компах работает, ругается "Can't find project or library". Почему не находит проект или библиотеку? Какую библиотеку? У меня стоит операционка ХР и W98, программу на VBA писал в XP, у меня работает везде. У других стоит операционка W98-не работает. Уточняю-программа работает, но когда хочешь изменить данные, на форме нажимаешь бутон, тогда выдаётся сообщение: "Can't find project or library".

[Vitaly1]

Нельзя пококретней, что отрабатывается после нажатия кнопки

[Starik]

После нажатия кнопки идет запись в ячейку из TextBox, выдает"Can't find project or library" и засвечивает Str$(5) в строке: Sheets(...).Range("c"+LTrim$(Str(5)))=......

[Vitaly1]

Известный глюк, к сожалекнию в даном случаи нашел только один способ борьбы с ним:

1)Cделать новую книгу в Excel.
2)Перенести в нее код программы
3) сделать заного элементы управления.
4) Правленный проект отнести домой и работать именно с ним, что бы не было глюков впоследствии.

После этого стандартные функции обработки строк начинают работать.

П.С.
Почему, и что собственно меняется в excel файле при переносе его на другую машину, сказать трудно. Но явно что-то меняется.

[Tony]

Вообще странная штука... раньше такого не было.... свои проекты постоянно давал юзать людям... А тут в какой то момент хоп! и все... Но тем не менее смог побить как и сказал Vitaly1!

[Starik]

А может это связано быть с разными офисами? (Писал программу в ХР).
На машинах, где стоит ХР - программа работает, а где 2000 - выдает ошибку?

[Tony]

Да врятли... у меня винт умер... я другой.... на него винду и офис с того же дистриба что и раньше... фактически изменился только винт... но его винить как то совесть не позволяет....

[Vitaly1]

Нет не сверсиями связано, я думаю, что связанно с тем, что не совсем полный excel на компьютере установлен.

[Starik]

Хорошая идея - офис установлен не полностью, это вполне реально, т.к. работает там, где я сам ставил офис. Ща попробую.

[Tony]

Ну я не знаю на сколько верно понятие полности! Я когда боролся с проблемой с тавил вообще все что с офисом связанно! естественно из его же дистриба... ничего сверху... так собственно и раньше ниего мудрого не стояло... хотя раньше стоял поный....

[Starik]

Минут через 15 всё станет ясно, насчет полноты. Если результат окажется отрицательным, мне то что делать? Переписать все в 2000 офисе или что?

[Tony]

Кроме варианта то что сказал Vitaly1 решения пока не нашел... увы.... много слишком пришлось переносить.... Но с другой стороны работает ведь!

[Starik]

На соседнюю машину установил полный офис2000 - результат отрицательный. Снова выдаёт "Can't find project or library." и высвечивает Str$(5) в строке: Sheets("2006g").Range("c" + LTrim$(Str$(5))) = Редактор.TextBox1.Text

[Tony]

Ну что я могу сказать.... переноси в ручную... в принципе не сложно! но попробовать надо обязательно!

[Starik]

Это последний вариант.
Может кто знает какой библиотеки не хватает офису2000, которая существует в ХР офисе, чтобы заработала строка: Sheets("2006g").Range("c" + LTrim$(Str$(5))) =Редактор.TextBox1.Text?
Высвечивает Str$(5).
Если есть такая, то как её запихнуть 2000 офис?

[Tony]

хм... я попробовал строку эту... работает... как раз в 2000... попробуй все таки перенести проект из одного файла в другой....

[Starik]

Сегодня обязательно попробую.

[corgi]

попробуй прописать так
strings.LTrim$ и аналогично strings.Str$

[Starik]

Спасибо за помощь.
Пришлось всё переносить. Заработало.

[Vitaly1]

Тут решение проблемы:

http://bbs.vbstreets.ru/viewtopic.php?p=19184#19184

[Starik]

Огромное спасибо!