Гость
Войти | Профиль | Очистить
Целевая тема:
Создать новую тему:
Автор:
Действия ...
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Эффект мигающей фигуры в PowerPoint / 3 сообщений из 3, страница 1 из 1
24.09.2007, 08:30:13
    #34820460
jjj676
jjj676
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Эффект мигающей фигуры в PowerPoint
Здравствуйте, Подскажите пожалуйста как сделать в PowerPoint так что бы вставленный рисунок (например с именем Pic1.jpg) мигал. Я так понимаю тут нужен макрос или можно как то без этого обойтись?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
26.09.2007, 09:25:27
    #34826488
LETME
LETME
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Эффект мигающей фигуры в PowerPoint
Я бы просто заанимировал рисунок и всё, думаю - самый простой вариант..
Среди стандартных средств ничего не нашёл - все молчат, значит и правда ничего нет.
Понятно, что можно написать простенький код, что-то типа этого...

Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
Private Declare Sub Sleep Lib "kernel32.dll" (ByVal dwMilliseconds As Long)

Private Sub СОБЫТИЕ()

Do Until KeyPress
    If ActivePresentation.Slides( 1 ).Shapes( 1 ).Visible = msoTrue Then
        ActivePresentation.Slides( 1 ).Shapes( 1 ).Visible = msoFalse
    Else
        ActivePresentation.Slides( 1 ).Shapes( 1 ).Visible = msoTrue
    End If
Sleep  1000 
Loop

End Sub

Однако KeyPress у меня не происходит и не знаю - какому событию назначить эту процедуру.
Может кто подскажет? - пустяковая задача то....
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
27.09.2007, 15:08:50
    #34831573
jj676
jj676
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Эффект мигающей фигуры в PowerPoint
Пришлось заанимировать рисунок и всё получилось.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Эффект мигающей фигуры в PowerPoint / 3 сообщений из 3, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение  
Полит. конфиден.  
созд. / загр.: 316ms
Закрыть
start [/forum/topic.php?fid=61&tablet=1&tid=2182206]:
 0ms
get settings:
 7ms
get forum list:
 8ms
check forum access:
 2ms
check topic access:
 2ms
track hit:
 28ms
get topic data:
 6ms
get forum data:
 1ms
get page messages:
 20ms
get tp. blocked users:
 1ms
others: 241ms
total:  316ms
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]