Поиск  Пользователи  Правила  Войти
Форумы "Планета Excel" » Вопросы по Microsoft Excel
Страницы: 1
RSS
Не работают макросы на некотрых ПК
 
#1
24.12.2014 13:53:29
Добрый день столкнулся с такой проблемой:

В отделе 14 компьютеров, и по непонятной причине перестали работать макросы. Сначала на большинстве компьютеров стали не активны кнопки Activx на листах. Данную проблему исправили в helpdesk. Спустя некоторое время перестал работать сам код. Если создать новый файл xlsm и написать какой либо макрос он корректно работает, но спустя n-ое кол-во времени(1 день - неделя), он начинает выдавать ошибки, хотя код не менялся и все условия корректные. Проблема не наблюдается только на одном компьютере. Переустанавливали office - не помогло. Подскажите может быть кто то сталкивался с такой проблемой?

Вот к примеру элементарный макрос который  не может не работать, но он выдает ошибку:
Код
?
1
2
3
4
Sub re ()
i = Thisworkbook.Sheets(1).Cells(1,1).End(xlDown).Row
Cells(i,1).Select
]End Sub

Ошибка:
Run-time error '32809'
Application-defined or odject-defined error
 
 
 
#2
24.12.2014 13:58:00
Читаем здесь
 
 
 
#3
24.12.2014 14:03:51
Цитата
Вот к примеру элементарный макрос который не может не работать
неужели...
еще как может не работать

3 варианта, в которых ваш макрос выдаст ошибку:
1) макрос находится в надстройке (нет ни одного файла с видимыми листами)
2) макрос запущен из одного файла, а открыт (активен) другой, где всего 65 тыс строк на листе
т.к. Cells(i,1).Select относится к активному листу, - совсем не факт что им будет Thisworkbook.Sheets(1)
3) глобальная переменная i объявлена типа Integer (или другого типа, несовместимого с большими целыми числами)
----------
PS: но ошибка, появляющаяся у вас, не относится к описанным мной вариантам
(см. решение по ссылке Юрия)
Изменено: Игорь - 24.12.2014 19:57:46
Надстройки для Excel  Парсинг сайтов  Мониторинг цен конкурентов
 
 
 
#4
24.12.2014 14:35:15
Цитата
Юрий М пишет: Читаем  здесь
В данный момент элементы activex работают, просто я написал с чего проблемы начались. Проблемы с кодом. Макросы которые работали на протяжении нескольких лет, вдруг перестали работать. В коде и в структурах книг ничего не менялось.
 
 
 
#5
24.12.2014 14:37:06
Макросы перестали работать с кнопок? Из редактора работают?
 
 
 
#6
24.12.2014 14:52:02
Перестали работать с кнопок,но  уже все ок. Проблема не в этом.
Не работает код, ругается на каждую строчку. Все работает только на одном компьютере. На остальных нет. В коде точно нет ошибки, он работал 2 года и не менялся.
 
 
 
#7
24.12.2014 15:14:48
Даже самый простой вопрос можно превратить в огромную проблему. Достаточно не уметь формулировать вопросы...
 
 
 
#8
24.12.2014 15:38:47
Не помогло, стояли указанные в статье 4 библиотеки. Макрос тоже не помог.  
 
 
 
#9
24.12.2014 16:12:27
Вообще сама ошибка это как раз вариант из обновлений. Работает на одном ПК. На нем были обновления, их исправили и теперь на всех ПК, на которых обновлений не было эта ошибка.
Даже самый простой вопрос можно превратить в огромную проблему. Достаточно не уметь формулировать вопросы...
 
 
 
#10
25.12.2014 10:20:58
Переустановили office, удалили все обновления - не помогло.

Сейчас заметил тенденцию где появляются ошибки:
Такое ощущение что vba перестал "понимать"  названия листов, в любом написании Sheets("Лист1" ;)  или Sheets(1) итп. Не работают именно те строчки в которых есть ссылка на лист. Указываемые листы в книгах существуют.
 
 
 
#11
25.12.2014 10:45:40
было абсолютно то же самое. при наличие в книге кнопок вылетала ошибка на строке с  Thisworkbook.Sheets
Решение проблемы Вам уже предложил по ссылке Юрий М
 
 
 
#12
25.12.2014 17:04:30
Цитата
yoozhik пишет: было абсолютно то же самое. при наличие в книге кнопок вылетала ошибка на строке с Thisworkbook.Sheets  
Решение проблемы Вам уже предложил по ссылке Юрий М
Да действительно, не возможно сослаться только на те листы на которых есть кнопка activex. Если удаляю кнопку то exel вылетает
Но данный батник не помог:
Скрытый текст
И когда захожу напрямую в папку C:\Users\%USERNAME%\AppData\Roaming\Microsoft\Forms\ там нет файлов с расширением EXD, только один файл с расширением .box

