|
v8: Загрузка данных из Excel | ☑ | ||
---|---|---|---|---|
0
shock3r
29.04.13
✎
12:57
|
На форуме, по поиску, есть много тем, по выгрузке данных в xls, помогите примером, кодом, как обрабатывается xls файл, на выгрузку данных из него.
|
|||
1
ssh2012
29.04.13
✎
12:59
|
ТабДок.Сохранить() формат xls
|
|||
2
palpetrovich
29.04.13
✎
13:00
|
"Выгрузка данных из Excel" - имеется ввиду "Загрузка данных из Excel в 1с8"?
|
|||
3
ssh2012
29.04.13
✎
13:00
|
По загрузке COMSafeArray быстро работает
|
|||
4
shock3r
29.04.13
✎
13:05
|
(2) Да выгрузка данных из файла xls, например в ТЧ обработки / документа. Нужен пример кода
|
|||
5
shock3r
29.04.13
✎
13:05
|
(3) Поделитесь примером реализации, пожалуйста
|
|||
6
shock3r
29.04.13
✎
13:07
|
(1) я знаю, спасибо, но это выгрузка в xls
|
|||
7
Aprobator
29.04.13
✎
13:07
|
(0) типовая обработка была на ИТС. Загрузка данных из табличного документа вроде.
|
|||
8
salvator
29.04.13
✎
13:08
|
(0) Забанили в поисковиках? http://yandex.ru/yandsearch?lr=213&text=1с+загрузка+из+excel первая ссылка
|
|||
9
ptiz
29.04.13
✎
13:08
|
Из xls - это загрузка.
В xls - выгрузка. |
|||
10
shock3r
29.04.13
✎
13:10
|
(8) Вы не поверите, но да, у меня на работе открыта только миста, поисковики забанены, кроме google по https протоколу, но смысла особого нету, т.к. всё равно дальше страница по http открывается, и нельзя посмотреть
|
|||
11
palpetrovich
29.04.13
✎
13:11
|
(5)пример ADODB:
СтрокаПодключения = "Provider=Microsoft.Jet.OLEDB.4.0; Data Source="+ИмяФайла+"; Extended Properties=""Excel 8.0;HDR=No;IMEX=1;"""; Connection = Новый COMОбъект("ADODB.Connection"); Connection.Open(СтрокаПодключения); ИмяЛиста = "Лист1$"; СтрЗапроса = "SELECT * FROM [" + ИмяЛиста+ "]"; RecordSet = Connection.Execute(СтрЗапроса); Пока НЕ RecordSet.EOF() Цикл Наименование = RecordSet.Fields(1).value; //... КонецЦикла; Connection.Close(); RecordSet = ""; |
|||
13
ssh2012
29.04.13
✎
13:13
|
||||
14
palpetrovich
29.04.13
✎
13:15
|
+(11) или просто Excel.Application:
Excel = новый COMОбъект("Excel.Application"); Книга = Excel.Workbooks.Open(ИмяФайла); Лист = Книга.Worksheets("Лист1").UsedRange; КолонкаНаименования = 1; Для Стр = 1 По 5 Цикл Наименование = Лист.Cells(Стр, КолонкаНаименования).Value; КонецЦикла; Excel.WorkBooks.Close(); Excel = ""; если ничего не напутал :) |
|||
15
Aprobator
29.04.13
✎
13:15
|
(12) 8000 за пример кода? У тя совсем крыша поехал, спекуль?
|
|||
16
Maniac
29.04.13
✎
13:18
|
(15) у меня там нету кода. тупо компонента которая читает все форматы под всеми режимами работы 1С, со всеми листами экселей , даже на линукс сервере. скорость 100 тысяч строк в минуту с таблицей в 15 колонок заполненными всеми данными.
|
|||
17
Aprobator
29.04.13
✎
13:18
|
пора уже Волшебнику тут с Мани бабло брать за подобную рекламу.
|
|||
18
zladenuw
29.04.13
✎
13:20
|
http://infostart.ru/public/20090/
Функция ПрочитатьЛистExcel(ТЗ = Неопределено, ЛистЭксель = Неопределено, НомерПервойСтроки = 1, НомерПервойКолонки = 1, ВсегоСтрок = 0, ВсегоКолонок = 0) Экспорт Если ЛистЭксель = Неопределено Тогда ЛистЭксель = ПолучитьCOMОбъект(,"Excel.Application"); КонецЕсли; Если ВсегоСтрок = 0 Тогда ВсегоСтрок = ЛистЭксель.Cells.SpecialCells(11).Row; КонецЕсли; Если ВсегоКолонок = 0 Тогда ВсегоКолонок = ЛистЭксель.Cells.SpecialCells(11).Column; КонецЕсли; Если ТЗ = Неопределено Тогда ТЗ = Новый ТаблицаЗначений; Для Счетчик = 1 По ВсегоКолонок Цикл ТЗ.Колонки.Добавить("Колонка"+Счетчик, Новый ОписаниеТипов("Строка")); КонецЦикла; КонецЕсли; Для Счетчик = НомерПервойСтроки По ВсегоСтрок Цикл НоваяСтрока = ТЗ.Добавить(); КонецЦикла; Область = ЛистЭксель.Range(ЛистЭксель.Cells(НомерПервойСтроки,НомерПервойКолонки), ЛистЭксель.Cells(ВсегоСтрок,ВсегоКолонок)); Данные = Область.Value.Выгрузить(); Для Счетчик = 0 По ВсегоКолонок-1 Цикл ТЗ.ЗагрузитьКолонку(Данные[Счетчик], Счетчик); КонецЦикла; ЛистЭксель = Неопределено; Возврат ТЗ; КонецФункции |
|||
19
Aprobator
29.04.13
✎
13:20
|
(16) ....нету кода... - тем более.
|
|||
20
Maniac
29.04.13
✎
13:21
|
(19) учись работать. иначе всю жизнь будешь зарабатывать чуть больше грузчика.
|
|||
21
shock3r
29.04.13
✎
13:21
|
(11) (14) (18) Спасибо! Теперь есть с чем работать!
|
|||
22
Aprobator
29.04.13
✎
14:30
|
(20) торгаши никогда не были работниками. Они всегда были втюхивателями фуфла по большей части.
|
|||
23
Maniac
29.04.13
✎
15:53
|
(22) не придумывай ерунду. Нравятся мне вот такие сказочники которые чего то не знают, но на всех гнать горазды.
|
|||
24
Кокос
29.04.13
✎
15:58
|
(0) тебе куда? в какую конфигурацию? в УФ есть различия
|
|||
25
shock3r
29.04.13
✎
16:18
|
(24) в обработку, на 1 раз запустить, обычная форма
|
|||
26
Aprobator
29.04.13
✎
16:22
|
(23) если я чего не знаю, то спрашиваю. Бывает это сейчас довольно редко. Но уж никак не занимаюсь торговлей на форуме. Есть у тебя ресурс - вот там и торгуй. А тут нефиг.
|
|||
27
Aprobator
29.04.13
✎
16:23
|
(25) типовая на ИТС есть, еще раз грю. Загрузка из табличного документа называется. Эксель она тоже прекрасно кушает.
|
|||
28
Maniac
29.04.13
✎
16:41
|
(26) сказал человек который в 44 года превращает специализированный форум в сборник задротов компьютерных игр.
|
|||
29
Maniac
29.04.13
✎
16:42
|
(25) для рабозов действительно на ИТС обработка. и там код процедуры из экселя есть нормальный.
Мало того можно вообще не использовать эксель. сделать на форму табличное поле в которое из буфера вставить любой лист (даже эксель не нужен) и потом просто прочитать этот табличный документ. |
|||
30
Aprobator
29.04.13
✎
16:54
|
(28) здесь вообще много разделов по интересам есть. Если для тебя это открытие. Но реклама тут платное. Торговать дуй на свой ресурс.
|
|||
31
Maniac
29.04.13
✎
16:56
|
(30) не тебе платить в любом случае. успокойся.
|
Форум | Правила | Описание | Объявления | Секции | Поиск | Книга знаний | Вики-миста |