Vba || Deret bilangan prima

Penulis kali ini ingin berbagi pengetahuan tentang VBA (Visual Basic for Aplication) Excel. Gak nyangka klo di dunia kerja itu butuhnya hal – hal yang seperti ini. Sebelumnya penulis bertanya-tanya, Apa yang bisa di lakukan sama aplikasi ms.Office untuk keperluan kantor?? ternyata banyak aplikasi atau pendukung pekerjaan yang menggunakan ms. Office sebagai penunjang otomatisasi sebuah perusahaan.

Banyak programmer tahu Visual Basic itu hanya untuk VB.NET atau VB6. Tapi biasanya untuk VBA Excel jarang digunakan untuk bahan membuat sebuah aplikasi. Disini penulis mencoba membuat contoh dasar penggunaan VBA Excel. Istilah kantor menyebut ini sebagai proses Automation.

Hanya dasarnya saja yang ingin penulis sampaikan. Mungkin klo ada waktu penulis ingin buat sebuah aplikasi perkantoran dengan hanya menggunakan Ms.Office sebagai tools aplikasi.

Penulis seneng diskusi bareng, tiba-tiba dia cerita ada temennya yang jadi dosen di sebuah universitas yang belum bisa membuat sebuah deret bilangan prima. Mudahan dia baca blog saya supaya anak didiknya ikutan pinter.

Untuk memulainya buka aplikasi Ms.Office Excel lalu save dengan nama sebuah file sesuai salero. (*.xls) untuk Office 2007 atau up biasanya extention-nya berbeda (*.xlsm).

Setelah disimpan pada keyboard klik kanan di bagian menu seperti pada gambar dibawah ini dan pilih visual basic

setelah muncul pilih control toolbox untuk membuat button. Tempelkan di kanvas excel beri nama Bilangan Prima.

Klik dua kali pada button tadi. Mulai deh scripting. Masukin Code ini :

Private Sub cmdCari_Click()
Dim x, y, hsl As Integer

    y = 1
    hsl = 1
    bil = 2
    x = Cells(1, 1)

    While hsl < x
        bilprim = True
        For dv = 2 To bil - 1
            If bil Mod dv = 0 Then bilprim = False
        Next
        If bilprim Then
            Cells(y, 2) = bil
            y = y + 1
        End If
        bil = bil + 1
        hsl = hsl + 1
    Wend
 End Sub

Dari code standar yang saya buat diatas saya pikir cukup mudah untuk dimengerti. Logikanya jika deret angka dilakukan modulus  yang menghasilkan angka 0 tidak digunakan. Input batas deret ada di kolom (A1) atau cells(1,1)

 

Simple bukan, klo sudah bisa silahkan di coba terus untuk mengasah skill.

10/08/2011 at 10:20 pm Tinggalkan komentar

Generate Workstation pc Report with VbScript and Excel

Huh… Malem minggu pengen curhat. Temen’a cuma internet sm laptop doang. Ya ud, ambo masih bisa curhat walaupun ditemani oleh kesendirian…. PosCur!!hihihi… :)

Intro

Penulis ingin berbagi ilmu penulis sesudah skripsi ini selesai…. mmmh, senengnya klo bisa buat orang lain tersenyum dengan apa yang kita kerjakan tanpa harus mengharapkan timbal balik apa – apa. Ini merupakan teori kepuasan lahir batin versi penulis.hehehe…..tp ini bukan skripsi penulis bis skripsi

Lanjutkan Membaca 04/09/2010 at 7:15 pm Tinggalkan komentar

VbScript Why Not?? Simplify Job for workstation

Sudah lama sekali saya tidak membagi ilmu saya yang berbahasa indonesia.hihihi…. Maaf sombong nian ney ambo. Maklum kemarin sibuk bgt sama kerjaan projek2an yang sangat menguras tenaga hingga akhirnya skripsi ambo mw sidang ney bulan puasa ini. :D …. Gajebo bgt yaks???hahahaha….

Intro

Cerita’a bgini awal agustus tahun lalu penulis mentok bgt ngerjain skripsi. Pusing Puyeng Pening(P3)… Penulis coba cari pelarian yaitu cari kesibukan lain yang bikin penulis gak stress bgt. (NB: Jangan di ikutin ini

Lanjutkan Membaca 14/08/2010 at 7:21 pm 3 komentar

Split Your PC with Dual Operating Systems

Kali ini penulis ingin bebagi cerita kepada rekan-rekan sekalian. Kenapa sey kita butuh dual operating system???

Why we need dual Operating Systems??

Sistem Operasi merupakan sebuah aplikasi penyangga bagi pengguna agar komputer dapat difungsikan atau digunakan dengan sangat mudah dan dimengerti oleh pengguna. Pada dasarnya komputer hanyalah sebuah mesin penghitung sebagaimana leluhurnya ENIAC yang merupakan komputer pertama dan hanya melakukan kalkulasi matematika biasa. Seiring berjalannya waktu dan hingga kini film james bond yang dulu hanya dibilang fiktif kini jadi kenyataan. Hah, agak

Lanjutkan Membaca 17/01/2010 at 6:15 am Tinggalkan komentar

Tebak angka dengan kecerdasan buatan sederhana dengan java

Curhat di malam minggu…. Adik sepupu gw, jurusan sistem informasi smt 3, punya tugas dari dosennya. Tiba-tiba doi datang ke kamar gw… “Bang betulin ini untuk menu bilangan prima case 3 gak jalan” tegur doi. Gw betulin dah tuh, error2nya. Pas yg satu udah beres. “Bang ada lagi tuh, gak ngerti sama sekali. Buat tebakan Cuma di kasi gambar doang untuk input dan outputnya, nih gambarnya”

Lanjutkan Membaca 07/11/2009 at 10:28 pm Tinggalkan komentar

belajar j2me pake server php ah….

Malam ini sangat suntuk dan membosankan,,, Lg bete sama kerjaan kantor pengen berhenti kerja tapi gak bisa. Ya ud curhat deh gw dimalam jumat ini supaya gw gak terlalu jenuh. Cups curhatnya :D

J2ME untuk definisi googling sendiri klo nyeleneh nanti di jadiin daftar pustaka repot nama gw, hihihi. Yah gitu lah, artinya kurang lebih sebuah metode pemrograman untuk buat aplikasi hengphone…

Kali ini gw mw coba integrasikan bagaimana sebuah server php dapat terhubung dengan aplikasi java micro edition……

Lanjutkan Membaca 29/10/2009 at 6:05 pm 2 komentar

Install manual java SE & netbeans secara bersamaan di ubuntu

Nah topik ini masih ada lanjutannya, langkah awal pastilah googling dulu cari bahan… . Setelah dapet bahan coba donlot aplikasi yang di butuhkan yaitu java SE dan Netbeans.. DOWNLOAD KLIK selanjutnya menyiapkan direktory yang akan kita pasang, sebenernya terserah user maunya dimana…tp alangkah bagusnya klo di manage dengan baik. ney step command manage direktori untuk instalasi.

……
………..
………….
maksud dari command diatas adalah diarahkan terlebih dahulu

Lanjutkan Membaca 25/10/2009 at 5:18 pm 1 komentar

Tulisan Lebih Lama


Gw Ney..

  • Chat With Me
  • Email Yadi Acho

  • For Education Only....

    Blog Stats

    • 2,894 hits

    Post Terbaru


    Ikuti

    Get every new post delivered to your Inbox.