Menulis Formula Menggunakan Macro VBA - excelive - kumpulan artikel dan tutorial excel

New Posts

Post Top Ad

Your Ad Spot

Menulis Formula Menggunakan Macro VBA

Menulis Formula dengan Macro VBA

Selama ini mungkin kita sudah terbiasa menggunakan Formula Microsoft Excel dalam lembar kerja untuk mengolah data. Sebut saja Formula yang sangat familiar dan yang sering kita gunakan seperti; SUM, AVERAGE, Count, dan yang lainnya.

Tapi siapa sangka jika Formula yang biasa kita gunakan dilembar kerja, ternyata bisa juga ditulis menggunakan kode VBA. Syntax penulisan formulanya pun 100% sama, hanya saja karena Formula ini akan ditulis menggunakan kode, maka jelas ada sedikit perbedaan. Apa saja perbedaanya serta bagaimana membuat dan menulis Formula Microsoft Excel menggunakan Macro VBA ?

Lihat perbedaan penulisan berikut:
  1. =SUM(A1:A5)
  2. Application.WorksheetFunction.Sum(Range("A1:A5"))
Kedua penulisan formula di atas memiliki fungsi yang sama, yakni menjumlahkan data yang ada di range A1 hingga range A5, hanya saja penempatannya yang berbeda.
=SUM(A1:A5) ditulis di lembar kerja, sementara Application.WorksheetFunction.Sum(Range("A1:A5")) ditulis di jendela Visual Basic, atau yang kita kenal dengan Macro VBA.

Bagaimana menggunakannya?
Saya yakin kalau untuk menulis formula SUM di lembar kerja, Anda sudah sangat terbiasa dan sangat mahir melakukannya. karena tinggal menuliskan di sebuah sel yang Anda inginkan untuk melihat hasil akhirnya.
Akan tetapi, untuk menggunakan formula SUM ini menggunakan Macro VBA, ada beberapa tahap yang harus dilakukan, antara lain:
  1. Pastikan dalam lembar kerja Anda sudah mengisikan nilai di range A1 hingga A5
  2. Tekan tombol Alt+F11 untuk menuju jendela Microsoft Visual Basic Editor
  3. Tambahkan sebuah module baru dengan cara 🖰 menu Insert dan pilih Module
  4. di jendela penulisan kode, mulailah mengetik beberapa baris kode berikut
    Sub formulaSUM() 
    dim a as variant    
    a = Application.WorksheetFunction.Sum(Range("A1:A5"))    
    msgbox a    
    End Sub
  5. Tekan tombol F5 atau ikon yang ada di standard toolbar untuk melihat hasilnya
Penjelasan singkat dari Macro VBA di atas
formulaSUM
adalah Judul dari kode VBA, dimana nama judul harus unik atau tidak boleh ada yang sama dalam Projek VBA
Dim a
adalah sebuah deklarasi variabel yang akan digunakan
Variant
adalah sebuah tipe data yang dapat berisi angka, huruf, atau tanggal
Application.WorksheetFunction.Sum(Range("A1:A5"))
adalah sebuah baris utama kode VBA untuk kasus ini
Sum(Range("A1:A5"))
Jika dalam lembar kerja ketika kita menuliskan A1:A5, maka hal ini berarti sel yang terpilih adalah sel A1 hingga sel A5 atau kita menyebutnya dengan istilah range.
Dalam penulisan kode VBA, dengan menuliskan baris A1:A5 saja hanya akan menghasilkan perintah error (debug), oleh karena dari itu untuk mengartikan range A1:A5 maka harus ditulis secara lengkap.
msgbox a
adalah sebuah kotak pesan yang menginformasikan hasil dari formula SUM menggunakan Macro VBA

Model penulisan lain untuk kasus ini, bisa juga ditulis seperti berikut:
Sub formulaSUM()
Dim Range_X As Range
Dim HSL As Variant
Set Range_X = Worksheets("Sheet2").Range("A1:A3")
HSL = WorksheetFunction.Sum(Range_X)
MsgBox HSL
end sub

Silahkan pilih mana yang Anda suka.

Tidak ada komentar:

Posting Komentar

Post Top Ad

Your Ad Spot