Membuat User Form Login Responsive menggunakan Excel VBA

Excel adalah aplikasi spreadsheet yang kuat yang dapat digunakan untuk mengelola data, membuat laporan, dan bahkan untuk membuat user form untuk interaksi yang lebih mudah antara pengguna dan data. Dalam artikel ini, kita akan membahas cara membuat user form login yang responsif menggunakan VBA di Excel.

User form login adalah elemen penting dalam pengembangan aplikasi untuk memastikan hanya user yang diizinkan yang dapat mengakses data dan fungsionalitas tertentu. Dalam artikel ini, kami akan membahas cara membuat user form login responsif menggunakan Excel VBA.

Langkah 1: Membuat User Form

Langkah pertama adalah membuat user form baru dalam Excel. Untuk melakukannya, buka file Excel baru dan klik "Developer" di menu utama. Jika menu "Developer" tidak muncul, klik "File" dan pilih "Options" lalu aktifkan "Developer Tab". Setelah itu, klik "Insert" dan pilih "UserForm" dari menu drop-down.

Di user form baru, tambahkan elemen-elemen input yang diperlukan untuk login seperti textbox untuk username dan password, serta tombol untuk melakukan login. Atur tata letak elemen-elemen tersebut agar dapat ditampilkan secara responsif pada berbagai ukuran layar.

Langkah 2: Menambahkan Kode VBA

Setelah menambahkan elemen-elemen input pada user form login, selanjutnya tambahkan kode VBA untuk membuat user form menjadi responsif pada berbagai ukuran layar. Kode ini akan memastikan bahwa user form dapat menyesuaikan diri dengan ukuran layar yang berbeda-beda.

coding pertama yang dimasukkan adalah dibawah ini :

Option Explicit
Private Sub UserForm_Initialize()
Me.Height = Application.Height / 2
Me.Width = Application.Width / 3
Me.Top = (Application.Height - Me.Height) / 2
Me.Left = (Application.Width - Me.Width) / 2
End Sub

Private Sub UserForm_Resize()
Me.Height = Application.Height / 2
Me.Width = Application.Width / 3
Me.Top = (Application.Height - Me.Height) / 2
Me.Left = (Application.Width - Me.Width) / 2
End Sub

Penjelasan koding diatas :

Pertama, kita menggunakan event "Initialize" pada user form untuk menentukan ukuran dan posisi form ketika user form pertama kali dimuat.

Kedua, kita menggunakan event "Resize" pada user form untuk menyesuaikan ukuran dan posisi form ketika user merubah ukuran layar atau mengubah orientasi perangkat.

Langkah 3: Menambahkan Kode Login

Setelah menambahkan kode responsif pada user form login, selanjutnya kita akan menambahkan kode untuk melakukan login. Kode ini akan memeriksa apakah username dan password yang dimasukkan oleh user benar atau tidak. Jika benar, user dapat mengakses data dan fungsionalitas yang terkait. Jika tidak, user akan diberikan pesan kesalahan.

Private Sub cmdLogin_Click()
Dim strUsername As String
Dim strPassword As String

strUsername = txtUsername.Value
strPassword = txtPassword.Value

If strUsername = "admin" And strPassword = "password" Then
MsgBox "Login berhasil!", vbInformation, "Login"
Unload Me
Else
MsgBox "Login gagal. Periksa kembali username dan password Anda.", vbCritical, "Login"
txtUsername.Value = ""
txtPassword.Value = ""
txtUsername.SetFocus
End If
End Sub

Kode diatas akan mengatur ukuran form sesuai dengan ukuran layar, sehingga form akan selalu terlihat responsif. Ketika tombol login ditekan, kode akan memeriksa apakah username dan password yang dimasukkan cocok dengan nilai yang telah ditentukan. Jika login berhasil, sebuah pesan akan muncul memberi tahu bahwa login berhasil dan form akan ditutup. Jika login gagal, sebuah pesan akan muncul memberi tahu bahwa login gagal dan textbox username dan password akan dikosongkan.

Demikian artikel kali ini semoga bermanfaat, jangan lupa terus kunjungi blog ini, insyallah admin akan terus bagikan artikel menarik lainnya.

Untuk contoh form nya bisa teman-teman unduh pada link dibawah ini gratis, silahkan di oprek kreasikan sendiri untuk keperluan masing-masing.

<< File Download >>