Menyimpan Word Otomatis

Ok neh adalah ttrik yang berguna bagi kamu"" yang mengetik data yang sangat penting dan tidak mau hiLang karena Suatu sebab.

Kadangkala kita Lg mengetik tapi tiba'' Listrik padam,,. uhk kesal bgt kan hilang percuma bgtu saja. 

Beda bagi kamu yamg pakai Laptop ataupun Baterai Adaptor.

LANGKAH 1

BUka Ms. Word Lalu tekan Alt + F11

LANGKAH 2Klik kanan di Normal => Klik Insert => Klik Module

LANGKAH 3

Ketikkan Script code program seperti di dalam gambar atau CopAS code berikut

'Tips dan Trik Visual Basic Editor'
'CopyLeft by Gusti11'
'http://itc-antahbarantah.blogspot.com'

Sub AddName()
    Dim NamaFile
    NamaFile = InputBox("Masukkan Nama File", "Gusti's Project")
    If NamaFile = "" Then Exit Sub
    Documents.Add
    ActiveDocument.SaveAs FileName:=NamaFile
End Sub

Sub FileNew()
    Call AddName
End Sub

Sub AutoNew()
    Call AddName
End Sub

                                                                                  

 

LANGKAH 4
Save Project ( Ctrl + S ) dan matikan Microsoft Visual Basic pada Word
SELESAI , kini siap dicoba.

BUat Dokumen Baru. Ketikkan Nama Kamu Lalu Ok. Jika Hanya ingin 1 dokumen aja Klik Cancel.