adam.coles
New Member
- Joined
- Sep 14, 2006
- Messages
- 3
Similar to Paste Special>Paste Values, I want to paste the cell value in a macro. The current portion of the macro is as follows:
Set sh3 = Worksheets("Sheet3")
Set dest = sh3.Range("A5").End(xlDown).Offset(1, 0)
sh3.Range("F4").Copy Destination:=dest
Cell "F4" is copied to the bottom of column A. However, it is copying the formula: =TODAY(). I would like this date to be pasted as the actual date i.e. so that it doesn't change.
Any help would be much appreciated.
Thanks
Set sh3 = Worksheets("Sheet3")
Set dest = sh3.Range("A5").End(xlDown).Offset(1, 0)
sh3.Range("F4").Copy Destination:=dest
Cell "F4" is copied to the bottom of column A. However, it is copying the formula: =TODAY(). I would like this date to be pasted as the actual date i.e. so that it doesn't change.
Any help would be much appreciated.
Thanks