Macro to create a copy of the Workbook with a Time stamp

---

Create a copy of the workbook with a Time stamp

---

Sub CreateCopyWithTimeStamp()
Dim NewCopy As String
NewCopy = ActiveWorkbook.Path & "\" & Format(Now, "yy.mm.dd hh,mm AM/PM") _
& " " & ActiveWorkbook.Name
ActiveWorkbook.SaveCopyAs Filename:=NewCopy
End Sub

---

How to use codes shared here?