Загрузка данных из таблицы Excel в ТЗ (Таблицу значений)

Код для 7 версии, при использовании в 8-ой — заменить E=СоздатьОбъект("Excel.Application");
на
E=Новый COMОбъект("Excel.Application");

Подсказал Abadonna.