SAVEAS DATA / COPY DATA DENGAN NAMA BARU MENGGUNAKAN VBA AUTO SAVE

 

 SAVE AS untuk BackUp data menggunkan textbox utnuk membuat nama baru filenya,

 Auto copy /gandakan file sesuai namanya untuk backup.

 Hasils Save As di Document


Private Sub CMDTRANSFERDATA_Click()
Dim newName As String
newName = TextBox1.Value
ActiveWorkbook.SaveAs Filename:=newName

    MsgBox " TRANSFER / COPY TRANSAKSI DONE"
End Sub

Post a Comment (0)
Previous Post Next Post