hi clprdctn,

ActiveCell.Value = DateClicked & "     " & "Notes: .........." & Chr(10) & Chr(10) & ActiveCell.Value