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