Enter Date while range selected

[Papi]

Say rows 22:35 are selected and column K needs todays date in each of the cells from K22:K35 that a macro could do that? The rows would vary each time eg. next time could be 36:72 or 36:36 etc.

 

[Norie]

Perhaps.

Intersect(Selection.EntireRow, Range("K:K")).Value = InputBox("Please enter the data:")

 

[Papi]

Thanks very much Norie. With almost 70,000 posts your expertise show up in full color. My hat off to you on your hat trick.