VBA Integer

Integer adalah tipe data dalam VBA yang diberikan ke variabel apa pun untuk menampung nilai integer, batasan atau braket untuk jumlah variabel integer dapat menampung serupa di VBA dengan bahasa lain, variabel apa pun didefinisikan sebagai integer variabel menggunakan pernyataan DIM atau kata kunci di VBA.

Integer VBA Excel

Tipe data sangat penting dalam bahasa pengkodean apa pun karena semua deklarasi variabel harus diikuti oleh tipe data yang ditugaskan ke variabel tersebut. Kami memiliki beberapa tipe data untuk dikerjakan dan setiap tipe data memiliki kelebihan dan kekurangannya masing-masing. Saat kita mendeklarasikan variabel, penting untuk mengetahui detail tentang tipe data tertentu. Ini adalah artikel yang didedikasikan untuk tipe data "Integer" di VBA. Kami akan menunjukkan kepada Anda gambaran lengkap dari tipe data "Integer".

Apa itu Tipe Data Integer?

Bilangan bulat adalah bilangan bulat yang bisa jadi positif, negatif, dan nol tetapi bukan bilangan pecahan. Dalam konteks VBA, "Integer" adalah tipe data yang kami tetapkan ke variabel. Ini adalah tipe data numerik yang dapat menampung bilangan bulat tanpa posisi desimal. Tipe data integer penyimpanan 2 byte yang merupakan setengah dari tipe data PANJANG VBA yaitu 4 byte.

Contoh Tipe Data Integer VBA Excel

Berikut adalah contoh tipe Data Integer VBA.

Anda dapat mengunduh Templat Tipe Data Integer VBA ini di sini - Templat Tipe Data Integer VBA

Contoh 1

Saat kita mendeklarasikan variabel, perlu untuk menetapkan tipe data ke dalamnya dan integer salah satunya yang biasanya digunakan oleh semua pengguna berdasarkan persyaratan.

Seperti yang saya katakan, integer hanya bisa menampung bilangan bulat, bukan bilangan pecahan. Ikuti langkah-langkah di bawah ini untuk melihat contoh tipe data integer VBA.

Langkah 1: Deklarasikan variabel sebagai Integer.

Kode:

 Sub Integer_Example () Dim k Sebagai Integer End Sub 

Langkah 2: Tetapkan nilai 500 ke variabel "k".

Kode:

 Sub Integer_Example1 () Dim k Sebagai Integer k = 500 End Sub 

Langkah 3: Tampilkan nilai di kotak pesan VBA.

Kode:

 Sub Integer_Example1 () Dim k Sebagai Integer k = 500 MsgBox k End Sub 

Ketika kita menjalankan kode menggunakan tombol F5 atau secara manual, kita dapat melihat 500 di kotak pesan.

Contoh # 2

Sekarang saya akan menetapkan nilai sebagai -500 ke variabel "k".

Kode:

 Sub Integer_Example2 () Dim k Sebagai Integer k = -500 MsgBox k End Sub 

Jalankan kode ini secara manual atau tekan F5, itu juga akan menunjukkan nilai -500 di kotak pesan.

Contoh # 3

Seperti yang saya katakan, tipe data VBA Integer hanya dapat menampung bilangan bulat bukan bilangan pecahan seperti 25.655 atau 47.145.

Namun, saya akan mencoba menetapkan nomor pecahan ke tipe data Integer VBA. Untuk contoh lihat kode di bawah ini.

Kode:

 Sub Integer_Example3 () Dim k Sebagai Integer k = 85.456 MsgBox k End Sub 

Saya telah menetapkan 85.456 ke variabel "k". Saya akan menjalankan kode VBA ini untuk melihat apa hasilnya.

  • Ini telah mengembalikan hasil sebagai 85 meskipun saya telah menetapkan nilai bilangan pecahan. Ini karena VBA membulatkan bilangan pecahan ke bilangan bulat terdekat.
  • Semua bilangan pecahan yang kurang dari 0,5 akan dibulatkan ke bawah ke bilangan bulat terdekat. Untuk contoh 2.456 = 2, 45.475 = 45.
  • Semua bilangan pecahan yang lebih besar dari 0,5 akan dibulatkan ke atas ke bilangan bulat terdekat. Misalnya 10,56 = 11, 14,789 = 15.

Untuk melihat lagi pada integer roundup memungkinkan nilai “k” menjadi 85,58.

Kode:

 Sub Integer_Example3 () Dim k Sebagai Integer k = 85.58 MsgBox k End Sub 

Ketika saya menjalankan kode ini menggunakan tombol F5 atau secara manual akan mengembalikan 86 karena apa pun yang lebih dari 0,5 akan dibulatkan ke bilangan bulat berikutnya.

Batasan Tipe Data Integer di Excel VBA

Kesalahan Melimpah: Tipe data bilangan bulat harus berfungsi dengan baik selama nilai yang ditetapkan antara -32768 hingga 32767. Saat itu melewati batas di kedua sisi itu akan menyebabkan Anda kesalahan.

Untuk contoh lihat kode di bawah ini.

Kode:

 Sub Integer_Example4 () Dim k Sebagai Integer k = 40000 MsgBox k End Sub 

Saya telah menetapkan nilai 40000 ke variabel "k".

Karena saya memiliki pengetahuan lengkap tentang Tipe Data Integer pasti saya tahu itu tidak berfungsi karena tipe data integer tidak dapat menyimpan nilai lebih dari 32767.

Mari kita jalankan kode secara manual atau melalui tombol F5 dan lihat apa yang terjadi.

Ups !!!

Saya mendapat error sebagai "Overflow" karena tipe data Integer tidak dapat menampung lebih dari 32767 untuk bilangan positif dan -32768 untuk bilangan negatif.

Jenis Kesalahan Tidak Cocok: Data bilangan bulat hanya dapat menampung nilai numerik antara -32768 hingga 32767. Jika ada nomor yang ditetapkan lebih dari angka ini akan menampilkan kesalahan Overflow.

Sekarang saya akan mencoba untuk memberikan nilai teks atau string padanya. Dalam kode contoh di bawah ini saya telah menetapkan nilai sebagai "Halo".

Kode:

 Sub Integer_Example4 () Dim k Sebagai Integer k = "Halo" MsgBox k End Sub 

Saya akan menjalankan kode ini melalui opsi run atau secara manual dan melihat apa yang terjadi.

Ini menunjukkan kesalahan sebagai "Type mismatch" karena kita tidak dapat menetapkan nilai teks ke variabel "tipe data integer".