The "OffSet" property identifies the row and column location of your
spreadsheet by number, depending of course on the current active cell.
i.e. ActiveCell.Offset(0,1) means current active selected row plus one
column to the right. Change the second number  in the OffSet condition to
match the number of columns over from column A you want the date  to be
placed. Since you said H is your column, then it should be set to 7. ---
ActiveCell.Offset(0,7).value = "Date".