Как загружать данные из XLS при наличии на компьютере  EXCEL я представляю, а что делать если Excel на компьютере нет, а данные из файла выгрузить в 1С надо(купить или скачать офис не получится нужен лицензионный)?

adodb умеет.

http://www.connectionstrings.com/excel/

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(СтрЗапроса);

На эту конструкцию сильно ругается программа пита неизвестный оператор.

(3) И на что ругается конкректно?

Сейчас
{ОбщийМодуль.ЗагрузкаизЭксель.Модуль(4,72)}: Переменная не определена (ИмяФайла)
     СтрокаПодключения = "Provider=Microsoft.Jet.OLEDB.4.0; Data Source="+<<?>>ИмяФайла+"; Extended Properties=""Excel 8.0;HDR=No;IMEX=1;"""; (Проверка: Сервер)

через опенофис можно, но там тоже танцы с бубном

(5) И в этом тоже ексель виноват???
метлу не предлагаю, она занята...
Но может, лопату совковую?

Смотри вставляем имя файла получаем вот это
     СтрокаПодключения = "Provider=Microsoft.Jet.OLEDB.4.0; Data Source="+C:\users\user\documents\book1.xls+"; Extended Properties=""Excel 8.0;HDR=No;IMEX=1;""";
    Connection = Новый COMОбъект("ADODB.Connection");
    Connection.Open(СтрокаПодключения);
    ИмяЛиста = "Лист1$";
    СтрЗапроса = "SELECT * FROM [" + ИмяЛиста+ "]";
    RecordSet = Connection.Execute(СтрЗапроса);

ответ системы
{ОбщийМодуль.ЗагрузкаизЭксель.Модуль(4,73)}: Неопознанный оператор
     СтрокаПодключения = "Provider=Microsoft.Jet.OLEDB.4.0; Data Source="+C<<?>>:\users\user\documents\book1.xls+"; Extended Properties=""Excel 8.0;HDR=No;IMEX=1;"""; (Проверка: Сервер)
{ОбщийМодуль.ЗагрузкаизЭксель.Модуль(9,28)}: Обнаружено логическое завершение исходного текста модуля
    RecordSet = Connection.<<?>>Execute(СтрЗапроса); (Проверка: Сервер)

И еще вот это
{ОбщийМодуль.ЗагрузкаизЭксель.Модуль(4,73)}: Неопознанный оператор
     СтрокаПодключения = "Provider=Microsoft.Jet.OLEDB.4.0; Data Source="+C<<?>>:\users\user\documents\book1.xls+"; Extended Properties=""Excel 8.0;HDR=No;IMEX=1;"""; (Проверка: Сервер)
{ОбщийМодуль.ЗагрузкаизЭксель.Модуль(9,28)}: Обнаружено логическое завершение исходного текста модуля
    RecordSet = Connection.<<?>>Execute(СтрЗапроса); (Проверка: Сервер)

СтрокаПодключения = "Provider=Microsoft.Jet.OLEDB.4.0; Data Source="+C:\users\user\documents\book1.xls+"; Extended Properties=""Excel 8.0;HDR=No;IMEX=1;""";

За такое я бы сразу того...
Кавычки для кого были придуманы??

Агде их не хватает?

Data Source="+C:\users\user\documents\book1.xls+"

Например, тут.
ты вообще - со строками работать умеешь?

Такой длинный хвостик...

Умею но эта конструкция не от мира сего

Ты хочешь сказать что он эту строку складывает по правилам сложения строк?  тогда ясно в чем ошибка.

Спасибки помогло ошибок больше нет.

(15) щас "оператор БСЛ" прилипнет

Ну у меян решение. Полное. Работает под всеми виндами и линусами, всеми редимами 1С (клиент-серверная, управляемые формы, облака и так далее.

Нативная компонента, на питоне. Читает напрямую все и хавает все.

Считывает сразу все листы экселя, все возвращает в 1С в виде массива таблицы эксель.
Не нужно выбирать листы, не нужно указывать именя листов и так далее.

Сразу мгновенно все в 1С.
Скорость 100 000 строк в минуту.

:челодлань.пнг:

я даже написать не успел - спроси маню...

(21) :слоупок.жпг:
)))))

гы

(0) через GoogleDocs ?

Так отлично работает только не понятно как определить какую строку и какой столбец как выгружать конструкция типа
ФИО = RecordSet.Fields(1).value;
ничего не говорит как выбрать конкретный столбец и строку в таблице Эксель?

не... с лопатой я погорячился...
Максимум черпак третьего ученика младшего помощника при холерных бараках...

