Fungsi VBA CLng | Bagaimana cara menggunakan Fungsi CLng? (dengan Contoh)

Fungsi Excel VBA CLng

“CLNG” berarti tipe data “Convert to Long”. Batas tipe data integer adalah antara -32768 hingga 32767, jadi jika ada kelebihan yang ingin Anda simpan ke variabel ini maka kita perlu menggunakan tipe data LONG di VBA.

Variabel adalah kunci dalam bahasa pemrograman apa pun dan VBA juga tidak berbeda. Tanpa menggunakan variabel, hampir tidak mungkin menulis kode yang panjang. Jika variabel penting maka variabel tipe data yang kita tetapkan ke variabel ini bahkan lebih penting karena tipe data yang kita tetapkan padanya adalah hasil akhir yang kita dapatkan.

Seringkali kita dapat menetapkan data numerik sebagai “String” sehingga ini akan menimbulkan kesalahan saat melakukan perhitungan, sehingga dengan menggunakan fungsi convert kita dapat mengubah tipe data yang kita inginkan. Fungsi converter yang biasa digunakan adalah CLng, CInt, CDbl, CDate, CDec in vba. Pada artikel ini, kami akan menunjukkan kepada Anda tentang fungsi konversi tipe data integer "CLNG".

Sintaksis

Di bawah ini adalah sintaks dari fungsi CLNG.

Ekspresi tidak lain adalah nilai atau variabel yang ingin kita ubah menjadi tipe data LONG.

Catatan: Nilai yang kami coba konversi harus berupa angka, apa pun selain nilai numerik akan menyebabkan "Run Time Error 13: Type Mismatch"

Contoh untuk Menggunakan Fungsi CLng di VBA

Anda dapat mendownload Template Excel VBA CLNG ini di sini - Template Excel VBA CLNG

Contoh 1

Sekarang kita akan melihat bagaimana kita mengubah nilai yang disimpan teks ke tipe data "Long".

Untuk contoh lihat kode di bawah ini.

Kode:

 Sub CLNG_Example1 () Redupkan LongNumber Sebagai String Dim LongResult As Long LongNumber = "2564589" LongResult = CLng (LongNumber) MsgBox LongResult End Sub

Jadi, sekarang periksa kodenya untuk memahami cara kerjanya.

Pertama, kami telah mendeklarasikan dua variabel String dan Long masing-masing.

Kode:

 Redupkan Jumlah Panjang Sebagai String Redup PanjangHasil Selama

Untuk variabel string kami telah menetapkan nomor nilai tetapi dalam tanda kutip ganda, jadi yang akan dilakukan adalah akan memperlakukan nomor "2564589" sebagai string, bukan sebagai variabel "Panjang". Sekarang untuk variabel lain LongResult, kami telah menggunakan fungsi Clng (LongNumber) untuk mengubah nomor yang disimpan string menjadi variabel LONG.

Kotak pesan berikutnya akan menampilkan hasil berupa angka PANJANG yang diubah dari string menjadi tipe data panjang.

Keluaran:

Contoh # 2

Sekarang lihat kode di bawah ini.

Kode:

 Sub CLNG_Example2 () Redupkan LongNumber Sebagai String Dim LongResult As Long LongNumber = "Nomor Panjang" LongResult = CLng (LongNumber) MsgBox LongResult End Sub

Ini akan memberi kita hasil sebagai "Type Mismatch" .

Memahami mengapa kesalahan itu terjadi sangat penting untuk memperbaiki kesalahan tersebut. Ketika Anda melihat lebih dekat pada variabel untuk variabel pertama LongNumber kami telah menetapkan nilai teks sebagai "Nomor Panjang" maka kami telah menggunakan fungsi excel VBA CLNG untuk mengubahnya menjadi tipe data LONG.

Alasan mengapa kami mendapatkan kesalahan ini adalah bahwa tipe data LONG hanya dapat menerima tipe data numerik karena kami telah memberikan nilai string ke variabel itu tidak dapat mengubah nilai string atau nilai teks menjadi tipe data yang panjang, jadi ini memberikan kesalahan sebagai " Ketik Mismatch ”.

Contoh # 3

Satu lagi error yang kita dapatkan dengan tipe data LONG adalah “Overflow Error in vba” yaitu tipe data variabel panjang dapat menampung nilai dari -2,147,483,648 hingga 2,147,483,647. Jadi nilai apa pun di atas ini akan menyebabkan kesalahan luapan.

Untuk contoh lihat kode di bawah ini.

Kode:

 Sub CLNG_Example3 () Redupkan LongNumber Sebagai String Redup LongResult As LongNumber = "25645890003" LongResult = CLng (LongNumber) MsgBox LongResult End Sub

Untuk variabel "LongNumber" saya telah menetapkan nomor "25645890003" yang melebihi batas tipe data "Long". Ketika kita menjalankan kode di atas, ia akan menemui kesalahan "Overflow" .