VBA Excel Populate date and time in excel cell

'Populate Date and time in Date field G8
Sheets("sheet1").Range("A1") = Format(Now, "dd-mm-yyyy hh:mm")