Hi Johan,

Am Sun, 15 Oct 2017 21:51:15 -0700 (PDT) schrieb :

In an excell sheet I have selected multiply rows which are not always near eachother like row 2 till 5 and with CTRL row 10 till 20 and with CTRL row 30 till 35.

Now I want to registrate the actual date/time for all those selected rows in column X

try:

Sub TimeStamp()
Dim myRow As Range

For Each myRow In Selection.Rows
Cells(myRow.Row, "X") = Date
Next
End Sub


Regards
Claus B.
--
Windows10
Office 2016