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