Страница 1 из 1

Макросы для Excel (VBA)

Добавлено: 09 ноя 2020, 07:17
koldishev
Здравствуйте!

Очень часто клиенты приходят с уже готовыми медиапланами, и очень неудобно переставлять по одному выходу с одного файла в карточку.

Возможно сталкивался кто-то с написанием макроса по экспорту текстового файла из Экселя, для дальнейшего импорта

Re: Макросы для Excel (VBA)

Добавлено: 09 ноя 2020, 14:36
koldishev
Написал небольшой макрос, отсюда вопрос.

Какие параметры должны быть в файле, чтобы успешно импортировать его в программу. Потому что на выходе у меня создается файл .card я его ZIPую, но он импортируется пустой. Хотя в нем вот

[Header]
Description=MyMacro.xlsm
Priority=
Price_PaymentType=None

[MaskTimes]
Time=13:55:00
Date=07.11.2020

Time=13:55:00
Date=08.11.2020

Time=13:55:00
Date=09.11.2020

Time=13:55:00
Date=10.11.2020

Re: Макросы для Excel (VBA)

Добавлено: 09 ноя 2020, 15:13
RadioSoft
Экспортируйте карточку из программы и вы увидите, что там есть.

Примерно такое содержимое.

Код: Выделить всё

[Header] <- поле заголовка 
Description=Реклама    <- название ролика
FilesTime=00:00:27.500  <- длительность файлов, относящихся к ролику (hh.mm.ss.zzz)
StartDate=05.12.2019   <- дата начала проката на радиостанции (dd.mm.yyyy)
StartTime=16:20:00     <- время начала проката на радиостанции (hh.mm.ss)
StopDate=08.12.2019 <- дата окончания проката на радиостанции (dd.mm.yyyy)
StopTime=11:20:00  <- время начала проката на радиостанции (hh.mm.ss)
TimesCount=12  <- количество выходов ролика за период
FilesCount=2  <- количество файлов, относящихся к ролику
CustomerID=ООО "Итель"  <- Имя заказчика
GroupID=Разное <- Группа рекламных роликов в зависимости от направления (Авто, Косметика и т.д.) (настраивается в AdsMan)
ManagerID=Прохорова Лена <- Имя менеджера, принявшего рекламу
SectionID=Коммерческая реклама <- Раздел ролика (настраивается в AdsMan)
PositionID=В блоке <- позиция в блоке (настраивается в AdsMan)

[Files]  <- последовательный список файлов, принадлежащих ролику, каждый начитается с Path=
Path=E:\Реклама\Экспресс реклама.mp3 <- путь к файлу
Title=Экспресс реклама  <- название файла (может отличаться от имени файла) 
Time=00:00:14.100 <- Длительность  файла (hh.mm.ss.zzz)
FadeID=Рекламный <- Тип сведения файла для эфирной программы (настраивается в AdsMan)

Path=E:\Реклама\Экспресс реклама 2.mp3 <- путь ко второму файлу
...

[MaskTimes]  <- последовательный выходов принадлежащих ролику, каждый начитается с Path=
Time=16:20:00    <- время выхода рекламного ролика (hh.mm.ss)
Date=05.12.2019 <- дата выхода рекламного ролика (dd.mm.yyyy)

Time=17:20:00
Date=05.12.2019
...


Re: Макросы для Excel (VBA)

Добавлено: 09 ноя 2020, 15:47
koldishev
Это понятно, но а какой набор параметров минимальный?
Чтобы импортировалось нормально.
То есть я например создал абсолютно пустую карточку и там были только те параметры которые я указал выше

но все равно не работает(((

Re: Макросы для Excel (VBA)

Добавлено: 10 ноя 2020, 03:12
RadioSoft
Сохраните карточку в приложении, посмотрите набор полей, заполните все поля, которые вы можете заполнить, оставьте поля которые вы не можете заполнить пустыми.

Re: Макросы для Excel (VBA)

Добавлено: 02 мар 2022, 04:42
prokira
koldishev писал(а):
09 ноя 2020, 15:47
Это понятно, но а какой набор параметров минимальный?
Чтобы импортировалось нормально.
То есть я например создал абсолютно пустую карточку и там были только те параметры которые я указал выше

но все равно не работает(((
Добрый день, получилась реализация ?

Re: Макросы для Excel (VBA)

Добавлено: 17 мар 2022, 00:41
unit
Тоже интересен импорт .xl .xls в Adsman.

Re: Макросы для Excel (VBA)

Добавлено: 22 июн 2022, 11:17
unit
koldishev писал(а):
09 ноя 2020, 15:47
Это понятно, но а какой набор параметров минимальный?
Чтобы импортировалось нормально.
То есть я например создал абсолютно пустую карточку и там были только те параметры которые я указал выше

но все равно не работает(((
Здравствуйте! получилось ли реализовать?