Написал вам два письма на почту с заголовком "Письмо с Форума по VBA, Excel и Word". Написал именно на почту, а не на форум.
Этот макрос копирует данные из первого листа из ячейки A1 на второй лист в ячейку A1:
Sub Макрос()
Worksheets(2).Range("A1").Value = Worksheets(1).Range("A1").Value
End Sub