Free Download Manager (Opensource software)

     Sebagai maniak komputer ane seringkali pengen download file-file dari internet, tapi ane ngga butuh loading yang lambat bin lelet.. maka ane pake deh Internet Download Manager (IDM), tapi kelemahannya software tsb ngga free pak bos... ane cari solusi supaya IDM ane bisa full version, alias gratis selamanya,

     Pertama-tama ane pengen cari cracknya, takut terinveksi virus, trus ane berhasil nemuin serial-serial numbernya tuh software, tapi ternyata, tiap setelah kompi dishutdown atau direstart, maka pendaftaran dengan serial number yg tadi ane pake, udah nggak ngaruh lagi.. katanya "fake serial number". eh.. lama-lama ane pengen nyari software serupa tapi yang free alias gratis ajah deh..

Kemudian, ane menemukan Free Download Manager (FDM)

     Akhirnya, terjawab sudah keinginan ane untuk bisa download file dengan kecepatan lebih daripada kecepatan standar... kurang lebih 6X kecepatan download standar.. gratis pulak.. hehe :p

Adapun fitur-fitur atau kelebihan yang bakalan kita dapat dengan menggunakan FDM ini adalah :

1. Gratis dan Legal
     Tidak seperti software Internet Download Manager (IDM) atau Download Accelerator Plus (DAP) yang berbayar, Free Download Manager (FDM) ini bisa anda gunakan secara gratis dengan kemampuan yang tidak kalah ampuh.

2. Support BitTorent
     Bagi anda pengguna windows 2000,XP,2003 maupun Vista, anda bisa menikmati fitur support BitTorent ini. Dengan fitur ini anda bisa mendownload dari BitTorent protocol tanpa menggunakan software torrent downloader.

3. Upload Manager
     Dengan kemampuan ini, anda bisa dengan mudah mengupload file dan berbagi dengan teman anda langsung melalui FDM

4. Support Video Download
     FDM mampu mendownload video dalam berbagai format termasuk flash video format (.flv) seperti yang digunakan oleh YouTube, Google Video, dsb. Anda bisa mendownloadnya sebagai .flv atau langsung mengconvertnya ke berbagai format video populer lainnya.

5. Remote Control
     Anda bisa mengakses Free Download Manager secara remote via internet mulai dari membuat download baru, melihat list download yang sedang aktif maupun proses download yang sudah selesai.

6. Portable Mode
     Anda tidak perlu menginstal FDM lagi ketika anda ingin menggunakan komputer lain. Anda cukup membuat versi portable dari Free Download Manager dengan mudah dari menu yang telah disediakan.

7. Menu Pengaturan Audio/Video yang Lengkap
     Anda bisa melihat video atau mendengarkan audio bahkan ketika proses download belum selesai. Setelah proses download selesai anda juga bisa langsung mengconvertnya menjadi format yang anda inginkan. Semua bisa anda setting secara otomatis.

8. Download Acceleration
     Ketika anda mendownload file, Free Download Manager akan membagi file tersebut menjadi beberapa bagian dan mendownloadnya secara bersamaan. Hal ini membuat proses download menjadi jauh lebih cepat. Sesuai dengan pengujian yang PG gunakan, FDM bisa mempercepat download hingga hampir 6 kali lebih cepat.

9. Resume proses download file yang broken
     Ada kalanya ketika kita mendownload file, maka ada hal-hal yang membuat proses download kita terhenti misalnya saja koneksi yang tiba-tiba down, lampu yang tiba-tiba mati, komputer yang restart tiba-tiba dan masih banyak penyebab lainnya. Hal tersebut membuat proses download kita terhenti. Dengan Free Download Manager, anda bisa meresume atau melanjutkan proses download yang terhenti tersebut. Hal ini akan menghemat waktu dan uang anda daripada harus mendownload semuanya dari awal lagi.

10. Pengaturan File dan Scheduler file yang powerful
     Anda bisa mengatur jenis-jenis file yang anda download berdasarkan tipe nya. Anda bisa menyimpan tipe-tipe tersebut di folder yang berbeda ketika anda mendownloadnya. Anda juga bisa start dan pause proses download yang sedang berlangsung.

