Inilah VBA Untuk Membuat Shutdown OS Windows

Niguru.com | Senin, 24 Jun 2019 | Pada beberapa aplikasi tertentu, kadangkala diperlukan fasilitas untuk keluar dari OS dan mematikan komputer. Biasa programmer membutuhkan fungsi ini untuk aplikasi yang bersifat “utilities” (pengaturan kinerja OS).

Misalnya saja aplikasi yang berfungsi untuk menjalankan suatu hardware, dimana bersamaan dengan di-copy-nya file untuk membantu jalannya hardware, di-instal juga beberapa file library yang didaftarkan pada registry. Maka untuk memastikan seluruh library dijalankan oleh system, biasanya diperlukan restart.



Atau bisa juga suatu aplikasi yang setelah waktu tertentu akan stop dengan sendirinya dan untuk menghemat pemakaian listrik dan memperpanjang usia komputer maka komputer dimatikan saat tidak dipakai.

Berikut ini procedure untuk mematikan Windows:

Sub ShutdownWin()
Dim OpsiKu As String

OpsiKu = "/s" 'opsi untuk shut down
' pilihan opsi lainnya:
' opsi untuk restart /r
' opsi untuk log off /l
' opsi untuk hibernate /h

OpsiKu = "Shutdown.EXE " & OpsiKu
Shell OpsiKu, vbNormalFocus

End Sub

Demikianlah VBA untuk membuat PC mati atau restart, dimana instruksi harus disesuaikan dengan opsi yang dipilih (ikuti keterangan diatas, yang disisipkan pada script).
Selamat mencoba .. Have a nice day :-)

www.Niguru.com (Nino Guevara Ruwano)