Домашняя страница Undo Do New Save Карта сайта Обратная связь Поиск по форуму
МИР MS EXCEL - Гость.xls

Вход

Регистрация

Напомнить пароль

 

= Мир MS Excel/Обновление Chart - Мир MS Excel

Старая форма входа
  • Страница 1 из 1
  • 1
Модератор форума: китин  
Мир MS Excel » Вопросы и решения » Вопросы по VBA » Обновление Chart (Макросы/Sub)
Обновление Chart
Inkubus Дата: Четверг, 03.06.2021, 10:49 | Сообщение № 1
Группа: Пользователи
Ранг: Прохожий
Сообщений: 3
Репутация: 2 ±
Замечаний: 20% ±

Добрый день.
У меня в ChartObjects изменяется количество точек ряда:

Worksheets(1).ChartObjects("Диаграмма 4").Chart.SeriesCollection(1).XValues = Worksheets(1).Range("H5:H" & kolalf + 4)
Worksheets(1).ChartObjects("Диаграмма 4").Chart.SeriesCollection(1).Values = Worksheets(1).Range("G5:G" & kolalf + 4)

После этого пользователь должен кое-что выбрать. Я делаю сообщение MsgBox:

AlfaOK = MsgBox("Какое Alfa желаете принять?" , vbOKCancel)

И вот когда это сообщение для выбора того или иного варианта висит, у меня график, у которого я перед этим изменил количество точек ряда, не обновился.
Он обновляется только после завершения макроса. А мне необходимо, чтобы при выборе пользователь видел обновленный график. Как можно добиться обновления графика при MsgBox ?
Пробовал вставлять перед MsgBox:

Worksheets(1).ChartObjects("Диаграмма 4").Chart.Refresh

и

ActiveWorkbook.RefreshAll

Не помогает. Как можно это исправить ?
Заранее спасибо!!!
 
Ответить
СообщениеДобрый день.
У меня в ChartObjects изменяется количество точек ряда:

Worksheets(1).ChartObjects("Диаграмма 4").Chart.SeriesCollection(1).XValues = Worksheets(1).Range("H5:H" & kolalf + 4)
Worksheets(1).ChartObjects("Диаграмма 4").Chart.SeriesCollection(1).Values = Worksheets(1).Range("G5:G" & kolalf + 4)

После этого пользователь должен кое-что выбрать. Я делаю сообщение MsgBox:

AlfaOK = MsgBox("Какое Alfa желаете принять?" , vbOKCancel)

И вот когда это сообщение для выбора того или иного варианта висит, у меня график, у которого я перед этим изменил количество точек ряда, не обновился.
Он обновляется только после завершения макроса. А мне необходимо, чтобы при выборе пользователь видел обновленный график. Как можно добиться обновления графика при MsgBox ?
Пробовал вставлять перед MsgBox:

Worksheets(1).ChartObjects("Диаграмма 4").Chart.Refresh

и

ActiveWorkbook.RefreshAll

Не помогает. Как можно это исправить ?
Заранее спасибо!!!

Автор - Inkubus
Дата добавления - 03.06.2021 в 10:49
Serge_007 Дата: Четверг, 03.06.2021, 10:59 | Сообщение № 2
Группа: Админы
Ранг: Местный житель
Сообщений: 14169
Репутация: 2344 ±
Замечаний: ±

Excel 2010


Яндекс-деньги:41001419691823 | WMR:126292472390
 
Ответить
СообщениеЗдравствуйте

http://www.excelworld.ru/forum/2-20-1
http://www.excelworld.ru/forum/13-2708-1

Автор - Serge_007
Дата добавления - 03.06.2021 в 10:59
Мир MS Excel » Вопросы и решения » Вопросы по VBA » Обновление Chart (Макросы/Sub)
  • Страница 1 из 1
  • 1
Поиск:

Яндекс цитирования Jobsora jooble
© 2010-2021 · Дизайн: MichaelCH · Хостинг от uCoz · При использовании материалов сайта, ссылка на www.excelworld.ru обязательна!