11. Pengaturan Penggunaan Traffic dan Kecepatan Internet
     Ada kalanya anda ingin download sambil browsing. Terkadang kita jengkel ketika mendownload suatu file dengan software download manager, maka bandwidth akan tersedot habis untuk mendownload file tersebut. Akibatnya browsing menjadi sangat lemot. Nah dengan Free Download Manager ini anda bisa mengatur berapa traffic atau bandwidth yang ingin anda gunakan untuk download, sehingga sisanya bisa anda gunakan untuk browsing tanpa terganggu proses download yang sedang berlangsung

12. Memiliki Site Explorer
     Dengan Site Explorer, anda bisa dengan mudah melihat dan mengatur folder tempat anda menyimpan file hasil download anda.

13. Memiliki HTML Spider
     Anda bisa mendownload halaman sebuah situs dengan menggunakan HTML spider ini. Anda juga bisa memerintahkan HTML Spider ini untuk hanya mendownload file dengan tipe tertentu di sebuah halaman website.

14. Download bersamaan dari banyak server Mirror sekaligus
     Free Download Manager akan mendownload file dari banyak mirror sekaligus untuk semakin meningkatkan kecepatan download anda.

15. Proteksi terhadap Spyware dan Adware dari Komunitas FDM
     Ketika anda mendownload sebuah file, maka anda bisa secara langsung melihat komentar pengguna FDM di seluruh dunia yang sudah mendownload file tersebut. Dengan begitu anda bisa membaca peringatan dari komunitas ketika file yang anda download ternyata berbahaya dan mengandung virus, spyware, adware maupun threats berbahaya lainnya.

Silahkan pak bos sekalian langsung ajah download disini dan ikuti petunjuk-petunjuk penginstalannya :


Password Zip file : jinpenunggugudang

Download FDM Ver.3.8 build 1173

 

Form Control Excel

Artikel ini saya bikin berdasarkan request dari pengunjung blog yang nyasar di mari … Saya dikasi link ke satu file formulir lamaran pekerjaan di sebuah perusahaan ATPM roda dua … file tersebut berupa sebuah file excel … pengunjung tersebut meminta saya untuk membahas mengenai bagEmana caranya bikin formulir yang kayak gEtO .. untung saya ndak tergiyur ngikOt ndaptar  … jadi ada waktu buWat nulis artikel ini.

Dalam file yang dimaksuT ada kontrol2 khusus yang dipakE … kontrol2 tersebut bisa anda temukan di toolbar Forms ( view >> toolbar >> forms untuk Excel 2003) atau di tab Developer pada bagian controls pada ribbon excel 2007 … selain menggunakan kontrol2 tersebut ada alternatiP laEn yaitu pakE control ActiveX … pada artikel kalE ini mari kita belajar pakE yang pertama dulu … untuk yang pakE Active X nyusul entar belakangan kalO ada kesempatan … secara umum hamper sama kok 

baEklaagghhh … silahkan anda donlot dulu file formcontrols.xls  … liAt sheet1 , yang kaya gEnE loh ..

FORMULIR ISIAN Sheet1

dalam sheet tersebut ada beberapa control ?… tiap2 control mempunyai settingan tertentu … berikut beberapa setingan yang umum :

• Input range , range yang berisi data2 yang akan ditampilkan dalam kontrol (ComboBox, ListBox)
• Cell link , cell yang akan digunakan untuk menyimpan nilai dari control (ComboBox, ListBox, CheckBox)
• DropDown lines , jumlah baris yang akan ditampilkan dalam control (ComboBox)
• 3D Shading , tampilan control dengan efek 3 dimensi
• Selection type, mode pemilihan item yang dipilih : Single, Multi dan Extend (ListBox)
• Value, nilai dari control : Unchecked, Checked, Mixed (CheckBox, OptionButton)
• Current Value, menentukan nilai control (Spinner, ScrollBar)
• Maximum Value, nilai tertinggi dari control (Spinner, ScrollBar)
• Minimum Value, nilai terendah dari control (Spinner, ScrollBar)
• Incremental Change, nilai interval yang akan ditambahkan atau dikurangkan (Spinner, ScrollBar)
• Page Change, nilai interval yang akan ditambahkan atau dikurangkan yang biasanya nilainya lebih besar dari Incremental Change (ScrollBar)

