Simpan file sekaligus mengganti dan menghapus file lama

Bagaimana menyimpan file baru dengan macro dan mereplace file lama yang namanya sama.

contoh file baru disimpan dengan nama book2.xlsx, padahal mungkin file lama sudah ada difolder tersebut dengan nama yang sama.

Dim Wk As Workbook

If Dir("C:\book2.xlsx") <> "" Then
Kill "C:\book2.xlsx"
Else 'http://mymacrosformula.blogspot.com/