Skip to main content

Cara membuat Form Tambah Admin dari Excel Macro menggunakan Visual Basic Application

Assalamualaikum teman-teman semuanya.

Berjumpa lagi di Niruku Entertainment's Blog . Bagi teman-teman yang baru mengunjungi Niruku Entertainment's Blog dan baru saja mengikuti materi pada postingan ini, saya sarankan untuk melihat terlebih dahulu postingan awal dari materi pada postingan ini. Karena ada kesinambungan antar posting. Klik Cara Membuat Form Admin dari Excel Macro menggunakan Visual Basic Application untuk mengikuti materi yang saya berikan dari awal.

Oke, langsung saja pada pokok pembahasan postingan ini.

  • Kita masih tetap di halaman Visual Basic. Tambahkan sebuah UserForm baru, dan ganti namanya menjadi KonfirmasiPassword dan design seperti ini :

Catatan :
- TextBox1 diganti nama menjadi txtpass
- CommandButton1 diganti nama menjadi BTMasuk
- CommandButton2 diganti nama menjadi BTKembali
  • Setelah proses design selesai, kita masuk ke bagian coding. Klik 2x pada BTMasuk dan isikan coding berikut:
Private Sub BTMasuk_Click()
    If txtpass.Value = "niruku94" Then
       'kata-kata niruku94 adalah opsi password kredensi. Silahkan ubah sesuai keinginan teman-teman
        Unload Me
        'pada syntax dibawah, ketik dahulu secara manual, karena nantinya ada penambahan form baru. Harap perhatikan ketentuan penulisan coding dengan benar.
        TambahAdmin.Show
    Else
        MsgBox "Maaf, anda tidak berhak menambah Akun Admin", vbCritical, "Error"
        Unload Me
    End If
End Sub
  • Setelah coding pada BTMasuk dibuat, klik 2x pada BTKembali, dan isikan coding berikut :
Private Sub BTKembali_Click()
    Dim A As String
    A = MsgBox("Kembali ke Form Login ?", vbQuestion + vbYesNo, "Konfirmasi")
    If A = vbYes Then
        Unload Me
    End If
End Sub
  • Design beserta coding pada form KonfirmasiPassword telah selesai kita buat. Tambahkan lagi sebuah UserForm baru dan ganti namanya menjadi TambahAdmin. Design lah formnya seperti berikut:

Catatan :
- TextBox1 diganti nama menjadi txtusername
- TextBox2 diganti nama menjadi txtpass
- CommandButton1 diganti nama menjadi BTTambah
- CommandButton2 diganti nama menjadi BTKembali
  • Kemudian, klik 2x pada Background dari Form TambahAdmin, dan ganti eventnya menjadi Initialize. Lihat pada gambar dibawah ini:
  • Dan isikan coding berikut :
Private Sub UserForm_Initialize
    txtusername.Enabled = False
    txtpass.Enabled = False
    BTTambah.Caption = "TAMBAH"
    BTTambah.SetFocus
End Sub
  • Kemudian, klik 2x pada BTTambah dan isikan coding berikut:
Private Sub BTTambah_Click()
    If BTTambah.Caption = "TAMBAH" Then
        txtusername.Enabled = True
        txtpass.Enabled = True
        txtusername.SetFocus
        BTTambah.Caption = "SIMPAN"
    Else
        If txtusername.Text = "" Or txtpass.Text = "" Then
            MsgBox "Username / Password tidak boleh kosong", vbExclamation, "Warning"
            txtusername.SetFocus
        ElseIf IsNumeric(txtpass.Value) Then
            MsgBox "Karakter awal Password tidak boleh angka !", vbExclamation, "Warning"
            txtpass.Text = ""
            txtpass.SetFocus
        Else
            Dim EmptyRow As Long
            Sheets("Administrator").Activate
            EmptyRow = WorksheetFunction.CountA(Range("A:A")) + 1
                    Cells(EmptyRow, 1).Value = txtusername.Value
                    Cells(EmptyRow, 2).Value = txtpass.Value
            MsgBox "Admin berhasil ditambahkan. Silahkan Login ulang", vbInformation, "Sukses"
            Unload Me
            FormLogin.Show
        End If
    End If
End Sub
  • Kemudian, klik 2x pada BTKembali dan isikan coding berikut :
Private Sub BTKembali_Click()
    Dim A As String
    A = MsgBox("Kembali ke Form Login ?", vbQuestion + vbYesNo, "Konfirmasi")
    If A = vbYes Then
        Unload Me
    End If