marE kita liat satu per satu control2 tersebut :

Nomor 1 : ComboBox … control ini akan menampilkan daftar pilihan dari item2 yang telah ditentukan … silahkan di klik kanan >> format control … pada tab control ada beberapa pengaturan :

• Input range : Sheet3!$B$1:$B$7
• Cell link : AA9
• DropDown lines : 7

Nomor 2 : ListBox … control ini mirip dengan ComboBox … bedanya pada ComboBox item2 pilihan akan ditampilkan secara DropDown sedangankan pada ListBox item2 akan selalu ditampilkan selama ukuran tinggi (height) control memungkinkan dan selebihnya dapat ditampilkan dengan cara di scroll… lebih ngirit tempat kalO pakE ComboBox … pengaturan2 :

• Input range : Sheet3!$A$1:$A$10
• Cell link : AA11
• Selection type : single

Nomor 3 : CheckBox … control berguna untuk memilih satu atau lebih dari beberapa pilihan … item yang dipilih akan ditunjukkan dengan tanda “check” (centang) pada kotak yang sesuai… control ini mempunyai nilai boolean(TRUE atau FALSE) … dalam contoh ada 5 CheckBox yang digunakan sebagai pilihan Hobby :

1. Mancing, Cell link : AA12 , Value : Unchecked
2. Nyanyi, Cell link : AA13 , Value : Unchecked
3. Olahraga, Cell link : AA14 , Value : Unchecked
4. Masak, Cell link : AA15, Value : Unchecked
5. Tidur, Cell link : AA16 , Value : Unchecked

Nomor 4 : OptionButton … control berguna untuk memilih hanya satu dari beberapa pilihan dalam satu grup … item yang dipilih akan ditunjukkan dengan tanda “titik” pada lingkaran dari pilihan yang sesuai … nilai control ini merupakan nomor urut dari control yang sesuai dalam satu grup … dalam contoh ada 3 OptionButton untuk memilih status pernikahan … pengaturannya :

• Cell link : AA18

Nomor 5 : GroupBox … control berguna mengelompokkan beberapa control … dalam contoh digunakan untuk mengelompokkan OptionButton … jika OptionButton tidak dikelompokkan dengan GroupBox maka akan dianggap sebagai satu grup dan hanya mempunyai satu Cell Link … untuk memisahkan ke masing2 grup digunakan control ini … pengaturan untuk GroupBox hanya 3D Shading … sedangkan untuk OptionButton didalamnya pada contoh pengaturan yang perlu diperhatikan adalah Cell Link : AA20

Nomor 6 : Spinner … control ini digunakan untuk memasukkan nilai yang berurutan baik ke atas maupun ke bawah dengan interval yang bisa kita tentukan … pada contoh digunakan untuk input tanggal … ada 3 Spinner yang digunakan untuk :

1. Tanggal , dengan pengaturan

• Current Value : bebas
• Maximum Value : 31
• Minimum Value : 1
• Incremental Change : 1
• Cell link : AA23

1. Bulan , dengan pengaturan

• Current Value : bebas
• Maximum Value : 12
• Minimum Value : 1
• Incremental Change : 1
• Cell link : AA24

1. Tahun , dengan pengaturan

• Current Value : bebas
• Maximum Value : 2010
• Minimum Value : 1960
• Incremental Change : 1
• Cell link : AA25

Nomor 7 : Button … control ini digunakan untuk menjalankan perintah2 tertentu … perintah tersebut disimpan dalam macro yang dihubungkan dengan control ini … karena penampakan asli dari control ini kurang heboh (CLEAR dan HAPUS) kita bisa menggantinya dengan dengan bentuk laEn misalkan dari autoshape office yang dapat di atur style nya agar lebih heboh (TAMBAH dan UPDATE) … berikut fungsi dari Button2 pada contoh :

