[Klotilda]

Здравствуйте! Пишу программу, которая должна вывести в таблицу на форме содержимое excel документа. Затем Ищет артикул в справочнике номенклатура. Если не находит, выдает сообщение.

Процедура ОкрытьФайлНажатие(Элемент)

ДиалогВыбора                = Новый ДиалогВыбораФайла(РежимДиалогаВыбораФайла.Открытие);
   ДиалогВыбора.Заголовок     ="Выберите файл";
       
     Если ДиалогВыбора.Выбрать()Тогда
           ИмяФайла=ДиалогВыбора.ПолноеИмяФайла;
      КонецЕсли;

       Таблица.Очистить();
    Таблица.Колонки.Очистить();
    
    Попытка
        Excel=Новый COMОбъект("Excel.Application");
        Excel.WorkBooks.Open(ИмяФайла);
        Состояние("Обработка файла Excel");
        ExcelЛист=Excel.Sheets(1);
    Исключение
        Сообщить("шибка при открытии файла");
        Сообщить(ОписаниеОшибки());
        Возврат;
        КонецПопытки;
        
                
        Версия        =Лев(Excel.Version,Найти(Excel.Version,".")-1);
        Если Версия="8" Тогда
            ФайлСтрок        =Excel.Cells.CurrentRegion.Rows.Count;
            ФайлКолонок        =Макс(Excel.Cells.CurrentRegion.Columns.Count,13);
        Иначе
            ФайлСтрок        =Excel.Cells(1,1).SpecialCells(11).Row;
            ФайлКолонок        =Excel.Cells(1,1).SpecialCells(11).Column;
        КонецЕсли;
        
        
            
        
        Счетчик=1;
        Пока ЗначениеЗаполнено(Excel.Cells(1,Счетчик).Text)Цикл
            ИмяКолонки=Excel.Cells(1,Счетчик).Text;
             ИмяБезПробелов=СтрЗаменить(ИмяКолонки," ","");
             //Таблица.Колонки.Добавить(ИмяБезПробелов,,ИмяКолонки);
             Таблица.Колонки.Добавить(ИмяКолонки);
             НоваяКолонка=ЭлементыФормы.Таблица.Колонки.Добавить(ИмяКолонки);
             НоваяКолонка.Данные=ИмяБезПробелов;
             Счетчик=Счетчик+1;
         КонецЦикла;
         
         Для нс=2 по ФайлСтрок Цикл
         НоваяСтрока=Таблица.Добавить();
         Для НомерКолонки=1 По Таблица.Колонки.Количество()Цикл
             ТекущееЗначение=Excel.Cells(нс.НомерКолонки).Text;
              ИмяКолонки=Таблица.Колонких[НомерКолонки-1].Имя;
              НоваяСтрока[ИмяКолонки]=ТекущееЗначение;
              
              Если справочники.Номенклатура.НайтиПоНаименованию("Артикул").ЭтоГруппа=Ложь Тогда
                  Если Справочники.номенклатура.НайтиПоНаименованию("Артикул")=НоваяСтрока[ИмяКолонки] Тогда
                     Сообщение=Новый СообщениеПользователю();
                         Сообщение.Сообщить("Артикул"+НоваяСтрока[ИмяКолонки]+"уже есть");
 
                      КонецЕсли;
            КонецЕсли;
             
             КонецЦикла;
           КонецЦикла;
               
Excel.WorkBooks.Close();
Excel = 0;
        
КонецПроцедуры

При выполнениии выдается ошибка: Ошибка при вызове метода контекста (Добавить)
Таблица.Колонки.Добавить(ИмяКолонки);
по причине:
Неверное имя колонки


Очень прошу помощи

[Petre]

Разве ошибка не очевидна?

Неверное имя колонки

[Klotilda]

Разве ошибка не очевидна?

Да, в файле были пробелы.

можно обращаться к ячейкам таблицыв экселе без создания таблицы на форме?

[Petre]

можно обращаться к ячейкам таблицыв экселе без создания таблицы на форме?

Конечно можно. Они никак не связаны.