19,7K подписчиков

Запускаем радио в Excel, просто, с примером

498 прочитали

В интернетах подсмотрел классный пример работы интернет радио в таблицах ексель. Если сами создавать не желаете, просто скачайте пример с яндекс диска и наслаждайтесь музыкой.

Рабочий радио плеер в эксель
Рабочий радио плеер в эксель

Если интересно самостоятельно разобраться, запускаем Excel (у меня версия офисного пакета 2016).

Радио в Excel

Нам понадобится вкладка разработчика, которой у меня не было. Поэтому, сначала в параметрах нужно её включить:

Включить вкладку разработчика в эксель
Включить вкладку разработчика в эксель

Теперь, когда включили, переходим на вкладку «Разработчик», жмём кнопку Вставить, выбираем в «Элементы ActiveX» пункт «Другие элементы управления» (Если офис английский, следуем по цепочке Developer - Insert - ActiveX - Other controls):

Другие элементы управления в экселе
Другие элементы управления в экселе

В открывшемся списке элементов, находим Windows Media Player, жмём «OK» и добавляем его на листе – нажав левую кнопку мыши:

Элемент Windows Media Player
Элемент Windows Media Player

Запишите имя добавленного элемента

Имя элемента
Имя элемента

Теперь правый клик на плеере, пункт «Просмотреть код», где нам нужно вставить вот этот код

Sub Radio()

WindowsMediaPlayer1.Url = ActiveCell

WindowsMediaPlayer1.Controls.Play

End Sub

Что то типа такого должно получиться у вас
Что то типа такого должно получиться у вас

Возвращаемся в эксель, а окно макросов можно оставить открытым или закрыть.

Всё, готово, наполняем таблицу ссылками на потоковое аудио. Запускаем – выделяем ячейку со ссылкой и запускаем через пункт «Макросы», либо сочетанием клавиш Alt+F8.

Запуск проигрывателя
Запуск проигрывателя
Анимация работающего плеера в экселе
Анимация работающего плеера в экселе

Проигрыватель радио не будет никак влиять на работу самого эекселя или других макросов, всё происходит в фоне, плюс нагрузка на систему минимальная. Пользуйтесь.

-----------------------

У нас интересно, поддержите канал и обязательно подписывайтесь на телеграмм
У нас интересно, поддержите канал и обязательно подписывайтесь на телеграмм