Для того чтобы данный файл(bat) корректно работал нужно быть админом на своей машине?
Изменено: U_M0KRH - 25.12.2014 20:04:16
 
 
 
#13
25.12.2014 17:18:08
Удалил все файлы в ручную по папкам указанным в батнике

Такой вопрос, в папке AppData\Local\Temp\Excel8.0\ есть файл MSForms.exd   , когда запускаю книгу он снова появляется, так и должно быть?
 
 
 
#14
25.12.2014 17:23:24
Цитата
чтобы данный файл(bat) корректно работал нужно быть админом на своей машине?
думаю, что да
т.к. идёт обращение к папке %APPDATA%

правой кнопкой на батнике - запуск от имени администратора
Надстройки для Excel  Парсинг сайтов  Мониторинг цен конкурентов
 
 
 
#15
25.12.2014 17:40:28
Запустили под админской учеткой, не помогло.

Есть какой то способ  программно удалить кнопку с листа?
 
 
 
#16
25.12.2014 18:11:56
Проверил все листы в книгах, на других листах где есть кнопки activex работают строчки со ссылкой на лист   ( Sheets("Лист1").Select ). Не работает только один лист, с кнопкой там следующая ситуация:  Раньше она имела одно название(BtnClk), но если  посмотреть ее свойства теперь название другое (Commandbutton7). Если изменить название на старое выходит ошибка  "Ambiguos name detected". И если просмотреть объекты на этом листе кнопка BtnClk существует но не определена
Все кнопки "As CommandButton"  а это кнопка "As <unnamed> "




Или данная проблема тоже должна решаться описанными процедурами?
 
 
 
#17
25.12.2014 18:43:51
у меня никогда нет никаких проблем с кнопками запуска макросов

почему?
потому что я столкнулся с этой проблемой много лет назад (когда назначенные ActiveX кнопкам макросы слетали),
и с тех пор в качестве кнопок использую только автофигуры:
http://excelvba.ru/code/Buttons
(автофигуре, кстати, проще назначить макрос)

и всё стабильно работает во всех версиях Excel на всех компах
Надстройки для Excel  Парсинг сайтов  Мониторинг цен конкурентов
 
 
 
#18
25.12.2014 19:34:29
Попробуйте вместо Sheets(i) использовать программное имя листа.
There is no knowledge that is not power
 
 
 
#19
25.12.2014 20:25:27
Цитата
Игорь пишет: в качестве кнопок использую только автофигуры
Поступаю аналогично. Кнопки ActiveX и до этого не всегда стабильно срабатывали: бывало, что приходилось дважды щёлкать по ней...
 
 
 
#20
25.12.2014 20:47:15
Цитата
Юрий М пишет: Кнопки ActiveX и до этого не всегда стабильно срабатывали
Ага. Я давно уже в своей статье
писал, что элементы ActiveX на листе считаются устаревшими и не рекомендуются к использованию. Поэтому сам их не использую очень давно. И другим не советую.
Даже самый простой вопрос можно превратить в огромную проблему. Достаточно не уметь формулировать вопросы...
 
 
 
#21
26.12.2014 09:03:45
Спасибо за совет, больше не буду пользоваться кнопками.
Но все таки, можно как то удалить эту кнопку с таким 'глюком'?
 
 
 
#22
26.12.2014 10:32:31
А что, в режиме конструктора нет возможности удалить саму кнопку?
 
 
 
#23
26.12.2014 13:45:43
Цитата
Юрий М пишет: А что, в режиме конструктора нет возможности удалить саму кнопку
При попытке удалить эту кнопку или весь лист exel вылетает
 
 
 
#24
26.12.2014 13:50:08
Давайте я попробую удалить)) Почта в профиле.
 
 
 
#25
26.12.2014 15:55:38
Вот файл, там на 2ух листах кнопки, которые не получается удалить
 
 
 
#26
26.12.2014 16:03:21
Можно удалить только после копирования (не переноса!) листа в другую книгу.
Похоже на сбой самой книги.
 
 
 
#27
26.12.2014 18:45:03
У меня удалились без проблем (получил файл по почте)
 
 
 
#28
27.12.2014 01:00:59
Всем спасибо за помощь, больше никогда  не буду пользоваться кнопками этого типа :)
 
 
 
Страницы: 1
Читают тему
Наверх
Loading...