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

Вход

Регистрация

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

 

= Мир MS Excel/Как сделать медиаплеер невидимым или видимым - Мир MS Excel

Старая форма входа
  • Страница 1 из 1
  • 1
Модератор форума: китин, _Boroda_  
Как сделать медиаплеер невидимым или видимым
perven Дата: Среда, 20.03.2019, 05:22 | Сообщение № 1
Группа: Пользователи
Ранг: Участник
Сообщений: 67
Репутация: 0 ±
Замечаний: 0% ±

Excel 2013
Доброго времени.
Подскажите как щелчком на кнопку макроса - сделать медиаплеер невидимым или видимым ?

(На листе плеер сейчас вписан в контуры фигуры, чтобы понимать где он находится - когда невидим)
К сообщению приложен файл: 657.xls (46.0 Kb)
 
Ответить
СообщениеДоброго времени.
Подскажите как щелчком на кнопку макроса - сделать медиаплеер невидимым или видимым ?

(На листе плеер сейчас вписан в контуры фигуры, чтобы понимать где он находится - когда невидим)

Автор - perven
Дата добавления - 20.03.2019 в 05:22
gling Дата: Среда, 20.03.2019, 23:29 | Сообщение № 2
Группа: Друзья
Ранг: Участник клуба
Сообщений: 2563
Репутация: 706 ±
Замечаний: 0% ±

2010
Здравствуйте. Можно так попробовать.[vba]
Код
Sub Выкл()
    ActiveSheet.Shapes("WindowsMediaPlayer1").Visible = msoFalse
End Sub
Sub Вкл()
    ActiveSheet.Shapes("WindowsMediaPlayer1").Visible = msoTrue
End Sub
[/vba]
К сообщению приложен файл: 0253309.xls (57.5 Kb)


ЯД-41001506838083
 
Ответить
СообщениеЗдравствуйте. Можно так попробовать.[vba]
Код
Sub Выкл()
    ActiveSheet.Shapes("WindowsMediaPlayer1").Visible = msoFalse
End Sub
Sub Вкл()
    ActiveSheet.Shapes("WindowsMediaPlayer1").Visible = msoTrue
End Sub
[/vba]

Автор - gling
Дата добавления - 20.03.2019 в 23:29
perven Дата: Четверг, 21.03.2019, 01:29 | Сообщение № 3
Группа: Пользователи
Ранг: Участник
Сообщений: 67
Репутация: 0 ±
Замечаний: 0% ±

Excel 2013
gling, спасибо вам.
 
Ответить
Сообщениеgling, спасибо вам.

Автор - perven
Дата добавления - 21.03.2019 в 01:29
  • Страница 1 из 1
  • 1
Поиск:

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