End Sub
  • Jika sudah selesai semua, silahkan teman-teman Save dan Close. Kemudian Open kembali dan coba lakukan Tambah Admin. 
  • Hal yang perlu teman-teman ingat adalah pada saat Konfirmasi Password. Di halaman coding pada Form KonfirmasiPassword, kita sudah set password Kredensial nya adalah niruku94. Nah apabila teman-teman mempunyai password Kredensial yang lain, harap selalu diingat penulisan passwordnya agar dapat mengakses form TambahAdmin.
  • Hal ini sengaja dilakukan untuk menghindari terjadinya penambahan Akun Admin secara semena-mena oleh yang berperan sebagai Administrator. Oleh karena itu Password Kredensial hanya boleh diketahui oleh beberapa pihak saja.
Apabila teman-teman kurang mengerti dengan penjelasan dari postingan ini, silahkan simak video berikut :

Oke itu saja terlebih dahulu materi Microsoft Excel VBA Macro yang dapat saya berikan pada postingan ini. Terus pantengin New Post dari Niruku Entertainment's Blog dan jangan lupa Subscribe Channel Niruku Entertainment pada link dibawah ini :
(jangan lupa nyalakan Lonceng agar dapat mengikuti video-video terbaru saya)

Terima kasih semuanya, sampai jumpa di Materi Pembelajaran selanjutnya. Wassalamualaikum 😃
Labels:
Location: Kebun Bunga, Sukarami, Palembang City, South Sumatra 30961, Indonesia

Comments

Post a Comment

Popular posts from this blog

Cara membuat Form Login dari Excel Macro menggunakan Visual Basic Application

Assalamualaikum teman-teman semuanya. Berjumpa lagi dengan Niruku Entertainment's Blogspot.  Sesuai dengan judul dari postingan ini, saya akan memberikan sebuah Materi Pembelajaran mengenai Cara Membuat Form Login dari Excel Macro menggunakan Microsoft Visual Basic Application. Mungkin ada beberapa dari teman-teman yang baru mengenal apa itu Excel Macro. Excel Macro adalah fitur yang telah disediakan oleh pihak Microsoft Office, namun masih belum terlalu banyak orang yang memakai fitur ini. Excel itu sendiri adalah sebuah aplikasi pengolah data berupa angka yang dilengkapi dengan berbagai macam fitur-fitur up-to-date  yang memanjakan usernya. Termasuk juga dalam hal Proteksi Privasi.  Namun, terkadang kita menginginkan proteksi tersendiri dengan menggabungkan aplikasi lain yang terhubung dengan Microsoft Excel. Bagaimana caranya ? Silahkan lanjutkan scroll ke bawah 😄. Buka Microsoft Office Excel kalian (mulai dari Office 07 - 16, tidak ada pengecua...
1 comment
Read more

Cara membuat Form Ganti Password dari Excel Macro menggunakan Visual Basic Application

Assalamualaikum teman-teman semuanya. Berjumpa lagi di Niruku Entertainment's Blog . Nah sekarang kita sudah berada di Materi ke empat nih. Kali ini saya akan memberikan sebuah fitur baru lagi pada File Excel Macro yang kita buat yaitu Form Ganti Password . Namun, bagi teman-teman yang baru berkunjung ke Niruku Entertainment's Blog,  alangkah baiknya untuk mengikuti materi-materi yang sudah saya berikan sebelumnya, saya rincikan dibawah ini : 1.  Cara membuat Form Login dari Excel Macro menggunakan Visual Basic Application 2.  Cara membuat Form Tambah Admin dari Excel Macro menggunakan Visual Basic Application 3.  Cara membuat ProgressBar dari Excel Macro menggunakan Visual Basic Application Jika teman-teman yang baru berkunjung sudah membaca postingan yang sudah saya sebutkan diatas, saya yakin teman-teman akan gampang dan mengerti untuk mengikuti materi saya selanjutnya. Oke langsung saja masuk ke pokok pembahasannya . Klik pada FormLo...
1 comment
Read more

Cara membuat ProgressBar dari Excel Macro menggunakan Visual Basic Application

Assalamualaikum teman-teman semuanya. Berjumpa lagi dengan Niruku Entertainment's Blog. Now, i'll give tips on how to enhance the appearance of the Login Form. Tapi, sebelum itu, bagi teman-teman yang baru berkunjung ke blog ini, alangkah lebih baiknya untuk mengikuti postingan saya sebelumnya agar pada postingan ini dan postingan selanjutnya dapat teman-teman ikuti secara seksama, karena nantinya setiap postingan baru mengenai Microsoft Excel VBA Macro ini akan berkesinambungan antar satu dengan lainnya. Silahkan kunjungi postingan saya yang sebelumnya : Cara Membuat Form Login Dari Excel Macro menggunakan Visual Basic Application  (1) Cara membuat Tambah Admin dari Excel Macro menggunakan Visual Basic Application  (2) Oke langsung saja, pada postingan ini saya akan memberikan 2 materi yaitu Cara Mempercantik Form Login  dan  Merancang Sebuah ProgressBar , yang dimana ProgressBar  yang kita rancang bukan menggunakan Component yang telah disedi...
Post a Comment
Read more