Поиск  Пользователи  Правила  Войти
Форумы "Планета Excel" » Вопросы по Microsoft Excel
Страницы: 1
RSS
Макрос для построения гистограммы при помощи Анализа данных
 
#1
12.05.2014 17:22:11
Здравствуйте!
Записала при помощи макрорекордера макрос для построения гистограммы при помощи надстройки "Анализ данных". Когда начинаю воспроизводить макрос еще раз - вылетает ошибка 1004. Как ее обойти? Спасибо!

============================================================­====================================================
Через 4 года наткнулась снова на эту тему. Решение простое: нужно просто подключить надстройки "Пакет анализа" и "Пакет анализа VBA"
Изменено: Oda412 - 23.06.2020 13:02:42
 
 
 
#2
21.05.2016 22:14:46
может, файла какого-то не хватает..
 
 
 
#3
21.05.2016 22:36:53
Код
?
1
2
     Application.Run "ATPVBAEN.XLA!Histogram", ActiveSheet.Range("$A$2:$A$21") _
        , "", ActiveSheet.Range("$B$2:$B$7"), False, False, True, False
Надстройка .xla
 
 
 
#4
21.05.2016 22:55:29
Kuzmich, все равно вылетает ошибка 1004 :(
"Не удалось найти "ATPVBAEN.XLA". Проверьте правильность ввода имени и расположения файла..."
Изменено: Oda412 - 21.05.2016 22:57:20
 
 
 
#5
21.05.2016 22:57:38
У меня в 2003 Excel на листе4 построил диаграмму
Посмотрите в окне VBAProject есть надстройка  ATPVBAEN.XLA
Изменено: Kuzmich - 21.05.2016 23:03:38
 
 
 
#6
21.05.2016 23:07:10
Цитата
Oda412 написал:
Записала при помощи макрорекордера макрос для построения гистограммы
У меня (2010) Ваш макрос сработал.
 
 
 
#7
22.05.2016 07:13:53
Цитата
Oda412 написал: "Не удалось найти "ATPVBAEN.XLA".
может библиотеку надо подключить? последовательность действий, как здесь для Solver... только путь библиотеки C:\Program Files\Microsoft Office\Office14\Library\Analysis\ATPVBAEN.xla (для xl2010)
p.s. если и включать библиотеку программно, то, наверно, можно тоже как-то по примеру обращения к библиотеке (на примере solver) ... но это лишь догадка, кода нет под рукой, - не нужен был ещё никогда...
Изменено: JeyCi - 22.05.2016 07:21:27
чтобы не гадать на кофейной гуще, кто вам отвечает и после этого не совершать кучу ошибок - обратитесь к собеседнику на ВЫ - ответ на ваш вопрос получите - а остальное вас не касается (п.п.п. на форумах)
 
 
 
#8
22.05.2016 10:29:10
в 2013 называется ATPVBAEN.XLAM
 
 
 
#9
22.05.2016 11:32:23
Oda412,
В надстройках приложения подключите Пакет анализа VBA, проверила у себя, как только сняла галки, выдало ошибку 1004 при запуске макроса, до этого все работало. Excel 2010 В библиотеке называется ATPVBAEN.XLAM
 
 
 
#10
22.05.2016 11:40:42
Если при записи рекордером всё работало, можно сделать вывод, что пакет подключен?
 
 
 
#11
22.05.2016 12:14:08
Юрий М, авторекодер прекрасно пишет при отключенной надстройке ATPVBAEN.XLAM, ему достаточно чтобы был доступ к надстройке "Пакет анализа" в панели инструментов, в библиотеке ANALIS32.XLL. Макрос потом ее не запускает. Только что проверила еще раз.
Очень часто сталкиваюсь с подобными проблемами настроек у своих клиентов, переносят мои модели с машины на машину, сбиваются настройки, итерационные расчеты и т.д, потом макросы считают неверно. Если сразу в нотации все нужные галки не перечислишь в приложении, тут же аларм у людей:)
 
 
 
#12
22.05.2016 12:41:11
Цитата
Gata написал:
авторекодер прекрасно пишет при отключенной надстройке
Не знал, так как не записывал подобное ))
 
 
 
#13
22.05.2016 19:09:27
Kuzmich,
Цитата
Kuzmich написал:
Посмотрите в окне VBAProject есть надстройка  ATPVBAEN.XLA
в проекте видна надстройка  
 
 
 
#14
22.05.2016 19:11:49
Цитата
JeyCi написал:
может библиотеку надо подключить? последовательность действий, как  здесь для Solver ... только путь библиотеки C:\Program Files\Microsoft Office\Office14\Library\Analysis\ATPVBAEN.xla (для xl2010)
JeyCi, я пробовала, но когда добралась до папки Analisis, она оказалась пуста.. Как такое может быть, если вручную все строится))
 
 
 
#15
22.05.2016 21:50:02
Цитата
Oda412 написал: но когда добралась до папки Analisis, она оказалась пуста
в окне выбора файла - смените расширение (по умолчанию - отображены только файлы с др. расширениями, которых нет)
Цитата
Oda412 написал: Как такое может быть, если вручную все строится))
библиотека включается в vba (как в линк из №7)... если не поможет, значит что-то ещё
чтобы не гадать на кофейной гуще, кто вам отвечает и после этого не совершать кучу ошибок - обратитесь к собеседнику на ВЫ - ответ на ваш вопрос получите - а остальное вас не касается (п.п.п. на форумах)
 
 
 
Страницы: 1
Читают тему
Loading...