update cells to today date in a list of dates

I have a list of dates I review daily and want to be able to click on an icon
or button beside each date to update it to todays date and not change the
other dates.

assign the following two-liner to a button and use it for any cell, rather than a button for each cell:

Sub refresh_date()
Dim sDate As String
ActiveCell.Value = Format(Now(), "yyyy-mmm-dd")

End Sub