O código postado pelo Wagner é o ideal, igualar os valores das diferentes células.
Mas, caso você prefira usar Copy/Paste, segue uma forma alternativa:
Sheets("Plan1").Range ("A1").Copy Sheets("Plan2").Range ("B1")
abs,
FF
Postado : 28/01/2014 6:57 am