Макрос. Кнопка. Радиоприемник из плейера. Radio.

Как в Excel слушать радио из интернет. Код 2 строчки.

Немногие, кто сталкивался с тупостью Эксель, встречая в работе, казалось бы очевидные для применения, но в то же время, неразрешимые задачи - не ругали бы его последними словами ))) ... Я и сам, частенько матеря его за неповоротливость - тем не менее полноценно и активно использую его возможности счетной машинки ))) ... И не только ... Скрипт слов ... Автоматическая обработка. Подсчет количества уникальных слов в строках текста ... Поиск отказов PTO, CC и EB ... Неисправности PTO, Cruise Control и Engine Brake ... Конвертация данных и визуализация графиков с помощью Excel ... Мониторинг спутников и TLE ... Отсев номеров спутников при помощи Эксел ... Резонанс LC контура ... Графики резонансной частоты LC контура в программной среде Excel ... BAT CMD SAT TLE скрипт ... Селекция данных в табличном редакторе Эксель и отказ от его использования в пользу командных сценариев Windows ...

Как сделать радио приемник из Excel.

... Как слушать интернет радио в Excel.

... В этом видео, тренер и консультант по продуктам Microsoft Office, Николай Павлов - рассказывает, как слушать интернет радио в табличном редакторе Excel ... По моему - это звучит круто ))) ... Действие происходит в День Радио 7 мая, когда многие пользователи сомневаются в необходимости возрождения ДВ, СВ вещания (и КВ, в том числе), апеллируя к трансляции двухсот ТВ каналов (200), десятке хостингов видеосервиса и морю интернет радиостанций, вопрошая : ну и кому это сейчас нужно ? ... Не суть (не будем вдаваться в полемику) ...

Сегодня Эксел будет превращен в радиоприемник, чтобы слушать интернет радиостанции - вместе с открытыми таблицами ... И хотя я считаю, что при заполнении ячеек таблиц нужна внимательность, а не бубнение радио под ухом - реализовать это можно всего за пару минут ...

Нужно нагуглить список интернет радио станций, с названиями и адресами потокового вещания ... Чтобы воспроизвести любую из них - понадобится добавить на лист Excel компонент Windows Media Player ... И написать крохотный макрос в две строчки, который оживит плейер и заставит его работать ...

У меня Excel 2013, в котором я попытаюсь повторить урок и для примера возьму : Anime Radio Russia ; http://radio.flex.ru:8000/radionami ... Кратко, потому-что писать - лень, а искать, копировать и вставлять - еще ленивее ))) ...

Перейти на вкладку : Разработчик ... Упс ... Первая засада, такой вкладки - нет, и никогда не было ))) ... Ткнуть в ленту вкладок Эксель правой кнопкой мыши (в любое место, по любой вкладке) - настройка ленты - Параметры Excel - правое окно / список - поставить галочку : Разработчик ... Круто ))) ...

Разработчик - вставить - Элементы ActiveX - другие элементы управления - другие элементы - Windows Media Player - OK ... Указатель мыши превращается в маленький тонкий крестик, активируется режим конструктора (иконка в ленте меню разработчика) и удерживая левую кнопку мыши - выбрать область и размер вставки плейера ...

Обратить внимание на пару / тройку моментов ...
# В строке формул - имя добавленного компонента : WindowsMediaPlayer1 ...
# Сама формула выглядит, как : =ВНЕДРИТЬ("WMPlayer.OCX.7";"") ... Сам Эксел подсказывает, что это действие сделано через технологию Windows OCX ActiveX OLE Custom eXtension - управленческие структуры взаимодействия пользователей и программ ... Чтобы OCX-компонент работал правильно, он должен быть правильно зарегистрирован в операционной системе Windows и, в окне вставки - была галочка : зарегистрировать компонент при установке, но я игнорировал это предупреждение, так как не было прямых указаний автора видео ... Это может вызвать побочные проблемы, впоследствии ... И, конечно : никакой похожей динамически подключаемой библиотеки w*.ocx , в системе - я не нашел ))) ...
# Запустился режим конструктора для разработчика, но об этом я уже упоминал ...

Кнопки плейера пока неактивны и для перехода в рабочее состояние кнопку режим конструктора - нужно отжать, нажав по ней один раз ... Теперь нужно написать макрос для использования адреса - для воспроизведения потока радиостанции в медиа плейере ... Щелкнуть внизу - по ярлыку : Лист 1 - правой кнопкой мыши - Просмотреть код (в моей версии 2013 этот пункт называется : Исходный текст) и откроется окно визуального редактора Microsoft Visual Basic for Application - Книга 1 [design] ... В пустом окне [Лист 1 (Code)] пишем макрос управления ...

Sub ... Блин ... С этим еще кто-то работает ? ... Это-ж - сколько лет прошло ? ... С тех пор, как убили Бейсик ... Sub ... Не могу припомнить ... Знакомое слово ... SubRoutine ... Подпрограмма ... Точно ))) ...

Sub Radio()
WindowsMediaPlayer1.URL = ActiveCell
WindowsMediaPlayer1.Controls.Play
End Sub

