Макрос Excel для
СРАВНЕНИЯ ПРЕДВАРИТЕЛЬНОГО И УТОЧНЁННОГО ПЛЕЙ-ЛИСТОВ
для региональных телекомпаний

На случай, если у Вас уже имеются предварительные плей-листы, но ещё нет уточнённых,
а уже нужно формировать расписание на следующий день,
предлагаю макрос, который поможет частично решить эту проблему (совершенно бесплатно).

Вы просто формируете расписание на следующий день по предварительному плей-листу. Например, до полудня.
А когда поздно вечером или уже ночью или даже утром получаете уточнённый плей-лист,
то просто вышеуказанным макросом сравниваете предварительный плей-лист и уточнённый.
Макрос легко, быстро и точно укажет Вам время, с которого в уточнённом плей-листе начались изменения.
И вообще, с помощью разной раскраски ячеек покажет все различия и сходства в этих плей-листах.
Тогда Вы будете совершенно уверены, что до такого-то времени Ваше расписание создано верно.

Форма коррекции времени

Рис. 1. Два файла для сравнения и панель управления макросом.

1. Вставьте нужные 3 колонки из первого файла в ячейку A1 и нужные 3 колонки из второго файла в ячейку D1.
    Эти ячейки заранее подсвечены серым.

2. Нажмите кнопку СРАВНИТЬ.
    Несовпадающие ячейки подкрасятся срасным и оранжевым.
    После завершения операции курсор остановится на первой несовпадающей ячейке.

3. Для выбора варианта поиска предварительно поставьте или снимите птичку "Сообщать каждый раз".

4. Кнопка СИНХРО помогает синхронизировать одинаковые, но смещённые по вертикали ячейки,
    которые находятся после первых несовпадающих, подкрашивая их песочным и зеленоватым.
    Таким образом мы можем увидеть, что после первого различия в плей-листах
    далее снова имеется одинаковое время выхода передач в эфир.
    Песочные и зеленоватые ячейки специально чередуются, чтобы далее следующие ячейки с одинаковым временем
    могли быть легко сопоставлены мысленно или практически - путём смещения нужных ячеек по вертикали.
    Так можно пропустить первые различия в плей-листах (если они были незначительными)
    и проследить где начались более серьёзные и существенные для нас различия.
    Ячейкам с красным и оранжевым цветом в одном плей-листе нет равных ячеек в другом.
    А каждой ячейке с песочным цветом в одном плей-листе есть песочная же ячейка с такими же данными - в другом.
    А каждой ячейке с зеленоватым цветом в одном плей-листе есть зеленоватая же ячейка с такими же данными - в другом.

5. Кнопка == запускает процесс синхронизации сразу после сравнения, объединяя эти две операции в одну.
    Удобнее пользоваться сразу этой кнопкой.

6. В прямоугольничке отображается номер строки с первой несовпадающей ячейкой.
    Рядом красными цифрами отображается первое несовпадающее время выхода в эфир.

7. Кнопка НАЙТИ первую показывает нам первую найденную несовпадающую ячейку.

8. Кнопка СБРОСИТЬ восстанавливает первоначальные цвета ячеек (убирает наши закраски)
    и обнуляет данные о первой найденной ячейке (номер строки и время).

9. Кнопка ОЧИСТИТЬ очищает страницу для вставки новых данных
    и сразу обозначает серым ячейки, с которых нужно начинать вставку данных из новых сравниваемых плей-листов.

10. Длинная вертикальная кнопка - НАВЕРХ.
      Её же дублирует сочетание клавиш Ctrl+Q на любом языке в любом регистре.

Форма коррекции времени

Рис. 2. Результат работы макроса.

Скачать программу (файл Excel с макросом).


Вопросы, замечания, рекомендации:
E-mail      paul-wf@mail.ru
ICQ          247332838


Другие мои работы для региональных телекомпаний.

1. Макрос для формирования файла расписания в Excel
    и импортирования плей-листов в формат *.air для программы FDOnAir.   Описание
2. Макрос для сравнения предварительного и уточнённого плей-листов Excel
    для региональных телекомпаний (бесплатно).      Описание      Скачать (файл Excel с макросом).
3. Небольшая программка для коррекции системного времени компьютера
    для региональных телекомпаний (бесплатно).      Описание     Иконка      Скачать (файл Excel с макросом).
4. Программа (макрос Excel) для массовой переименовки файлов (бесплатно). Полезна для меломанов.
    Описание      Скачать (файл Excel с макросом).


(C) Павел Жернаков 2009 г.