• CLEAR , untuk mengembalikan isian formulir ke defaultnya
• HAPUS, untuk menghapus data yang sedang ditampilkan dari tabel
• TAMBAH, untuk menambahkan data yang sedang ditampilkan ke dalam tabel
• UPDATE, untuk menyimpan perubahan dari data yang sedang ditampilkan ke dalam tabel

… macro dalam contoh akan saya bahas nanti … kalO ada kesempatan 

Nomor 8 : ScrollBar … control ini mirip dengan Spinner … perbedaaannya pada control ini interval-nya ada 2 yaitu yang kecil (Incremental Change) dan yang besar (Page Change) … control ini dapat dibuat vertical ataupun horizontal …. Pengaturannya :

• Current Value : bebas
• Maximum Value : 10 (dalam contoh akan menyesuaikan data dalam tabel pada Sheet2)
• Minimum Value : 1
• Incremental Change : 1
• Cell link : AA27

Untuk mempermudah dalam menghubungkan control dengan cell2 yang akan menyimpan nilai dari control … saya memberi nama pada beberapa cell, Cell Link dapat anda ganti dengan nama2 ini … misal untuk Spinner Bulan Cell Link AA24 dapat anda ganti dengan “bl” … berikOt adalah nama dan cell refferensinya :

• bl =Sheet1!$AA$24
• hob_1 =Sheet1!$AA$12
• hob_2 =Sheet1!$AA$13
• hob_3 =Sheet1!$AA$14
• hob_4 =Sheet1!$AA$15
• hob_5 =Sheet1!$AA$16
• nama =Sheet1!$I$7
• nomr =Sheet1!$AA$27
• pekj =Sheet1!$AA$11
• pend =Sheet1!$AA$9
• sex =Sheet1!$AA$20
• stat =Sheet1!$AA$18
• tgl =Sheet1!$AA$23
• th =Sheet1!$AA$25

lakukan proteksi pada sheet yang berisi form … jangan lupa unchecked pada pilihan Locked di format cellnya … cell tidak bole di Locked adalah cell2 yang di kasi nama seperti daftar diatas … pada pilihan protect sheet hilangkan semua tanda centang(check) kecuali pada allow user of this worksheet to … select Unlocked cell … Kolom AA bisa anda sembunyikan agar terlihat lebih rapi dan nilai dari control tidak tampak secara langsung …

Dalam contoh yang saya sajikan sebisa mungkin saya menggunakan semua control yang disediakan … anda akan mendapati beberapa control mungkin tidak aktip … lagi2 masalah ini nanti akan saya bahas kalO ada kesempatan … mohon do’a dari pembaca semua agar saya diberi banyak kesempatan … terakhir MDLMDL … Monggo Dipun Leresaken Menawi Dalem Lepat

Membuat Laporan Excel Menggunakan Filter

• butuh informasi yang terjadi pada tanggal 10 desember saja atau tanggal 11 desember saja begitu seterusnya
• informasi tersebut dibuat di sheet yang baru

kita siapkan dulu tabelnya … sheetnya saya kasi judul Data … sheet ini adalam lampiran dari email tersebut yang datanya sudah saya modip agar yang punya ndak keberatan … isinya 5 kolom dan 593 baris data … kayak penampakan berikot

sebenarnya problema tersebOt bisa jugak dicari solusinya dengan modip SearchEngine.xls … tapi saya pengEn sesuWatu yang baru … akhErnya saya pilih pakE Advance Filter … lha trus dimana kita bisa ketemu Advance Filter ini

pada Excel 2003 kita bisa jumpai di Data >> Filter >>Advance Filter … Excel 2007 ada padaTab Data Group Filter … kalO Excel 2010 maap saya ndak punya  … berikOt gambar skrinsyutnya

sedikit penjelasan dari saya yang pastinya ndak bakan bikin jelas  …

Action

• Filter the list, in-place … penampakan hasil filternya akan tetap pada tabel sumber datanya … yah mirip2 Auto filterlah
• Copy to another location … penampakan hasil filternya akan berada pada range yang telah kita tentukan (lihat penjelasan Copy to)

List range … ini range yang berisi tabel yang akan difilter $A$1:$E$594

