VBA. Excel. Экспорт данных.

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

Возникла необходимость произвести экспорт данных из одного файла excel в другой.С VBA знаком поскольку постольку,т.е. чайник.
Как,например,ячейку А1 из файла my.xls экспортировать (т.е. скопировать) в А1 файла d.xls.
Заранее спасибо.

Решение задачи: «VBA. Excel. Экспорт данных.»

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

                            <font color="blue">Dim</font> i <font color="blue">As</font> <font color="blue">Long</font>
<font color="blue">Dim</font> n <font color="blue">As</font> <font color="blue">Long</font>
<font color="blue">Set</font> n = Columns(<font color="darkblue"><b>3</b></font>).Find(What:=<font color="teal">"*"</font>, SearchDirection:=xlPrevious, SearchOrder:=xlByRows).Offset(<font color="darkblue"><b>1</b></font>, <font color="darkblue"><b>0</b></font>).Row
                        