• Cara Menggunakan KeyCode Agar Setiap Tombol KeyBoard Memiliki Perintah yang Berbeda

    menggunakan KeyCode Macro VBA KeyCode merupakan sebuah kode yang yang dapat dianggap sebagai kunci individual pada keyboard Anda, dimana setiap tombol pada keyboard Anda memiliki nilai kode kunci unik. Akan tetapi untuk sebagian tombol keyboard, mereka berbagi nilai atau kode tersebut, misalnya seperti tombol + dan = sama-sama memiliki nilai kode kunci yang sama yakni (187), hal ini karena secara fisik kedua nilai tersebut berada dalam satu tombol atau tuts keyboard yang sama. Hal ini juga berlaku untuk tombol : dan ; atau [ dan {.

    Apa yang bisa kita lakukan setelah tahu kode-kode yang dimiliki oleh setiap tuts yang ada di keyboard tersebut ?

    Nah, karena setiap tombol keyboard memiliki kode yang berbeda (kecuali tombol yang secara fisik memiliki 2 buah nilai yang sama) maka kita bisa memberikan perintah-perintah yang berbeda pula. Sebagai contoh, kita bisa menjalankan perintah untuk menyimpan file ketika menekan tombol F2, atau ketika menekan tombol Home untuk menjalankan perintah menutup userform, dan lain sebagainya.

    Oke. karena tema tutorial excel kali ini berhubungan dengan parameter KeyCode maka prosedur ini hanya bisa dijalankan pada sebuah UserForm, dan oleh sebab itu untuk membuat masing-masing atau sebagian tombol keyboard agar memiliki fungsi atau perintah yang berbeda maka syarat utamanya adalah harus membuat UserForm terlebih dahulu.
    Secara lengkap, berikut langkah-langkahnya:
    1. Buka aplikasi Microsoft Excel kemudian silahkan tekan tombol pintas Alt+F11 untuk menuju jendela Microsoft Visual Basic Editor
    2. Setelah berada di jendela Microsoft Visual Basic Editor, silahkan buat sebuah UserForm dan tambahkan beberapa VBA control seperti gambar berikut
      UserForm keycode excel
    3. Selanjutnya untuk masing-masing tombol yang sudah Anda buat, berikan perintah dengan prosedur yang dipilih adalah KEYDOWN. Untuk kode lengkapnya, silahkan anda copy paste kode berikut di jendela kode
      Private Sub TextBox1_KeyDown(ByVal KeyCode As MSForms.ReturnInteger, ByVal Shift As Integer)
      If KeyCode = vbKeyDelete Then
          MsgBox "Anda Menekan Tombol DELETE"
          
          ElseIf KeyCode = vbKeyShift Then
          MsgBox "Anda Menekan Tombol SHIFT" & vbCr & "Kursor akan pindah ke TextBox berikutnya"
          TextBox2.SetFocus
      End If
      End Sub
      
      Private Sub TextBox2_KeyDown(ByVal KeyCode As MSForms.ReturnInteger, ByVal Shift As Integer)
      If KeyCode = vbKeyBack Then
          MsgBox "Anda Menekan Tombol BACKSPACE" & vbCr & "Kursor akan fokus ke TextBox1"
          TextBox1.SetFocus
          
          ElseIf KeyCode = vbKeyEnd Then
          MsgBox "Anda Menekan Tombol END" & vbCr & "Kursor akan fokus ke CommandButton1"
          CommandButton1.SetFocus
      End If
      End Sub
      
      Private Sub CommandButton1_KeyDown(ByVal KeyCode As MSForms.ReturnInteger, ByVal Shift As Integer)
      If KeyCode = vbKeyBack Then
          MsgBox "Anda Menekan Tombol BACKSPACE" & vbCr & "Kursor akan fokus ke TextBox2"
          TextBox2.SetFocus
          
          ElseIf KeyCode = vbKeyHome Then
          MsgBox "Anda Menekan Tombol HOME" & vbCr & "Kursor akan fokus ke TextBox1"
          TextBox1.SetFocus
      End If
      End Sub
      

    Setiap kode yang saya gunakan di atas menggunakan statemen IF yang saya kombinasikan dengan prosedur keycode untuk menjalankan perintah tertentu (baca : kotak pesan), dan hanya akan dijalankan ketika pengguna menekan tombol-tombol yang sudah saya tentukan pada tiap-tiap objek vba dalam userform tersebut. Untuk lebih jelasnya, silahkan demo hasil akhir dari tutorial akhir berikut ini:
    Panduan Menggunakan Parameter KeyCode VBA Excel

    Selamat...Anda sudah berhasil menentukan tiap-tiap tombol keyboard agar mempunyai perintah sendiri-sendiri dengan menggunakan statemen KeyCode.
    semoga panduan singkat tentang cara penggunaan prosedur KeyDown bisa memberikan wawasan baru untuk anda. Jangan lupa kunjungi channel youtube kami untuk mendapatkan video tutorial terbaru dari excelive.com. Gracias



    Artikel Terkait

  • Still haven't found what are you looking for

    We have provided a complete list of articles on this site to make it easier for you and giving the best solution for your excel issues

    VISIT LINK
    DMCA.com Protection Status

    excelive.com
    is a blogger resources site who provides best excel tutorial based on daily needs. The main mission of excelive is to share our little experience in excel to deliver best time killer for your excel issues, such as the following :
    Macro VBA Excel Functions Custom UDF many more...
    T.O.S
    Term of service

    Read More
    Download Area
    to complete all excel lessons, we have provided a download link for you Find Here
    Copyright © 2016 - excelive.com. Some rights reserved.
    Menyalin sebagian atau keseluruhan materi situs hanya diperbolehkan dengan tautan balik terbuka ke sumbernya.
    equipped with by blogger