Макросы и 1С

  • Автор темы Dlav
  • Дата начала
D

Dlav

#1
Вопросик к гуру 1С
1С7- Торговля и склад (Оперативный учет )
Есть необходимость показа так называемого слайд шоу на экране телевизора.(то бишь крутить прайс-лист)
Реализовал следующим образом:
1)Чел. выгружает прайс в эксель.
2)добавляет туда написанный мною макрос(VBA)
3)разворачивает прайс на весь экран телевизора и запускает макрос

В этих пунктах вроде все легко кажется, но простому оператору 1С довольно таки сложно 2-3 раза в день подгружать в ручную макрос в эксель(мин 10-15 занимает)

соответственно возник вопрос:

А можно ли как-нибудь научить 1С выгружать прайс в эксель уже с готовым макросом??
Подскажите в какую сторону копать?
 
E
#4
попробуй сделать так: пусть существует прайс с твоим макросом, из 1С ки делай выгрузку прайса в тот же файлик, т.е. просто заменяй данные и все. Думаю макрос там сохраниться, а данные банально обновятся.
 
D

Dlav

#5
попробуй сделать так: пусть существует прайс с твоим макросом, из 1С ки делай выгрузку прайса в тот же файлик, т.е. просто заменяй данные и все. Думаю макрос там сохраниться, а данные банально обновятся.
спасибо, буду пробывать
тока не умею в файл выгружать..прайс выгружается в табличную часть, а там уж через файл-сохранить как
искать будем процедуру выгрузки в файл ))
 
E
#6
спасибо, буду пробывать
тока не умею в файл выгружать..прайс выгружается в табличную часть, а там уж через файл-сохранить как
искать будем процедуру выгрузки в файл ))
Таб.Записать("С:\Прайс.xls");

этот метод юзай.
 

unknown181538

НеГуру
28.12.2008
1 417
0
#7
Мне кажется метод "записать" заменит файл целиком. Скорее всего придется программно открывать файл и заполнять ячейки методом "Cells".
 

vbs

Well-known member
18.02.2007
1 708
1
#8
Мне кажется метод "записать" заменит файл целиком. Скорее всего придется программно открывать файл и заполнять ячейки методом "Cells".
Согласен. Именно такой способ позволит сохранить имеющиеся макросы в файле
 
D
#10
Нашел самый простой выход:

Эксель.VBProject.VBComponents.Import(Каталог() + "Макрос.bas");
вроде работает ))))