Aqil Macro: Backup File

Kamis, 21 Oktober 2021

Backup File

Option Explicit

Sub backup()

ThisWorkbook.SaveCopyAs Filename:=ThisWorkbook.Path & "\" & _

Format(Date, "dd-mmmm-yyyy") & " hasil " & Sheets(1).Range("B2").Value

'=====atau ThisWorkbook.Name

End Sub

Tidak ada komentar:

Posting Komentar

Langganan: Posting Komentar (Atom)