Bagaimana cara menggunakan fungsi spreadsheet vba?

Catatan penting

• Anda bisa menggunakan properti WorksheetFunction untuk mengakses fungsi lembar kerja untuk digunakan dalam makro.

Cara menggunakan fungsi lembar kerja di VBA saat menulis makro

Gunakan langkah-langkah berikut untuk menggunakan fungsi lembar kerja di VBA.

• Pertama, tentukan sel yang ingin Anda masukkan nilai yang dikembalikan oleh fungsi tersebut.
  
• Setelah itu gunakan tanda sama dengan (=) dan ketik Application.WorksheetFunction (seperti yang sudah bisa Anda lakukan di aplikasi Excel, Anda hanya bisa menggunakan WorksheetFunction).
  
• Selanjutnya, Anda perlu memasukkan titik (.), dan saat Anda melakukannya, Anda akan mendapatkan daftar fungsi yang Anda miliki di spreadsheet.
  
• Dari sini, mari gunakan fungsi TextJoin untuk menggabungkan teks di sel A1 dan B1. Sama seperti itu, Anda menggunakan fungsi di spreadsheet; saat Anda memasukkan tanda kurung awal, ini menunjukkan argumen yang perlu Anda tentukan di sel.
  
• Seperti yang Anda lihat pada tangkapan layar di atas, ini menunjukkan argumen yang perlu Anda tentukan, tetapi bukan nama argumennya. Jadi, Anda perlu mengetahui argumennya sebelum menggunakannya. Berikut adalah argumen yang perlu Anda gunakan di TextJoin.
  
• Sekarang mari kita masukkan argumen ke dalam fungsinya.
  
  1. batasi: » «
  2. abaikan_kosong: Benar
  3. teks1: Rentang (“A1”)
  4. teks2: Rentang (“B1”)

Berikut kode lengkapnya.

 Sub MyMacro() Range("A1") = _ Application.WorksheetFunction.TextJoin _ (" ", True, Range("A2"), Range("A3")) End Sub

Ada total 387 fungsi lembar kerja yang bisa Anda gunakan di VBA. Namun ada beberapa fungsi (Contoh: LEFT ) yang tidak tersedia.

Alasan? Ada fungsi bawaan di VBA yang dapat Anda gunakan saat menulis kode VBA. Mari kita lihat apakah Anda ingin menggunakan kotak pesan untuk mendapatkan nilai suatu fungsi. Katakanlah Anda ingin mendapatkan nilai maksimum dari rentang bernama “myValues”.

Kodenya adalah:

 Sub MyMacro() MsgBox Prompt:=WorksheetFunction.Max(Range("myValues")) End Sub

Dan inilah cara Anda mendapatkan kotak pesan:

Aplikasi.Fungsi Lembar Kerja vs Aplikasi

Ada dua cara berbeda untuk merujuk ke fungsi lembar kerja. Di bawah ini adalah dua baris kode berbeda yang melakukan aktivitas yang sama.

 Sub MyMacro() MsgBox Prompt:= _ Application.WorksheetFunction.Max(Range("myValues")) MsgBox Prompt:= _ Application.Max(Range("myValues")) End Sub

Namun ada keuntungan menggunakan cara kedua. Ini mengembalikan kode kesalahan alih-alih menampilkan kesalahan secara langsung.