|
|
Регистрация Восстановить пароль |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Опции темы | Поиск в этой теме |
27.07.2016, 20:25 | #1 |
Пользователь
Регистрация: 17.07.2015
Сообщений: 20
|
макрос, который в книге из 30 листов трансформирует графики (по 5 идентичных на каждом листе). Меняет их размер, местоположение, размер шрифтов на 7 листе не работает
Здравствуйте!
Есть макрос, который в книге из 30 листов трансформирует графики (по 5 идентичных на каждом листе). Меняет их размер, местоположение, размер шрифтов. Работал нормально. Теперь на седьмом (?) листе стабильно спотыкается, выдает RunTime error "1004" Нельзя установить свойство FontStyle класса Font Дебагер говорит что ошибка здесь, в строке .FontStyle = "полужирный" ActiveChart.Axes(xlCategory).Select Selection.TickLabels.AutoScaleFont = True With Selection.TickLabels.Font .Name = "Arial Cyr" .FontStyle = "полужирный" .Size = 10 End With В чем проблема? ничего не понимаю) help me, а то хана... |
27.07.2016, 20:47 | #2 |
Старожил
Регистрация: 09.01.2008
Сообщений: 26,229
|
думаю, что скорее всего проблема на седьмом листе.
а конкретнее - выложите пример книги с листом, где макрос спотыкается, возможно, Вам помогут. |
27.07.2016, 21:46 | #3 |
Пользователь
Регистрация: 17.07.2015
Сообщений: 20
|
Забыл сказать - Excel2003. Спасибо за совет, однако случилось следующее. Я из книги, где у меня сборник макросов (и откуда я их и запускал), макрос, который трансформирует графики, перенес в книгу с графиками (чтобы все было в одном флаконе - аттач. В книге уже создано по 5 графиков на каждом листе, просто они друг на друге лежат). В результате седьмой лист благополучно обрабатывается, но где-то на 22-м вообще excel подвисает, никакого сообщения от дебагера и все. В такой ситуации даже не знаю, что спросить. Оказалось, что какие то манипуляции приводят к другому результату))) На что грешить?
|
29.07.2016, 11:41 | #4 |
Пользователь
Регистрация: 17.07.2015
Сообщений: 20
|
Может кто то даже запустил 3.xls? Хотя бы идеи - на что грешить?
|
29.07.2016, 11:46 | #5 |
Новичок
СтарожилДжуниор
Регистрация: 05.02.2008
Сообщений: 9,487
|
замените:
.FontStyle = "полужирный" на .bold = True
Программисты - это люди, решающие проблемы, о существовании которых Вы не подозревали, методами, которых Вы не понимаете
|
29.07.2016, 13:04 | #6 |
2 the Nation Glory
Старожил
Регистрация: 27.05.2014
Сообщений: 3,289
|
Запускал. 2016офис. Кроме как много окошек msgbox, с именем листа, ничего не вылетало
Кто умер, но не забыт, тот бессмертен.
Лао-Цзы. |
29.07.2016, 14:54 | #7 |
Пользователь
Регистрация: 17.07.2015
Сообщений: 20
|
To IgorGO
замена .FontStyle = "полужирный" на .bold = True принципиально ничего не изменило, стала вылетать ошибка в строке .Size=10 rem: Как в первом, так и во втором случает это были не первые по тексту программы строки Спасибо Aleksandr H. Много msgbox это просто для контроля. было подозрение, что дело в версии оффиса, что-то видимо у меня в 2003 кривое? Теперь уже просто хочется не ошибку найти, которой видимо нет, а просто хотя бы формально понять причину) или это танцы с бубном? один макрос создает 30 листов с данными - видимо они идентичны (?) по всему, второй макрос по этим данный рисует графики - тоже идентичны, макрос то просто в цикле крутится, перебирая листы. Почему третий макрос, который трансформирует графики (соответственно также перебирает листы, которые видимо идентичны) первые листы проходит нормально, а на 7 (?) тупит? И дело не в данных на 7 листе, таких книг по 30 листов много разных, везде седьмой лист волшебный) |
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
создание компонента, который с течением времени двигается, меняет цвет и размер | Kseniya111 | Компоненты Delphi | 0 | 16.01.2014 20:55 |
работа на одном листе с данными из LISTBOX, данные на другом листе | konstantin1990 | Microsoft Office Excel | 3 | 22.07.2013 15:15 |
Задать местоположение диаграммы на листе | 1134 | Microsoft Office Excel | 0 | 02.12.2010 13:18 |
Cheсkbox на листе- имзенение шрифта (размер и т.п.) | Graers | Microsoft Office Excel | 4 | 25.11.2009 15:51 |
Заголовок на каждом листе печати | JarVal | HTML и CSS | 6 | 13.05.2008 16:36 |