Cara menggunakan fungsi excel di VBA
Cara menggunakan fungsi excel di VBA, Induk dari semua objek adalah Excel itu sendiri. Kami menyebutnya objek Aplikasi . Objek aplikasi memberikan akses ke banyak opsi terkait Excel.
WorksheetFunction
Anda dapat menggunakan properti WorksheetFunction di Excel VBA untuk mengakses fungsi Excel.
1. Misalnya, letakkan tombol perintah pada lembar kerja Anda dan tambahkan baris kode berikut:
Range(“A3”).Value = Application.WorksheetFunction.Average(Range(“A1:A2”))
Saat Anda mengklik tombol perintah pada lembar kerja, Excel VBA menghitung rata-rata nilai di sel A1 dan sel A2 dan menempatkan hasilnya ke dalam sel A3.
Catatan: alih-alih Application.WorksheetFunction.Average, cukup gunakan WorksheetFunction.Average. Jika Anda melihat bilah rumus, Anda dapat melihat bahwa rumus itu sendiri tidak disisipkan ke dalam sel A3. Untuk memasukkan rumus itu sendiri ke dalam sel A3, gunakan baris kode berikut:
Range(“A3”).Value = “=AVERAGE(A1:A2)”
ScreenUpdating
Terkadang Anda mungkin merasa berguna untuk menonaktifkan pembaruan layar (untuk menghindari kedipan) saat menjalankan kode. Hasilnya, kode Anda akan berjalan lebih cepat.
1. Misalnya, letakkan tombol perintah pada lembar kerja Anda dan tambahkan baris kode berikut:
Dim i As Integer
For i = 1 To 10000
Range(“A1”).Value = i
Next i
Saat Anda mengklik tombol perintah pada lembar kerja, Excel VBA menampilkan setiap nilai sepersekian detik dan ini bisa memakan waktu.
2. Untuk mempercepat proses, perbarui kode sebagai berikut.
Dim i As Integer
Application.ScreenUpdating = False
Untuk i = 1 To 10000
Range (“A1”). Value = i
Next i
Application.ScreenUpdating = True
Hasilnya, kode Anda akan berjalan lebih cepat dan Anda hanya akan melihat hasil akhirnya (10000).
DisplayAlerts
Anda dapat menginstruksikan Excel VBA untuk tidak menampilkan peringatan saat menjalankan kode.
1. Misalnya, letakkan tombol perintah pada lembar kerja Anda dan tambahkan baris kode berikut:
ActiveWorkbook.Close
Saat Anda mengklik tombol perintah pada lembar kerja, Excel VBA menutup file Excel Anda dan meminta Anda untuk menyimpan perubahan yang Anda buat.
2. Untuk menginstruksikan Excel VBA agar tidak menampilkan peringatan ini saat menjalankan kode, perbarui kode sebagai berikut.
Application.DisplayAlerts = Salah
ActiveWorkbook.Close
Application.DisplayAlerts = Benar
Akibatnya, Excel VBA menutup file Excel Anda, tanpa meminta Anda menyimpan perubahan yang Anda buat. Setiap perubahan hilang.
Perhitungan
Secara default, penghitungan diatur ke otomatis. Akibatnya, Excel menghitung ulang buku kerja secara otomatis setiap kali nilai yang memengaruhi rumus berubah. Jika buku kerja Anda berisi banyak rumus kompleks, Anda bisa mempercepat makro Anda dengan mengatur penghitungan ke manual.
1. Misalnya, letakkan tombol perintah pada lembar kerja Anda dan tambahkan baris kode berikut:
Application.Calculation = xlCalculationManual
Saat Anda mengklik tombol perintah di lembar kerja, Excel VBA mengatur penghitungan ke manual.
2. Anda dapat memverifikasi ini dengan mengklik File, Opsi, Rumus.
3. Sekarang ketika Anda mengubah nilai sel A1, nilai sel B1 tidak dihitung ulang.
Anda bisa menghitung ulang buku kerja secara manual dengan menekan F9.
4. Dalam kebanyakan situasi, Anda akan menyetel penghitungan ke otomatis lagi di akhir kode Anda. Cukup tambahkan baris kode berikut untuk mencapai ini.
Application.Calculation = xlCalculationAutomatic
Seorang pengajar dan pembelajar yang mengurus lembaga pelatihan dan kursus komputer bernama LKP Naura