Fungsi Pembulatan Excel & VBA

click fraud protection
Mengerjakan laptopnya di kafe

Kredit Gambar: mavoimages/iStock/Getty Images

Mempelajari cara menggunakan fungsi "Roundup" Excel dari bahasa pemrograman bawaan VBA, atau Visual Basic for Applications, membantu Anda menjalankan fungsi Excel apa pun dari VBA. Keterampilan ini berguna karena Excel memiliki banyak fungsi yang tidak dimiliki VBA, dan yang mungkin perlu Anda terapkan dari program VBA. Perhatikan bahwa fitur VBA yang memungkinkan Anda memanfaatkan fungsi "Roundup" tidak akan mengingatkan Anda tentang sintaks atau argumen yang salah, seperti saat menggunakan antarmuka lembar kerja standar.

Tujuan

Fungsi "Roundup" Excel membulatkan angka ke atas ke jumlah digit yang Anda tentukan. Misalnya, menjalankan "Roundup (2.2, 0)" memberi tahu Excel bahwa Anda ingin membulatkan angka 2.2 hingga bilangan bulat berikutnya. "0" dalam argumen kedua memberi tahu Excel bahwa Anda tidak menginginkan angka apa pun setelah titik desimal, yang sama dengan mengatakan Anda menginginkan jawaban bilangan bulat.

Video Hari Ini

Fungsi Putaran VBA

VBA tidak memiliki fungsi "Roundup" bawaan. Fungsi terdekat yang dimilikinya adalah fungsi "Bulat", yang membulatkan ke atas atau ke bawah tergantung pada apakah angka akhir dari angka yang Anda bulatkan lebih besar atau kurang dari 5. Misalnya, mengetik "Round (2.2, 0)" di jendela "Immediate" VBA menghasilkan 2, bukannya 3 yang akan dibulatkan oleh fungsi "Roundup" Excel.

Properti "Formula"

Meskipun VBA tidak memiliki fungsi "Roundup" sendiri, ia dapat menggunakan fungsi "Roundup" Excel. Untuk menginstruksikan VBA melakukan ini, setel properti "Rumus" dari objek virtual "Rentang" ke fungsi "Roundup". Contoh berikut menunjukkan cara melakukannya. Buka lingkungan pengembangan VBA dengan menekan "Alt" dan "F11" secara bersamaan dari dalam Excel. Klik mouse di jendela "Immediate', lalu ketikkan pernyataan berikut: "Range ("A1").Formula = "=Roundup (2.2, 0)"." Kembali ke Excel menggunakan penekanan tombol "Alt-F11" yang baru saja dijelaskan. Anda akan melihat hasil "3" di sel A1, yang menunjukkan bahwa pernyataan Anda berhasil menerapkan fungsi "Roundup" Excel.

Contoh Interaktif

Anda dapat membuat program VBA interaktif yang menerima argumen dari pengguna untuk fungsi "Roundup", dan menampilkan hasil dari fungsi tersebut. Setelah membuka lingkungan pengembangan VBA, rekatkan program berikut ke jendela:

Public Sub roundUpANumber() Dim a1, a2, s a1 = CDbl (InputBox("Masukkan angka yang ingin dibulatkan")) a2 = Cint (InputBox("Masukkan jumlah desimal yang Anda ingin membulatkan angka yang baru saja Anda masukkan.")) s = "=Roundup(" & a1 & "," & a2 & ")" Range("A1").Rumus = s Range("A1") .Calculate MsgBox (Range("A1").Value) End Sub

Jalankan program dengan mengklik salah satu pernyataannya, lalu mengklik perintah "Run" menu "Run". Saat Excel meminta Anda untuk argumen fungsi, ketikkan dan tekan "Enter." Program Anda akan menampilkan hasil dari fungsi "Roundup" untuk argumen yang Anda masukkan.