Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.misc
|
|||
|
|||
PASTE SPECIAL
I have this code to submit a time stamp whenever a button is pushed but I
want it to paste Special so the time stays static and does not update with each push of the button. Sub TimeStamp() Dim DestCell As Range With Worksheets("Sheet") Set DestCell = .Range("AU48") End With Do If IsEmpty(DestCell.Value) Then Exit Do Else Set DestCell = DestCell.Offset(0, 1) End If Loop DestCell.Formula = "=TIME(HOUR(NOW()),MINUTE(NOW()),SECOND(NOW()) )" |
#2
Posted to microsoft.public.excel.misc
|
|||
|
|||
PASTE SPECIAL
one way:
destcell.value = Time or to keep your formula with destcell .Formula = "=TIME(HOUR(NOW()),MINUTE(NOW()),SECOND(NOW()) )" .value = .value end with And you can change the formula to one of the corrected versions in your previous thread. Jase wrote: I have this code to submit a time stamp whenever a button is pushed but I want it to paste Special so the time stays static and does not update with each push of the button. Sub TimeStamp() Dim DestCell As Range With Worksheets("Sheet") Set DestCell = .Range("AU48") End With Do If IsEmpty(DestCell.Value) Then Exit Do Else Set DestCell = DestCell.Offset(0, 1) End If Loop DestCell.Formula = "=TIME(HOUR(NOW()),MINUTE(NOW()),SECOND(NOW()) )" -- Dave Peterson |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
Can't Copy and Paste or Paste Special between Excel Workbooks | Excel Discussion (Misc queries) | |||
'paste special', 'paste link' formatting transfer | Excel Discussion (Misc queries) | |||
PASTE LINK option not available when I select PASTE SPECIAL to link an image in Excel to a Word document. | Links and Linking in Excel | |||
In Excel: add a Paste-Special Option to paste IN REVERSE ORDER. | Excel Worksheet Functions | |||
Paste and Paste Special command are not enabled in Excel | Excel Worksheet Functions |