Вот, собственно - и весь макрос ... Прикольно ))) ... Закрыть окно и вернуться в Эксель ...

Для большего удобства автор предлагает добавить кнопку запуска воспроизведения ... Вкладка Разработчик - Вставить - Элементы управления формы - кнопка ... Вставка кнопки - также рисуется левой кнопкой мыши, однако режим конструктора, в этом случае, само - не активировался ... Так, к сведению ... Зато - автоматически открывается окно настроек : Назначить макрос объекту, где действию Кнопка_Щелчок - назначается макрос Лист1.Radio (который был описан нами, как Sub Radio() - выше) ... Тупо вызывается функция, процедура или подпрограмма - считайте это, как хотите, но лично я - не вижу в этом большой или принципиальной разницы, хотя профессиональные программисты могут поспорить насчет механизмов обработки кода, области видимости переменных, передачи параметров, очередности доступа к кэш и других тонкостях программирования, о которых совершенно необязательно знать, чтобы повторить этот простой пример - самостоятельно ))) ...

Надпись на кнопке - тоже можно поменять ... Вот и все ... Осталось выбрать ячейку с адресом радиостанции - ткнуть, сделав ее активной (ActiveCell) и нажать кнопку Play ... Лично у меня все заработало - с первого раза и без проблем ... Спасибо автору за науку ! ))) ... Кнопки : Стоп, мы конечно же - не сделали ... И, когда вы офигеете, оттого что эти технологии работы с табличным процессором Excel - реально воспроизводят интернет радио ... А время уже за полночь ... А громкость у вас стоит на полную ))) ... Жмите на большую круглую кнопку в самом плейере, с перевернутым знаком равно - это может оказаться проще, чем найти ползунок громкости ...

Радио приемник из Excel, слушать интернет радиостанции онлайн.

PLEX, полезная надстройка Excel.

Ну, да - ладно ... Кнопку : Стоп - вы уже и сами вставить можете ))) ... Теперь, когда нет оснований не доверять автору в профессионализме и уровне знаний - стоит рассмотреть его предложение по улучшению функциональности Микрософт Эксел ...

# ... planetaexcel.ru, Планета Excel. Приемы. Тренинги. Надстройка PLEX. Книги. Видеоуроки. Форум. Проекты. Блог. Онлайн-курсы.

... На своем сайте автор предлагает скачать, установить и купить PLEX - надстройка полезных формул, функций и макросов для Microsoft Excel 2007 - 2021 гг. версий выпуска MS Office ... Более 140 полезных макросов, более 120 пользовательских функций ... Библиотека формул ... Вставка курса валюты ... Инструменты для ускорения работы с таблицами ... Конвертация формул в значения ... Менеджер листов ... Мощный инструмент для обработки и операций с текстом ... Сборка листов из книг или с нескольких листов ... Сохранение в отдельный файл ... Удаление всех пустых строк / столбцов ... Специальные действия по фильтру ...

Ничего из этого и большинства других улучшений - Excel делать не умеет : в нем просто нет таких инструментов ... Бесплатно в течение 30-дневного пробного периода ... Никаких ограничений на функционал или количество запусков ... Русская и английская версии надстройки ... Да, судя по отзывам - еще остается поле и фронт работ для улучшений ... Так и цена : 795 рублей (за 5 персональных активаций для частного использования + пожизненное обновление) - совсем не те деньги, за которые нужно переживать ... А Excel - точно хуже не станет, скорее - даже очень наоборот ))) ...

Это - не заказная и не рекламная статья : я вообще узнал об этом только вчера ))) ... Но когда вы увидите, кто уже пользуется улучшенным функционалом Эксель, то ...

... Решай сам, Витя. Будешь кусать локти, по щелчку в 3 15.

... GAP ... Alea Group ... Areva ... Газпром Нефть ... FM Logistic ... ПромСтрой Груп ... LG ... СберБанк ... ГлобалСтрой Инжиниринг ... Leroy Merlin ... Vi ... Qualitage ... Элекснет ... Втб24 ... Sakhalin Energy ... Почта России ... Рен ... Нииас ... РЖД ... Мегафон ... Корпорация Стерх ... D.TEK ... КредитМарт ... УралСиб ... Kia ... Южел ... Samsung ... Инвар ... ResMark ... MTT ... Суэк ... Живой Офис ... КазМунайГаз ... Emerson ... Кредит ЕвропаБанк ... АвтоТемп ... ParkNeft ... Billa ... Driada Group ... LandLogic ... Pepsico ... Интерфлаг ... CeDo ... MBA Strategy ... Открытие ... Территориальный Центр Медицины Катастроф Свердловской Области ... BioSphere ... CubeLine ... Grant Tornton ... RusForest ... Phillip Morris International ... Mars ... Promodo ... НэоЦентр ... Савия ... Юмакс ... МеталлПрофиль ... И, многие другие, не рыжие ))) ...

Список всех страниц, раздел computer : смотреть онлайн бесплатно, интересное - надо посмотреть ...