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

Вход

Регистрация

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

 

= Мир MS Excel/Замораживание экрана при создании презентации из экселя. - Мир MS Excel

Старая форма входа
  • Страница 1 из 1
  • 1
Модератор форума: _Boroda_, китин  
Замораживание экрана при создании презентации из экселя.
Паштет Дата: Пятница, 05.06.2020, 13:54 | Сообщение № 1
Группа: Проверенные
Ранг: Форумчанин
Сообщений: 159
Репутация: 7 ±
Замечаний: 0% ±

Excel 2010
Сделал макрос, который по данным экселя делает полностью презентацию на 32 слайда.
Но если когда идет построение графиков в экселе [vba]
Код
Application.ScreenUpdating = False
[/vba] работает. Но как только он переходит к открытию презентации, то все дальнейшие действия становятся видимыми. А так хочется, чтобы было все красиво :angel:
Попробовал изобразить следующее:
[vba]
Код
Dim objPPApp As Object, objPP As Object
       Set objPPApp = CreateObject("PowerPoint.Application")
       namefile = Sheets("1").Cells(10, 2)
        Set objPP = objPPApp.Presentations.Open(namefile)
objPPApp.Application.ScreenUpdating = False
...
[/vba]
Но был благополучно послан :(
Можно как-то заморозить экран?


Сообщение отредактировал Паштет - Пятница, 05.06.2020, 13:55
 
Ответить
СообщениеСделал макрос, который по данным экселя делает полностью презентацию на 32 слайда.
Но если когда идет построение графиков в экселе [vba]
Код
Application.ScreenUpdating = False
[/vba] работает. Но как только он переходит к открытию презентации, то все дальнейшие действия становятся видимыми. А так хочется, чтобы было все красиво :angel:
Попробовал изобразить следующее:
[vba]
Код
Dim objPPApp As Object, objPP As Object
       Set objPPApp = CreateObject("PowerPoint.Application")
       namefile = Sheets("1").Cells(10, 2)
        Set objPP = objPPApp.Presentations.Open(namefile)
objPPApp.Application.ScreenUpdating = False
...
[/vba]
Но был благополучно послан :(
Можно как-то заморозить экран?

Автор - Паштет
Дата добавления - 05.06.2020 в 13:54
Pelena Дата: Пятница, 05.06.2020, 18:33 | Сообщение № 2
Группа: Админы
Ранг: Местный житель
Сообщений: 19403
Репутация: 4555 ±
Замечаний: ±

Excel 365 & Mac Excel
А так не пробовали
[vba]
Код
objPPApp.Visible=False
[/vba]
а в конце
[vba]
Код
objPPApp.Visible=True
[/vba]


"Черт возьми, Холмс! Но как??!!"
Ю-money 41001765434816
 
Ответить
СообщениеА так не пробовали
[vba]
Код
objPPApp.Visible=False
[/vba]
а в конце
[vba]
Код
objPPApp.Visible=True
[/vba]

Автор - Pelena
Дата добавления - 05.06.2020 в 18:33
Паштет Дата: Суббота, 06.06.2020, 18:10 | Сообщение № 3
Группа: Проверенные
Ранг: Форумчанин
Сообщений: 159
Репутация: 7 ±
Замечаний: 0% ±

Excel 2010
Pelena, ругается. :(
 
Ответить
СообщениеPelena, ругается. :(

Автор - Паштет
Дата добавления - 06.06.2020 в 18:10
Pelena Дата: Суббота, 06.06.2020, 19:06 | Сообщение № 4
Группа: Админы
Ранг: Местный житель
Сообщений: 19403
Репутация: 4555 ±
Замечаний: ±

Excel 365 & Mac Excel
Вы бы приложили какой-нибудь пример, а то чтобы проверить, надо создать файл excel, файл презентации, дописать макрос...


"Черт возьми, Холмс! Но как??!!"
Ю-money 41001765434816
 
Ответить
СообщениеВы бы приложили какой-нибудь пример, а то чтобы проверить, надо создать файл excel, файл презентации, дописать макрос...

Автор - Pelena
Дата добавления - 06.06.2020 в 19:06
  • Страница 1 из 1
  • 1
Поиск:

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