Buka microsoft office anda, maksudnya microsoft excel
Sebelum masuk ke jendela VBE, lakukan pengaturan pada worksheet, buatlah tabel dengan kolom User Name dan Password, lihat contoh tabel dibawah ini
- | A | B | C |
1 | USER | PASSWORD | |
---|---|---|---|
2 | Admin | Admin | |
3 |
Setelah anda selesai membuat tabel sebagaimana tabel diatas, sekarang masuk ke jendela Visual basic Editor ( VBE )
Insert Userform
Pada Userform Seret kontrol Label, textbox dan commandbutton
Lihat contoh design userform untuk membuat menu log in dibawah ini
Pada gambar diatas ada tombol OK, BATAL, dan KELUAR ( dengan icon )
Kemudian masukan semua kode macro dibawah ini kedalam userform
Private Sub lblbatal_Click()
txtuser = ""
txtpassword = ""
End Sub
Private Sub lblkeluar_Click()
ThisWorkbook.Close
End Sub
Private Sub lblok_Click()Tekan F5 pada keybord komputer anda, lalu silahkan anda masukan user name dan password "Admin" , lalu klik OK
UserName = Sheets("Sheet1").Range("A3").Value
Password = Sheets("Sheet1").Range("B3").Value
If txtuser <> UserName Then
Exit Sub
ElseIf txtpassword <> Password Then
Exit Sub
End If
Unload Me
Call lblbatal_Click
End Sub