20120831

Excel Date & Time Functions


Sub Time_Now()
Dim s As String
s = Now()
Cells(1, 1) = s
End Sub

No comments:

Post a Comment