(25) Fields(1) - вот тебе поле

(27) Как при этой хитрой системе определить какой столбец и какую строку ты выбираешь? Когда работаешь через
Excel = новый COMОбъект("Excel.Application");
там понятно
ФИО = Лист.Cells(2, КолонкаНаименования).Value;
есть строка и столбец, а здесь что вместо этого?

Пока НЕ RecordSet.EOF Цикл

//блаблабла

RecordSet.MoveNext();
КонецЦикла;

(28) у тебя же написан запрос к листу:

ИмяЛиста = "Лист1$";
    СтрЗапроса = "SELECT * FROM [" + ИмяЛиста+ "]";

(27) Fields(1) - вот тебе поле. Что поле он все поля по очереди перебирает слева направо и сверху вниз?

как с выборкой из результата запроса - так и здесь по сути

Понятно

Это как VISUAL BASIC я так с ACCESS работал когда миниСУБД писал.

Спасибки

Скопируй через буфер обмена в табличный документ 1С. Потом из него грузи.

(36) сто пудово

(36)Интересное предложение наверное так действительно проще.

(36) А это зачем? Доверять пользователю нельзя!

А теперь полный текст программы
Процедура ЗагрузкаИзЭксель() Экспорт
     Перем Нов;
    
     СтрокаПодключения = "Provider=Microsoft.Jet.OLEDB.4.0; Data Source="+"C:\users\user\documents\book1.xls"+"; Extended Properties=""Excel 8.0;HDR=No;IMEX=1;""";
    Connection = Новый COMОбъект("ADODB.Connection");
    Connection.Open(СтрокаПодключения);
    ИмяЛиста = "Sheet1$";
    СтрЗапроса = "SELECT * FROM [" + ИмяЛиста+ "]";
    RecordSet = Connection.Execute(СтрЗапроса);
//   Пока НЕ RecordSet.EOF() Цикл
       RecordSet.MoveNext();

       ФИО = RecordSet.Fields(2).value;
//       //...
//сообщить(ФИО);
//   КонецЦикла;
    Connection.Close();
    RecordSet = "";
    
//    Excel = новый COMОбъект("Excel.Application");
//    Книга = Excel.Workbooks.Open("C:\Users\user\documents\Book1.xls");
//    Лист = Книга.Worksheets("Лист1").UsedRange;
//    КолонкаНаименования = 1;
//Для Стр = 1 По 5 Цикл
//        ФИО = Лист.Cells(2, КолонкаНаименования).Value;
//КонецЦикла ;
//    Excel.WorkBooks.Close();
//    Excel = "";

Нов = Справочники.Сотрудники.СоздатьЭлемент();
НовГруппа = Справочники.Сотрудники.СоздатьГруппу();
НовГруппа.Наименование = "Работающие";
НовГруппа.Записать();
Нов.Наименование = "Иванов Иван Иванович";
СпрСотр = Справочники.Сотрудники;
ГруппаРаботающие = СпрСотр.НайтиПоНаименованию("Работающие");
выборка = СпрСотр.Выбрать(ГруппаРаботающие);
Нов.Родитель = ГруппаРаботающие;
Нов.ФИО = ФИО;
Нов.ДатаПриема = '2014.12.12';
Нов.Записать();
КонецПроцедуры

(40) НовГруппа = Справочники.Сотрудники.СоздатьГруппу();
.
.
ГруппаРаботающие = СпрСотр.НайтиПоНаименованию("Работающие");
профит

(41) это просто заготовка лишнее будет удалено

Процедура ЗагрузкаИзЭксель() Экспорт
     Перем Нов;
     СтрокаПодключения = "Provider=Microsoft.Jet.OLEDB.4.0; Data Source="+"C:\users\user\documents\book1.xls"+"; Extended Properties=""Excel 8.0;HDR=No;IMEX=1;""";
    Connection = Новый COMОбъект("ADODB.Connection");
    Connection.Open(СтрокаПодключения);
    ИмяЛиста = "Sheet1$";
    СтрЗапроса = "SELECT * FROM [" + ИмяЛиста+ "]";
    RecordSet = Connection.Execute(СтрЗапроса);
    RecordSet.MoveNext();
    ФИО = RecordSet.Fields(2).value;
    Connection.Close();
    RecordSet = "";
    Нов = Справочники.Сотрудники.СоздатьЭлемент();
    НовГруппа = Справочники.Сотрудники.СоздатьГруппу();
    НовГруппа.Наименование = "Работающие";
    НовГруппа.Записать();
    Нов.Наименование = "Иванов Иван Иванович";
    СпрСотр = Справочники.Сотрудники;
    Нов.Родитель = СпрСотр.НайтиПоНаименованию("Работающие");
    Нов.ФИО = ФИО;
    Нов.ДатаПриема = '2014.12.12';
    Нов.Записать();
