Как считывать данные из одного excel-файла (по ячейкам, столбцам) и записывать в другой. - VB

Формулировка задачи:

Господа, подскажите как правильно считывать данные из excel-файла и записывать их в другой. Например, мне из одной таблицы нужно "вытянуть" несколько колонок и записать их соотв. в другой файл.

Решение задачи: «Как считывать данные из одного excel-файла (по ячейкам, столбцам) и записывать в другой.»

textual
                            Листинг программы 
                        

                            <font color="blue">Dim</font> i <font color="blue">As</font> <font color="blue">Integer</font>
    <font color="blue">Dim</font> n <font color="blue">As</font> <font color="blue">Long</font>
    
    n = <font color="darkblue"><b>4</b></font>
    
    <font color="blue">For</font> i = <font color="darkblue"><b>1</b></font> <font color="blue">To</font> n
        ThisWorkbook.Worksheets(<font color="teal">"Лист1"</font>).Range(<font color="teal">"D"</font> & i).FormulaLocal = _
          <font color="teal">"=Произвед(A"</font> & i & <font color="teal">":"</font> & <font color="teal">"B"</font> & i & <font color="teal">")"</font>
    <font color="blue">Next</font>
                        