Гость
Целевая тема:
Создать новую тему:
Автор:
Форумы / [игнор отключен] [закрыт для гостей] / 1С 7.7. и выгрузка в Excel. / 12 сообщений из 12, страница 1 из 1
24.02.2009, 08:58
    #35833304
1С 7.7. и выгрузка в Excel.
Возможно ли из 1С 7.7. создать файл на основании шаблона Excel и выводить в него данные по com-технологии?
...
Рейтинг: 0 / 0
24.02.2009, 12:30
    #35833870
VoditelKobyly
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
1С 7.7. и выгрузка в Excel.
Да вроде особой разницы нет, что файл шаблона заполнять, что просто лист Exelя
...
Рейтинг: 0 / 0
24.02.2009, 12:41
    #35833908
VoditelKobyly
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
1С 7.7. и выгрузка в Excel.
Вот кусок кода из моей программы. У меня работало.

Файл =СоздатьОбъект("Excel.Application");
Состояние("Заполнение выходной таблицы...");
НомерЛиста=0;
НовыеРабочиеКниги =Файл.WorkBooks;
ИмяФайлаШаблона=КаталогИБ()+"\Шаблоны\Шаблон задолженности.xlt";
РабочаяКнига =НовыеРабочиеКниги.Add("Template:="+ИмяФайлаШаблона);

Страница =РабочаяКнига.Worksheets;
ТекСтраница =РабочаяКнига.Worksheets(1);

ТекСтраница.Outline.AutomaticStyles =0; //False
ТекСтраница.Outline.SummaryRow =0; //xlAbove
ТекСтраница.Outline.SummaryColumn =-4152; // xlRight


Пока Запрос.Группировка(1) = 1 Цикл
Состояние("Вывод таблицы: "+Запрос.СвойствоКонтр);
НомерЛиста=НомерЛиста+1;
Если НомерЛиста>1 Тогда //Страница.Count Тогда
РабочаяКнига.Sheets("Лист1").Select();
РабочаяКнига.Sheets.Add(ИмяФайлаШаблона); //добавляет лист в начало списка
ТекСтраница=РабочаяКнига.Worksheets(1);
КонецЕсли;
ТекСтраница.Cells(3,1).value="Торговый представитель: "+Запрос.СвойствоКонтр;
ТекСтраница.Cells(5,1).value="Дата отчета ";
ТекСтраница.Cells(5,2).value=ДатаКонца;
.... и т.д.
...
Рейтинг: 0 / 0
24.02.2009, 18:54
    #35835049
1С 7.7. и выгрузка в Excel.
Огромное спасибо
...
Рейтинг: 0 / 0
Период между сообщениями больше года.
25.10.2011, 10:30
    #37496495
Mordik
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
1С 7.7. и выгрузка в Excel.
Подскажите пожалуйста, как сделать так, чтобы при выгрузки в Excel можно было работать с другими Excel документами.
Во время выгрузки если переключаться между окнами Excel, то заполнение данными происходит в текущем окне.

пример моего кода:
ТаблицаЕксел = СоздатьОбъект("Excel.Application");
НовыеРабочиеКниги = ТаблицаЕксел.Workbooks;
НовыеРабочиеКниги.Open("C:\СписокТС.xlt");

--//--

ТаблицаЕксел.WorkSheets(1).Activate();
ТаблицаЕксел.WorkSheets(1).Cells(3,7).Value = Формат(ДатаОтчета,"Д ДДДММММГГГГ");
ТаблицаЕксел.WorkSheets(1).Cells(3,2).Value = СокрЛП(СтрокаФильтра());

--//--

ТаблицаЕксел.Visible = 1;
...
Рейтинг: 0 / 0
25.10.2011, 11:02
    #37496549
Программист 1с
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
1С 7.7. и выгрузка в Excel.
Запуситите второй экземпляр excel. И скорее желательно через терминал.
...
Рейтинг: 0 / 0
25.10.2011, 11:50
    #37496660
Mordik
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
1С 7.7. и выгрузка в Excel.
Немного не понял...зачем второй экземпляр, где-то слышал, что можно сделать кодом так чтобы он не реагировал на другие Excel документы.
...
Рейтинг: 0 / 0
25.10.2011, 11:52
    #37496665
sWinTyz
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
1С 7.7. и выгрузка в Excel.
угу
я наверное сейчас бред скажу ?
типа :
НоваяКнига=ТаблицаЕксел.Workbooks.Add;
или
НоваяКнига=ТаблицаЕксел.Workbooks.Add();
...
Рейтинг: 0 / 0
25.10.2011, 11:53
    #37496667
sWinTyz
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
1С 7.7. и выгрузка в Excel.
а у книги есть вроде как метод активаровать?
...
Рейтинг: 0 / 0
25.10.2011, 11:54
    #37496669
sWinTyz
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
1С 7.7. и выгрузка в Excel.
*активировать

а то дергаетесь между листами одной книги
и открывате в старой
...
Рейтинг: 0 / 0
25.10.2011, 12:08
    #37496706
AHDP
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
1С 7.7. и выгрузка в Excel.
Паралельной работы не получиться :(
...
Рейтинг: 0 / 0
25.10.2011, 12:25
    #37496735
sWinTyz
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
1С 7.7. и выгрузка в Excel.
типа перед каждым выводом
делать
бук=эксель.активворкбук?
обернуть вывод в условия?
...
Рейтинг: 0 / 0
Форумы / [игнор отключен] [закрыт для гостей] / 1С 7.7. и выгрузка в Excel. / 12 сообщений из 12, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]