КонецПроцедуры

реальный программист - из-за одной позиции целая обработка

(38) Нет, можно еще проще. Размещаешь на форме поле табличного документа, в него копируешь твой эксель через Ctrl+C - Ctrl+V и грузишь. Не надо никаких файлов конвертить/пересохранять/открывать_программно - все средствами 1С: дешево, удобно и практично.

+(45) Оу, сорри, похоже крымский мускатель в голову дал, в (36) именно об эт ом и написано.

Пойду лучше, вместо того чобы умничать, книжку почитаю про то, как наши бойцы в 43-м фашистам люлей под Днестром наваляли...

(19) и что у тебя тянется из ячейки - значение или форматное представление?

Мужики не парьтесь вы с адо и прочими методами. все выкинуть на свалку можно. поверьте человеку который 5 лет загрузку писал.

с АДо все заканчивается когда к вам попадает прайс какого нибудь 95 офиса, а таких навалом просто или еще вагон проблем.

Все это неуниверсально, ломается и выходит из строя.

Я уже молчу про получение листов. Это просто головной мозг взорвет когда пользователю надо писать имя листа который он хочет считать.

Самый универсальный сопосб и просто - буфер. Табличное поле на форме 1С. копи-паст - ВСЕ

Например, можно скачать ломаную ActiveX OLE XLSFile (или купить) и получить чтение порядка 150К ячеек в секунду и запись 100К без необходимости иметь офис. http://sm-software.com/ole-xlsfile-benchmark.htm
А если взять ее исходники и за час изваять компоненту (только не на всяком ховне типа питона) - скорость еще выше будет

(0) А может эта подойдет на сайте 1с?
---------------------------
1С:Предприятие - Работа с файлами
Программа "1С:Предприятие - Работа с файлами" представляет собой отдельный программный продукт, который распространяется бесплатно. Она предназначена для просмотра и редактирования файлов 1С:Предприятия на тех компьютерах, где система 1С:Предприятие не установлена.
http://v8.1c.ru/metod/fileworkshop.htm

(52) а где бы исходники то взять? декомпиляцию не предлагать плиз

изваял бы "за час" - ну пусть сутки некий форк ))

(53) Что-то я там не увидел работу с файлами, типа, *.XLS прямо из приложения 1С.
"Программа "1С:Предприятие - Работа с файлами" представляет собой отдельный программный продукт..."

(0) На инфостарте уже давно валяются несколько обработок с набором процедур для чтение .xls. Одна от Душелова, другая от Абадонны и ещё какая-то.

(0) Через ADO

(49) если в качестве входных данных может быть вообще все что угодно, то да, ADO не вариант. Но если файлы идут из одного источника и их структура боле-менее предсказуема, то ADO лучшее что можно придумать. Потому как бесплатно и есть на любом компе с виндой.

Хотя если действительно что угодно - ну хрен знает... мне как-то прайс попался из-под навижена... вроде на экселе... но цены были сделаны надписями... Т.е. в каждую ячейку был вкрячен объект "надпись" (тот что с панели рисования) и в нем цена. Вот и подумайте - ЭТО чем-нибудь считать получится?

Ну вот зачем так сложно? Нет экслея, конвертирую с помощью Yoksel файл в формат MXL и читаю средствами 1с.

Второй вариант - ставить Open Office, конвертировать в csv и читать оттуда опять же средствами 1с.

(58) вот не на любом компе с виндой. До сих пор не могу найти компоненту для WinServer 2012 R2

(36) я так понял даже открыть нет возможности...
хотя можно в гмейле или мейл.ру прицепить к письму и открыть.
и еще обработка такая на ИТС есть: ЗагрузитьИзТабличногоДокумента.

блин ну очевидно же - сохраните файл в XLSX и разберите файл средствами 1С

это кстати еще и самый быстрый способ загрузки файлов...

(54) ищущий, да обрящет - например: http://rutracker.org/forum/viewtopic.php?t=3575031

http://infostart.ru/public/142187/  и еще 100500 примеров по поиску по строке "чтение xlsx"

(60) в 2012 похоронили OLE DB?

(63) ок, спасибо

постараюсь сделать

(65) вот эта штука 2012 не поддерживает
http://www.microsoft.com/en-US/download/details.aspx?id=13255

(50) тоже решаемо. Список листов получается через то же АДОДБ.