Criteria range … range ini berisi kriteria yang akan kita gunakan sebagai dasar filter

dalam gambar skrinsyut saya akan mencoba memfilter dengan dua kriteria yaitu NAMA yang mengandung hurup S dan TANGGAL = 01/11/20011 … kriteria kita taruh di rangeData!$H$1:$I$2 … isi dari range tersebOt adalah sbb :

• Cell H1      NAMA
• Cell I1       TANGGAL
• Cell H2     S
• Cell I2      01/11/2011

Copy to … range yang akan menjadi tempat kita menaruh hasil filternya dalam contohData!$K$1:$O$1 … range tersebut terdiri atas 5 kolom sama seperti jumlah kolom List range

ketika kita eksekusi dengan klik OK maka hasilnya akan nampak pada range yang sudah kita tentukan … masalahnya waktu kita pengEn menaruh hasilnya di sheet laEn … dan ternyata saat berusaha melakukannya Excel melakukan perlawanan … muncul MessageBox seperti ini

waduuh gimana kalO begini   … tenang ada kok solusinya …   macro  

pertama kita buwat sheetnya dulu dalam pada hal ini saya pakE sheet yang berjudul Laporan … penampakan sheet tersebOt sebagE berikOt

kriteria yang akan kita gunakan menempati range B3:F4 dan hasilnya kita taruh di B9:F9 … untuk menjalankan macro menggunakan CommandButton FILTER seperti pada gambar yang dihubungkan dengan kode berikOt

Sub AdvFilter()
' ini kode untuk Advance Filternya
ThisWorkbook.Sheets("Data").Range("A1").CurrentRegion.AdvancedFilter Action:=xlFilterCopy, _
CriteriaRange:=ThisWorkbook.Sheets("Laporan").Range("B3:F4"), _
CopyToRange:=Range("B9:F9"), Unique:=False
' ini kode untuk mencari jumlah data cocok
JmlDataCocok = Application.WorksheetFunction.Count(ThisWorkbook.Sheets("Laporan").Range("B10:B65536"))
' ini kode untuk menuliskan jumlah data cocok ke range B7
ThisWorkbook.Sheets("Laporan").Range("B7").Value = JmlDataCocok & " data cocok dengan kriteria"
End Sub

kode tersebOt meskipun singkat ndak usah diapalin kodenya … sudah ada kok di contoh fileAdvanceFilter.xls silahkan download kayak biYasanyah … sedangkan untuk cara bikinCommandButton ada disini

Perintah VB-Excel

AUTO RUN

Ada beberapa cara untuk membuat macros yang kita buat berjalan secara otomatis ketika pertama kali membukaworkbook. Yang pertama adalah Auto Open Method, yang diletakkan di modules, kedua adalah Workbook Open Method, yang diletakkan di pada obyek Workbook (lihat penjelasan pada langkah 3). Dua Contoh kode berikut akan menampilkan pesan “hi” ketika Workbook pertama kali dibuka.

Sub Auto_Open( )

Msgbox “hi”

End Sub

Private Sub Workbook_Open( )

Msgbox “hi”

End Sub

MENGHITUNG ROWS, COLUMNS DAN SHEET

Kode berikut digunakan untuk menghitung berapa jumlah rows (baris) atau columns(kolom) yang telah kita sorot dengan kursor.

Sub Hitung( )

hitung_baris = Selection.Rows.Count

hitung_kolom = Selection.Columns.Count

MsgBox hitung_baris & " " & hitung_kolom

End Sub

Sub hitung_sheet( )

hitung_sheet = Application.Sheets.Count

Msgbox hitung_sheet

End Sub

MENG-KOPI RANGE

Contoh berikut akan meng-kopi range A1 sampai A3 ke D1 sampai D3

Sub Kopi_Range( )

Range (“A1:A3”).Copy Destination:=Range(“D1:D3”)

End Sub

WAKTU SEKARANG

Contoh berikut akan menampilkan waktu pada saat ini

Sub sekarang( )

Range (“A1”)= Now

End Sub

MENGETAHUI POSISI SEL YANG SEDANG AKTIF

