Наши проекты:
Журнал · Discuz!ML · Wiki · DRKB · Помощь проекту |
||
ПРАВИЛА | FAQ | Помощь | Поиск | Участники | Календарь | Избранное | RSS |
[54.147.123.159] |
|
Сообщ.
#1
,
|
|
|
Добрый день!
Подскажите как в VBA можно плавно снижать звук на заданном этапе выполнения программы. В частности мне надо, чтобы звук в слайдщоу Power Point плавно "затух" на последних трех слайдах Что-нибудь в таком роде (вставить операторы реализующие плавное затухание). With ActivePresentation.SlideShowSettings .ShowType = ppShowTypeSpeaker .LoopUntilStopped = msoFalse .ShowWithNarration = msoTrue .ShowWithAnimation = msoTrue .RangeType = ppShowAll .AdvanceMode = ppSlideShowUseSlideTimings .PointerColor.RGB = RGB(Red:=255, Green:=0, Blue:=0) .StartingSlide = 25 ......... .EndingSlide = 28 End With Или может еще как-то. Изначально просто в редакторе на (Audacity) на нужном интервале времени устанавливал затухание. Но во-первых это трудоемко (для каждой презентации устанавливать), а во-вторых (и это главное) на других компьютерах происходит рассогласование звукового сопровождения слайдшоу. |
Сообщ.
#2
,
|
|
|
Я крутил в таймере отнимая по одному делению, получалось плавно
Прикреплённый файлfader_20180401121258.zip (12,83 Кбайт, скачиваний: 109) |