Setting the Offset values

ActiveCell.Offset(0, 1).Value = Time ‘ moving the cursor to one next column right side

 

 

ActiveCell.Offset(1, 0).Value = Date ‘ moving the cursor to one row down in same column

 

 

 

ActiveCell.Offset(1, 1).Value = Time ‘ moving the cursor to one row down and one column ahead.

 

 

ActiveCell.Offset(-1, 0).Value = Date ‘ moving the cursor to one row up in the same column