Sub posisi( )

baris = ActiveCell.Row

kolom = ActiveCell.Column

Msgbox baris & “,” & kolom

End Sub

MENGHAPUS BARIS YANG KOSONG

Sub hapus_baris_kosong( )

Rng = Selection.Rows.Count

ActiveCell.Offset(0, 0).Select

For i = 1 To Rng

If ActiveCell.Value = "" Then

Selection.EntireRow.Delete

Else

ActiveCell.Offset(1, 0).Select

End If

Next I

End Sub

Menebalkan dan Mewarnai Huruf (Font)

Contoh berikut akan menebalkan dan memberi warna merah pada huruf dimana sel sedang aktif.

Sub tebal_merah( )

Selection.Font.Bold = True

Selection.Font.ColorIndex = 3

End Sub

MENGIRIMKAN WORKBOOK MELALUI EMAIL

Sub email( )

ActiveWorkbook.SendMail recipients:= ”excel@ahoo.c”

End Sub

FUNGSI EXCEL

Menggunakan fungsi bawaan Excel dalam VBE hampir sama dengan menggunakannya dalam Excel. Misal fungsi rounduntuk membulatkan sebuah angka, dalam spreadsheet akan terlihat seperti ini

= round(1.2367, 2)

Dalam VBE Anda cukup menggunakan Application kemudian disusul fungsi yang akan dipakai.

Sub bulat( )

ActiveCell = Application.Round(ActiveCell, 2)

End Sub

MENGHAPUS NAMA-NAMA RANGE

Contoh berikut akan menghapus semua nama-nama range di dalam workbook Anda

Sub hapus_nama_range( )

Dim NameX As Name

For Each NameX In Names

ActiveWorkbook.Names(NameX.Name).Delete

Next NameX

End Sub

LAYAR BERKEDIP

Program dalam macros yang sedang berjalan dapat membuat layar berkedip-kedip, untuk menghentikannya Anda dapat menyisipkan kode berikut.

Application.ScreenUpdating = False

MENUJU RANGE TERTENTU

Untuk menuju suatu range tertentu, kode-kode berikut dapat digunakan.

Application.Goto Reference:=”A1”

Atau,

Range(“A1”).Select

MENUJU SHEET TERTENTU

Sedangkan untuk menuju worksheet tertentu, gunakan kode-kode berikut.

Sheets(1).Select

Atau

Sheet1.Select

Untuk menuju Sheet terdepan (nomor 1)

Sheet(“coba”).Select

Untuk menuju Sheet bernama “coba”

MENYEMBUNYIKAN WORKSHEET

Kode berikut berfungsi untuk menyembunyikan Sheet1

Sheet1.Visible = xlSheetVeryHidden

Pengguna tidak dapat membuka sheet yang telah disembunyikan dengan cara ini, hanya dengan kode VBE sheet dapat dibuka kembali.

INPUT BOX

Kode berikut berguna untuk memunculkan Input Box

InputBox(“Masukkan Nama”)

MENYISIPKAN BARIS DAN KOLOM

Kode berikut akan menyisipkan baris diatas range A1,

Range(“A1”).Select

Selection.EntireRow.Insert

Sedang yang berikut akan menyisipkan satu kolom disamping kiri range A1,

Range(“A1”).Select

Selection.EntireColumn.Insert

MENGATUR ULANG UKURAN RANGE

Selection.Resize(7,7).Select

MEMBERI NAMA RANGE

Selection.Name = “nama”

MENYIMPAN FILE

Kode berikut berguna untuk menyimpan file tanpa memberi nama,

ActiveWorkbook.Save

Sedangkan bila Anda hendak memberi nama (SaveAs), gunakan kode berikut,

ActiveWorkbook.SaveAs Filename:=”C:\coba.xls”

PENJADWALAN

Kadang-kadang kita hendak menjadwalkan sebuah tugas kepada Excel, contohnya menyimpan file pada jam-jam tertentu. VBE dapat melakukannya dengan menggunakan fungsi Application.OnTime. Sebagai contoh, kode dibawah ini akan menjalankan prosedur Simpan( ) pada jam 12:00 dan 16:00, prosedur Simpan( ) sendiri berisi perintah untuk menyimpan file,

