Имя: Пароль:
1C
1С v8
Из Excel в 1с
,
0 sovsemnovichek
 
22.08.13
10:09
Доброе утро всем. У меня такая задача... Мне нужно из файла Excel загрузить таблицу в форму внешней обработки, т.е. взять из документа все данные таблицы и поместить их в эту мою форму... Не представляю как это делать, помогите пожалуйста... Быть может есть примеры таких операций...?
1 Wobland
 
22.08.13
10:10
Процедура КнопкаВыполнитьНажатие(Кнопка)
    Попытка
        Состояние("Загрузка Excel...");
        Excel=Новый COMОбъект("Excel.Application");
    Исключение
        Сообщить(ОписаниеОшибки());
        Возврат;
    КонецПопытки;
    Состояние("Открытие файла...");
    Попытка
        ExcelFile=Excel.Workbooks.Open(Файл);
    Исключение
        Сообщить(ОписаниеОшибки());
        Возврат;
    КонецПопытки;
    Состояние("Обработка файла...");
    Sheet=ExcelFile.Sheets(1);
    ПоследняяСтрока=Sheet.Cells.SpecialCells(11).Row;
    ЭлементыФормы.Индикатор.Значение=0;
    ЭлементыФормы.Индикатор.МаксимальноеЗначение=ПоследняяСтрока-8;
    Для стр=8 По ПоследняяСтрока Цикл
        ОбработкаПрерыванияПользователя();
        ЭлементыФормы.Индикатор.Значение=ЭлементыФормы.Индикатор.Значение+1;
        Артикул=СокрЛП(Sheet.Cells(стр, 1).Value);
    КонецЦикла;
    Excel.Quit();
КонецПроцедуры
2 perec1982
 
22.08.13
10:11
смотри обработку загрузка данных из табличного документа
3 perec1982
 
22.08.13
10:11
unireps 8
4 perec1982
 
22.08.13
10:11
не изобретай велосипед
5 sovsemnovichek
 
22.08.13
10:12
Спасибо, буду разбираться!
6 sovsemnovichek
 
22.08.13
10:16
Я не пытаюсь) т.е. лучше код обработки сразу готовый взять и не париться, да? лучше типа все равно не сделаю?
7 Wobland
 
22.08.13
10:18
Один из программистов князя Вонга писал программу. Его пальцы танцевали над клавиатурой. Программа скомпилировалась без единой ошибки и выполнилась словно дуновение ветерка. "Превосходно!" - воскликнул князь, "Твоя техника безупречна!"
"Техника?"- сказал программист, отворачиваясь от терминала, "Всё, что я делаю, — это Дао, оно находится выше техники! Когда я только начал программировать, я видел проблему как одно целое. Спустя три года я уже не видел целого. Вместо этого я использовал подпрограммы. Но теперь я не вижу ничего. Я целиком существую в не оформившейся пустоте. Мои чувства свободны. Мой разум, свободный от намерений, следует своим инстинктам. Моя программа пишется сама. Правда, иногда бывают трудности. Я вижу, как они надвигаются, я приостанавливаюсь, я молча смотрю. Затем я изменяю одну строчку в программе, и трудности исчезают как облачко дыма. И тогда я компилирую программу. Я замираю и позволяю радости работы наполнить меня. Я закрываю на миг глаза и отсоединяюсь от системы." Князь Вонг сказал, "Если бы все мои программисты были так мудры!"
8 perec1982
 
22.08.13
10:18
но еще лучше используй эту обработку для своих целей
9 mzelensky
 
22.08.13
10:21
(7) ты тоже начитался про "ДАО программирования" ?! :)
10 Jonny_Khomich
 
22.08.13
10:23
11 sovsemnovichek
 
22.08.13
10:46
(7) Это что? целая книга?
12 sovsemnovichek
 
22.08.13
10:52
Суть проблемы изменилась... Мне дали теперь уже готовую обработку... Мне нужна отвязаться от шаблона и позволить пользователю ментять настройки под себя и сохранять их... Вы знаете как это делать... Потому что я в ступоре, я же не знаю как это все работает, а задание дают... Делать надо... Need help...
13 sovsemnovichek
 
22.08.13
10:56
Вообще не понимаю как...
14 markgenuine
 
22.08.13
11:02
Конкретнее скажите какие параметры?
15 sovsemnovichek
 
22.08.13
11:05
Может я код кину?
16 Wobland
 
22.08.13
11:06
(9) Мудрый программист слышит о Дао и усердно следует ему. Программист средних способностей слышит о Дао и ищет его. Глупый программист слышит о Дао и смеется над ним. Если бы над ним не смеялись, это было бы не Дао.
Высокие звуки труднее расслышать. Движение вперед - путь к отступлению. Большой талант проявляется на склоне лет. Великая белизна кажется покрытой пятнами. Даже в совершенной программе есть ошибки.
17 sovsemnovichek
 
22.08.13
11:07
(16) Где ты эту штуку взял? Прямо глаз радуется
18 zladenuw
 
22.08.13
11:09
(16) а что пил,курил ? дай мне. и я просветление хочу
19 Wobland
 
22.08.13
11:15
20 sovsemnovichek
 
28.08.13
16:08
Это я быстро считал данные из Excel
    
Для Row  = 1 По КоличествоСтрок Цикл
Стр = ExcelПриложение.Cells(row,1).Value;
Сообщить(стр);
КонецЦикла;

Как засунуть теперь это в табличное поле?
Помогите пожалуйста
Выдавать глобальные идеи — это удовольствие; искать сволочные маленькие ошибки — вот настоящая работа. Фредерик Брукс-младший