ТаблицаПолучатель = ТаблицаИсходная.Скопировать(); Для Каждого СтрокаИсходнойТаблицы Из ИсходнаяТаблица Цикл 
 НоваяСтрока = ТаблицаПолучатель.Добавить(); 
       ЗаполнитьЗначенияСвойств(НоваяСтрока, СтрокаИсходнойТаблицы); 
КонецЦикла; ОдноименныеКолонки = Новый Массив(); 
Для Каждого Колонка Из ИсходнаяТаблица.Колонки Цикл 
 СовпадающаяКолонка = ТаблицаПолучатель.Колонки.Найти(Колонка.Имя); 
      Если СовпадающаяКолонка <> Неопределено Тогда 
             // Получить свойства колонки. 
         Индекс = ТаблицаПолучатель.Колонки.Индекс(СовпадающаяКолонка); 
               Имя = Колонка.Имя; 
          ТипЗначения = Колонка.ТипЗначения; 
          Заголовок = Колонка.Заголовок; 
              Ширина = Колонка.Ширина; 
            // Заменить колонки в таблице-получаетеле. 
            ТаблицаПолучатель.Колонки.Удалить(Индекс); 
                ТаблицаПолучатель.Колонки.Вставить(Индекс, Имя, ТипЗначения, Заголовок, Ширина); 
              // Добавить очередное имя совпадающих колонок в массив. 
               ОдноименныеКолонки.Добавить(Колонка.Имя); 
 КонецЕсли; 
КонецЦикла; 
// Цикл перебора строк исходной таблицы. 
Для Каждого СтрокаИсходнойТаблицы Из ИсходнаяТаблица Цикл 
 // Добавить новую строку в таблицу-получатель. 
        НоваяСтрока = ТаблицаПолучатель.Добавить(); 
       // Заполнить значения в совпадающих ячейках. 
  Для Каждого ИмяКолонки Из ОдноименныеКолонки Цикл 
              НоваяСтрока[ИмяКолонки] = СтрокаИсходнойТаблицы[ИмяКолонки]; 
 КонецЦикла; 
КонецЦикла;