Sub tugas()

Application.OnTime TimeValue("12:00:00"), "Simpan"

Application.OnTime TimeValue("16:00:00"), "Simpan"

End Sub

Sub Simpan()

ActiveWorkbook.Save

End Sub

Bila Anda hendak merubah jamnya, missal jam 10:03:05, maka rubah TimeValue menjadi TimeValue(“10:03:05”).

Sedangkan bila Anda hendak melakukannya satu jam setelah prosedur tugas( ) dijalankan maka rubahlah kodenya seperti demikian,

Sub tugas()

Application.OnTime Now + TimeValue("01:00:00"), "Simpan"

End Sub

Perhatikan penambahan kata “Now”. Kode-kode di atas bekerja bila disimpan dalam module, bula Anda ingin menyimpannya di dalam Sheet1 (atau worksheet manapun), maka rubahlah “Simpan” menjadi Sheet1.Simpan

Melangkah Lebih Jauh

Di awal tutorial ini penulis telah menyebutkan bahwa WorkSheet (demikian juga dengan WorkBook) merupakan sebuah obyek dalam Ms Excell. Seperti kita ketahui, Visual Basic merupakan bahasa pemograman yang berorientasi obyek.

Pada bab-bab sebelumya sebenarnya kita telah membentuk sebuah obyek bernama "Module1" yang dapat dipanggil dengan menekan Ctrl+q, dan memberinya prosedur bernama "coba".

Perhatikan ketika kita mengetik "Module1", kemudian mengetik "." Maka akan muncul tampilan seperti diatas. Sebuah kotak dengan sebuah gambar berwarna hijau dengan tulisan "coba". 

Pada penjelasan berikut, kita akan membuat prosedur-prosedur buatan kita sendiri pada Worksheet dan Workbook. Mengapa? Karena kode-kode program dalam prosedur yang kita buat di sebuah Worksheet dan Workbook tertentu, hanya akan bekerja pada Worksheet atau Workbooktersebut. Sedang prosedur yang tertulis pada Modules, bekerja pada Worksheet dalam Worbook yang aktif. 

Sebagai contoh ketikan kode ini dalam prosedur Sub Coba() dalam Module 1: 

Range("A1").Value= "coba"

lalu buka contoh.xls-sheet1, jalankan program, 

buka contoh.xls-Sheet2, jalankan program, 

kemudian sheet3, 

Kemudian buat sebuah Workbook baru,

Pada Workbook baru, bernama Book1 ini, buka Sheet1, jalankan program, 

Bila Anda melanjutkan pada book1.xls-Sheet2 dan Sheet3, program yang kita buat pada contoh.xls-Module1 akan dikerjakan pada setiapWorksheet yang aktif, walapun Worksheet tersebut berada pada Worbook lain. 

Hal ini akan merepotkan bila Anda hanya ingin program VBE yang dibuat bekerja pada Worbook tertentu, sedang dalam pekerjaan Anda sehari-hari Anda harus membuka banyak Workbook. 

Pemograman Sheet 

Untuk memulai, masuklah ke dalam Sheet1 dengan cara double klik pada windows project, tampilan berikut akan muncul ;

Setelah itu buatlah sebuah prosedur bernama lembar1, 

lalu isikan kode berikut;

pergi ke Module1, dan isikan kode berikut 

Kembali ke Ms. Excell, buka Sheet1, jalankan program dengan menekan Ctrl + q , hasilnya adalah ; 

Hapus kata "lembar1" di Sheet1, kemudian buka Sheet2, kemudian tekan Cttrl + q, dan hasilnya adalah

range A1 tidak terisi apapun pada Sheet2, bukalah Sheet1 dan Anda akan mendapatkan bahwa pada range A1 terdapat kata "lembar1".

Membuat Shortkey untuk Program pada Sheet 

Untuk membuat Shortcut key dari program yang telah kita buat, maka tekan Alt + F8, atau menggunakan menu Tools—Macro—Macros 

akan tampil 

sorot sheet1.lembar, tekan tombol Option,

pada isian Shorcut Key, isikan huruf w. 

Kembali ke Excell, dan tekan Ctrl + w, lihat apa yang terjadi. 

Menyisipkan Control Object pada WorkSheet 

Seperti VB6, pada VBE terdapat pula obyek-obyek kontrol, seperti Command Button, Text Box, Option Button, Label, dan sebagainya. Tetapi, tidak semua kontrol yang ada di VB6 terdapat di VBA Excel. 

Pertama-tama kita perlu menghidupkan Control Toolbox, dimana terdapat kontrol-kontrol yang kita perlukan. Untuk itu arahkan kursor ke menuView-Toolbars-Control Toolbox seperti gambar dibawah, 

kemudian tekan dan akan tampil: 

Tarik Box tersebut ke arah bawah agar tidak menghalangi WorkSheet, 

Untuk menyisipkan kontrol dan merubah-rubah propertinya, maka kita perlu menghidupkan Design Mode. 

tekan gambar segitiga yang memiliki nama Design Mode, sehingga gambar tersebut terlihat terang 

sebagai contoh kita akan menyisipkan Command Button di Sheet1, 

tekan Icon Command Button pada ToolBox, 

lalu kursor akan berubah menjadai tanda "+" , gunakan kursor untuk membentuk sebuah Command Button dengan cara klik kiri pada mouse. 

untuk memasukan kode maka double- clik kiri mouse pada Command Button sehinnga Visual Basic Editor muncul 

masukkan kode yang diinginkan ke dalam

Private Sub CommandButton1_Click()

End Sub

CommandButton1_Click berarti program akan dijalankan pada saat Command Button ditekan. Seperti terlihat bahwa prosedur ini terdapat di dalam Sheet1, WorkSheet dimana Command Button disisipkan. 

Berikut adalah salah satu contoh program

kembali ke Excel dan maitkan Design Mode dengan cara menekannya, sehingga tampilannya tidak terang lagi, 

lalu tekan Command Button, maka akan tampil : 

Kita dapat mengakses properti Command Button, dengan cara menyalakan kembali Design Mode lalu klik kanan Command Button,

tekan Properties maka akan tampil,

di sisi sebelah kiri akan tampil Windows Properties. 

Kita dapat merubah tampilan (Caption) pada Command Button dengan cara merubah isian Caption di Properties, 

atau dengan mengedit Command Button, 

bila ditekan, akan tampil 

lalu rubahalah Caption-nya, 

Menggunakan UserForm 

Untuk menggunakan UserForm, pertama sisipkan dahulu obyek ini kedalam project kita. 

tampilan berikut akan muncul 

selanjutnya Anda dapat melakukan langkah-langkah pemograman seperti di VB6. 

Pada contoh berikut kita akan menyisipakan sebuah CommandButton dan sebuah TextBox ke dalam form kita. Isi dari sebuah range (kita pilihrange A1) di salah satu WorkSheet (pada contoh ini kita pilih Sheet1) akan sama dengan isi TextBox ketika CommandButton ditekan. 

Pertama-tama kita sisipkan sebuah CommandButton dan TextBox pada UserForm, 

lalu klik dua kali CommandButton, hingga tampilan berikut muncul 

isikan kode berikut 

Range("A1").Value = TextBox1.Value

Selanjutnya kembali ke Sheet1 (pada Visual Basi Editor), isikan kode beirkut di Prosedur "lembar1", 

UserForm1.Show

Kode di atas memerintahkan agar UserForm1 muncul

kembali ke Excell, dan tekan Ctrl+w untuk menjalankan Prosedur "lembar1". 

isi TextBox dengan kata "sudah" lalu tekan CommandButton1, 

Sebagai catatan, karena UserForm muncul maka Anda tidak dapat menggunakan WorkSheet pada Excel. Bila Anda menginginkan agar, bisa beralih ke WorkSheet, maka kode berikut dapat digunakan (hanya bekerja pada Excell 2000 ke atas). 

UserForm1.Show vbModeless

Bila program kembali dijalankan maka Anda dapat beralih dari UserForm ke WorkSheet.