Koneksi Antara Visual Basic dan Microsoft Excel

Assalamulaikum wr.wb

Pada kali ini saya akan membahas apa hubungan atau koneksi antar bahasa pemrograman VB dengan Ms Excel. Pertama-tama kita harus tahu apa itu visual basic. Visual Basic ialah Bahasa pemrograman yang menawarkan Integrated Development Environment (IDE) visual untuk membuat program perangkat lunak berbasis sistem operasi Microsoft Windows dengan menggunakan model pemrograman (COM).

Lalu selanjutnya ialah Visual basic dapat membaca dan menulis informasi dari dan ke worksheet excel bahkan dapat melaksanakan perintah excel seperti merobah lebar column, memilih jenis huruf, mengatur border dll.

Untuk membuat koneksi Visual basic dengan excel dapat dilakukan dengan sangat mudah sehingga anda dengan mudah dapat menampilkan laporan keuangan dari aplikasi database visual basic ke dalam worksheet excel mulai dari form, laporan periodik, rugilaba, neraca bahkan grafik dll. Sebaliknya anda dapat mengimport data dari workseet excel ke database.
Berikut ini adalah cara membuat koneksi visual basic ke excel untuk membuka file tamplate yang telah disediakan dan selanjutnya anda dapat menuliskan informasi pada worksheet tersebut

1. Membuat koneksi

Dim vExcel As Excel.Application
Dim No, tbatal, tlunas, Tajt
No = 0
tbatal = 0
tlunas = 0
tajt = 0
Dim startRow

2. Membuka aplikasi Excel dengan mengalokasikan memori untuk aplikasi excel.

Set vExcel = CreateObject(“Excel.Application”) 
Digunakan untuk membuka file tamplate yang telah disediakan. 

vExcel.Workbooks.Add (App.Path & “\namafile.xlt”)
Digunakan untuk mengaktifkan Worksheet excel

vExcel.Visible = True
Digunakan untuk menentukan windows excel ditampilkan maksimum

vExcel.WindowState = xlMaximized
Digunakan untuk mengatur lebar Column misalnya column A akan di set menjadi 30

vExcel.Columns(“A”).ColumnWidth = 30
Digunakan untuk menulis informasi ke dalam worksheet

With vExcel.ActiveSheet
.Cells(1, 1).Value = MyCom
.Cells(2, 1).Value = MyAddr
.Cells(3, 1).Value = “LAPORAN PENGELUARAN KAS”
.Cells(4, 1).Value = “PERIODE : ” & Format(DrTgl, “dd-MMM”) & ” s/d ” & Format(SdTgl, “dd-MMM-YYYY”)

.Cells(6, 1).Value = “No”
.Cells(6, 2).Value = “Voucher”
.Cells(7, 2).Value = “Nomor”
.Cells(7, 3).Value = “Tanggal”
.Cells(6, 4).Value = “Chk/Giro”
.Cells(7, 4).Value = “Nomor”
.Cells(7, 5).Value = “Efektif”
.Cells(6, 6).Value = “Rek”
.Cells(6, 7).Value = “KodeSpl”
.Cells(6, 8).Value = “Jumlah”
.Cells(6, 9).Value = “Keterangan”

Dari codingan diatas anda telah mendapatkan header laporan pengeluaran kas yang selanjutnya anda tinggal mengisikan detail dari database yang telah tekoneksi melalui kodesi Ado dengan recordsed rs sbb

N = 1

startRow

Do While Not rs.EOF

‘Cells(Baris,Kolom)

.Cells(startRow + N, 1).Value = N

.Cells(startRow + N, 2).Value = rs!Voucher

.Cells(startRow + N, 3).Value = rs!tanggal

.Cells(startRow + N, 4).Value = rs!chkNo

.Cells(startRow + N, 5).Value = rs!efektif

.Cells(startRow + N, 6).Value = Left(rs!account, 6)

.Cells(startRow + N, 7).Value = rs!kodespl

.Cells(startRow + N, 8).Value = rs!Jumlah

.Cells(startRow + N, 9).Value = rs!Ket
‘ mendapatkan data yang telah jatuh tempo dan yang belum jatuh tempo

if rs!batal then

tbatal = tbatal + 1

else

If rs!efektif <= Date Then
tlunas = tlunas + rs!Jumlah
Else
Tajt = Tajt + rs!Jumlah
End If

End If
rs.MoveNext
N = N + 1
Loop

Langkah selanjutnya ialah anda cukup untuk membuat bagian penutupan pada laporan anda.

Sekian artikel yang saya sampaikan , mohon maaf bila ada kekurangan dalam penyampaian informasi.

Wassalamualaikum wr.wb

Source : https://zulidamel.wordpress.com/2007/11/10/koneksi-visual-basic-dengan-excel/

Database pada Ms Excel

Assalamualaikum wr.wb

Pada kesempatan kali ini , kita akan membahas apa itu database dan pengaplikasiannya pada ms.excel. Pengertian Database atau Basis Data adalah sebuah koleksi terorganisir dari data. Data tersebut biasanya diselenggarakan untuk dapat model aspek realitas dengan cara yang mendukung proses yang sedang membutuhkan. Konsep dasar database adalah kumpulan dari catatan, atau potongan dari pengetahuan. Sebuah database memiliki penjelasan terstruktur dari jenis fakta yang tersimpan di dalamnya: penjelasan ini disebut skema. Ada banyak cara untuk mengorganisasi skema, atau memodelkan struktur database.Model yang umum digunakan sekarang adalah model relasional, yang menurut istilah yaitu mewakili semua informasi dalam bentuk tabel yang saling berhubungan.

Langkah pertama membuat database pada ms.excel ialah :

•       Klik tanda panah kecil pada ribbon di atas sebelah kiri Microsoft Office Excel,lalu pilihlah More Commands
  

(Gambar 1)  

• Setelah muncul kotak Excel Options lalu ubah pengaturan Popular Commands menjadi Commands Not in the Ribbons

(Gambar 2)

•  Kemudian pilihlah Form lalu klik tombol Add>> untuk menambahkan icon pada ribbon

(Gambar 3)

•  Kemudian akan muncul pada menu Home tombol form yang dimana akan di gunakan untuk membuat form pada database yang akan di buat

(Gambar 4)

•  Sorot tabel yang akan di gunakan untuk pembuatan database,lalu klik ikon form. Setelah itu,maka isi dengan data yang akan di isi pada database

(Gambar 5)

•  Kemudian,untuk memasukkan data maka pilih New Record dimana akan muncul permintaan untuk pengisian data. Lalu,isilah data pada database sesuai kebutuhan.

(Gambar 6)

• Setelah semua data di input maka selanjutnya adalah mengubah tampilan agar lebih baik lagi dengan cara memilih kolom yang akan di edit lalu klik kanan pada mouse dan pilih Column Width untuk mengubah ukuran lebar

(Gambar 7)

•  Setelah mengubah ukuran dan memperbagus tampilan,maka database sudah siap di pakai

(Gambar 8)

Lalu selanjutnya ialah tutorial bagaimana mengedit database pada excel.

1. Siapkan database yang ingin di ubah atau di edit

(Gambar 9)

2.   Pilih menu home lalu klik ikon form

(Gambar 10)

3.     Kemudian setelah muncul kotak dialog,pilihlah Criteria untuk memilih Trigger yang di gunakan untuk menjadi petunjuk bagi data yang ingin di edit.

(Gambar 11)

4.. Masukkan ciri – ciri data yang akan di ubah, bisa menggunakan Nama, NPM, Kelas, maupun Jurusan. Lalu tekan enter

(Gambar 12)

5.  Kemudian data yang sesuai akan tampil

(Gambar 13)

6. Apabila ingin melakukan pengeditan data, misal mengganti data kelas, jurusan, dan yang lain nya. Kemudian tekan enter setelah melakukan pengeditan,

(Gambar 14)

7. Untuk menghapus record data, maka pada pilihan edit dalam Criteria tadi kita tidak mengedit data. Melainkan memilih button yang bertuliskan Delete. Lalu, pada kotak pemberitahuan, maka tekan OK untuk menghapus record

(Gambar 15)

8. Setelah memilih OK,maka data pada database akan berubah menjadi data yang baru.

(Gambar 16)

Terimakasih , mungkin itu saja yang bisa saya sampaikan , mohon maaf apabila ada kesalahan yang terdapat pada atikel saya kali ini.

Source : Kelompok 6 KTI A GUNARDAMA 2018

Wassalamualaikum wr.wb

GRAFIK dan PENCETAKAN PADA MS.EXCEL

Assalamulaikum wr.wb

Pada kesempatan kali ini , saya akan membahas tentang apa itu grafik dan pencetakan pada ms.excel yang pertama-tama kita harus tau apa itu grafik. Grafik adalah penyajian data yang terdapat dalam tabel yang ditampilkan ke dalam bentuk gambar. grafik merupakan gambaran dari pasang surutnya suatu data yang ada, dan digambarkan dengan garis ataupun gambar. Secara garis besar grafik dapat dibedakan menjadi 3 (tiga) macam, yaitu grafik batang, grafik garis, dan grafik lingkaran. Tujuan pembuatan grafik adalah menunjukkan perbandingan, informasi kualitatif dengan cepat serta sederhana. Data dalam bentuk uraian deskriptif yang kompleks dapat disederhanakan dengan menggunakan grafik.Tujuannya ialah dengan menjelaskan grafik dan pencetakan pada Microsoft Excel, diharapkan mahasiswa mampu membuat grafik, mengetahui kegunaan berbagai jenis grafik, dan mencetak lembar kerja.

Langkah pertama untuk membuat grafik ialah :


1. Siapkan data dalam bentuk tabel yang ingin dibuat menjadi sebuah grafik pada Microsoft Excel. Biasanya data yang akan dibuat menjadi grafik adalah data yang menunjukkan sebuah perbandingan.

(Gambar 1)

2. Setelah data dibuat blok atau sorot seluruh data kemudian klik tombol insert, lalu klik recommended chart pada pada menu charts.

(Gambar 2)

3. Fungsi dari recommended charts ini untuk memberikan saran grafik terbaik untuk data yang digunakan.

(Gambar 3)

4. Jika ingin memilih sendiri grafik yang akan digunakan, tekan menu all charts, maka akan muncul seluruh grafik yang disediakan oleh Microsoft Excel.

(Gambar 4)

5. Pilih grafik yang ingin digunakan

(Gambar 5)

6. Grafik berhasil dibuat

(Gambar 6)

•  Merubah Tampilan Grafik

Anda dapat merubah tampilan dari sebuah grafik dengan cara pilih menu design

(Gambar 7)

Fungsi dari tiap menu yaitu :
a. Add Chart Element berfungsi untuk menambahkan elemen yang terdapat pada grafik.

b. Quick Layout berfungsi untuk merubah tampilan grafik secara keseluruhan.

c. Change Color berfungsi untuk merubah warna yang digunakan pada grafik.

d. Chart Style berfungsi untuk merubah style yang digunakan pada grafik.

e. Switch Row/Column berfungsi untuk menukar posisi data dari baris menjadi kolom, dan sebaliknya.

f. Select Data berfungsi untuk menukar posisi data namun secara terpilih.

g. Move Chart berfungsi untuk memindahkan grafik ke lembar kerja lain.

h. Change Chart Type berfungsi untuk merubah jenis grafik.

• .Mencetak Lembar Kerja 

Anda dapat mencetak seluruh atau sebagian lembar kerja dan buku kerja, satu per satu maupun beberapa sekaligus. Jika data yang ingin dicetak berada dalam tabel Microsoft Excel, Anda dapat mencetak tabel Excel saja.

1.  Mencetak satu atau beberapa lembar kerja

Langkah-langkah mencetak satu atau beberapa lembar kerja :

- Pilih lembar kerja yang ingin Anda cetak

(Gambar 8)

- Pilih file, lalu tekan cetak, atau tekan Ctrl+P.

- Tekan tombol cetak atau sesuaikan pengaturan sebelum Anda menekan tombol cetak.

(Gambar 9)

•  Mencetak semua atau sebagian lembar kerja

Langkah-langkah mencetak semua atau sebagian lembar kerja :

1. Pilih lembar kerja, lalu pilih rentang data yang ingin Anda cetak.

2 Pilih file, lalu tekan cetak. Di bawah settings, tekan panah di samping print active sheets, lalu pilih opsi yang sesuai

(Gambar 10)

3. Tekan cetak.

•  Mencetak tabel Excel

Langkah-langkah mencetak tabel :

1. Tekan sel dalam tabel untuk mengaktifkan tabel.

2. Pilih file, lalu tekan cetak. Di bawah settings, pilih panah di samping print active sheets lalu pilih print selection

(Gambar 11)

3. Tekan Cetak.

•  Mencetak buku kerja ke file

Langkah mencetak buku kerja menjadi sebuah file :
1. Pilih file, lalu tekan cetak, atau tekan Ctrl+P.

2. Di bawah printer, pilih print to file.

(Gambar 12)

3. Dalam kotak dialog simpan hasil cetak sebagai, masukkan nama file, lalu tekan OK.

Terimakasih sudah berkunjung , mohon maaf bila banyak kekurangan informasi didalamnya yang masih belum dibahas , kurang lebihnya mohon maaf.

Wassalamualaikum wr.wb

Source : Kelompok 5 KTI A Univ Gunadarma Kalimalang.

PENGENALAN MS. EXCEL

Assalamualaikum wr.wb

Pada kesempatan kali ini kita akan membahas apa itu ms excel dan juga fungsi fungsi didalamnya. Ms Excel sendiri ialah suatu program aplikasi bawaan dari microsoft yang digunakan untuk mengorganisir, menghitung, menyediakan maupun menganalisa data-data dan mempresentasikannya ke grafik atau diagram. Kemudahan lain yang diperoleh dari program ini adalah terintegrasinya program Microsoft Excel dengan program aplikasi windows yang lain. Saat anda membuka Microsoft Excel maka sebuah buku kerja (Workbook) siap digunakan yang didalamnya terdapat beberapa lembar kerja (worksheet).

Lalu langkah langkah untuk memulai microsoft office excel ini.

-Klik tombol start pada keyboard

(Gambar 1)

- Ketiklah kata “excel” pada tampilan awal, lalu klik excel 2013

(Gambar 2)

- Setelah beberapa saat, maka akan muncul tampilan dasar Microsoft excel

(Gambar 3)

-. Lalu klik blank workbook untuk memulai menjalankan aplikasi Microsoft Office Excel 2013

(Gambar 4)

Lalu setelahnya ialah mempelajari apa apa saja fitur fitur Menu yang terdapat pada ms.excel ini.

(Gambar 5)

1.     Menu Bar

Menu Bar berguna untuk menjalankan suatu perintah. Menu bar pada Microsoft Office Excel antara lain :

a.      File

b.      Home

c.       Insert

d.      Page layout

e.       Formulas

f.        Data

g.      Review

h.      View

2.      Status Bar

Status Bar mempunyai dua area utama, yaitu Message Area pada bagian kiri dan kotak indikator pada bagian kanan. Ready merupakan pertanda bahwa Excel siap menerima perintah, sedangkan NUM mengindikasikan bahwa fungsi tombol-tombol angka pada bagian keypad di papan keyboard dalam kondisi aktif.

3.      Title Bar

Title bar merupakan bagian yang berada paling atas lembar Excel. Dalam title bar terdapat beberapa komponen, antara lain :

a.       Ikon Control Menu

b.      Restore, untuk mengatur ukuran layar dalam ukuran yang relatif.

c.       Move, untuk memindahkan posisi layar jendela ke posisi lain.

d.      Size, mengatur ukuran layar jendela Excel.

e.       Minimize, menampilkan jendela Excel ke ukuran minimal dalam bentuk ikon.

f.        Maximize, menampilkan jendela Excel ke ukuran maksimal, yaitu memenuhi layar.

g.       Close, untuk keluar dari aplikasi Excel.

4.      Formula Bar

Formula bar berfungsi untuk memasukkan, memperbaiki, dan juga dapat menampilkan data atau rumus pada sel yang sedang aktif. Untuk memperbaiki data atau rumus adalah dengan cara mengklik atau menekan tombol F2.

5.      Petunjuk Sel (Cell Pointer)

Untuk memindahkan penunjuk sel ke posisi yang baru dapat digunakan bantuan mouse maupun keyboard. Dengan mouse kita dapat leluasa memindahkan posisi penunjuk sel dengan mengarahkan pointer ke sel yang dituju. Sedangkan dengan menggunakan keyboard langkah yang ditempuh antara lain

(Gambar 6)

Jika posisi sel berada diluar tampilan jendela, maka kita dapat menggunakan fasilitas scrollbar, baik yang vertikal maupun yang horizontal untuk menjangkau sel yang dimaksud.

Lalu jika kita ingin membuat workbook baru:

Langkah-langkahnya adalah sebagai berikut :

1.      Pilih menu File – New (Ctrl+N) atau klik ikon lembar kosong pojok kiri atas pada toolbar.

2.      Jika ingin membuka workbook yang telah disusun dengan format tertentu bisa menggunakan tab Spreadsheet Solutions atau Bussiness Planner Template.

(Gambar 7)

Pilih format yang diinginkan dengan mengklik pada file yang ditampilkan, dan lihat contoh tampilannya pada Preview

.-Setelah menentukan file yang dimaksud klik OK

Lalu setelah bisa membuat workbook baru , maka ini adalah cara untuk menyimpan workbook tersebut.

•     Menyimpan Buku Kerja (Workbook)

1.      Pilih menu File – Save (Ctrl+S)

2.      Pada kotak dialog Save In, tentukan tempat yang dipakai untuk menyimpan.

3.      Pada kotak isian, ketikkan nama file.

                  4 .  Klik ikon save

•    Mengatur Tampilan Lembar Kerja

1.      Anda dapat menggeser Zoom Control ke arah kiri untuk memperkecil tampilan lembar kerja atau arah kanan untuk memperbesar tampilan yang terletak dipojok kanan bawah dari lembar kerja.
   

(Gambar 8)

2.      Anda dapat mengklik persentasi dari nilai yang ditampilkan, sehingga Anda tampilan akan tampil zoom control, dan Anda dapat memilihnya.

  3.      Dengan cara ini Anda dapat memperbesar dan memperkecil tampilan lembar kerja dengan praktis yaitu, dengan menekan tombol Ctrl dan menggerakkan scroler pada mouse, sehingga Anda dengan bebas dapat memperkecil dan memperbesar tampilan lembar kerja.

4.     Selain itu Anda juga dapat mengatur tampilan dengan memilih dalam bentuk Normal yang ditampilkan secara default, tampilan secara Page Layout (yang juga menampilkan margin di Excel serta pengaturan Header dan Footer) dan Page Break Preview (yang juga menampilkan lembar kerja per halaman).

Lalu membuat rumus pada ms excel.

1. SUM
Menjumlahkan nilai yang terdapat pada sel D1 sampai D10, rumus yang dituliskan adalah :

"=D1+D2+D3+D4+D5+D6+D7+D8+D9+D10".

Akan lebih mudah jika menggunakan fungsi SUM, dengan menuliskan "=SUM(D1:D10)"

2. AVERAGE

Letakkan kursor ke baris nilai rata-rata kemudian ketikkan rumus =AVERAGE(C2:C11) lalu enter. Untuk memasukkan data dengan mudah, setelah rumus =AVERAGE(, tandai seluruh data dari kolom C baris 2 sampai baris 11 kemudian beri tanda tutup kurung dan tekan enter.

3. MAX

Pada rumus Excel cara penulisan fungssi MAX adalah sebagai berikut : =MAX(Angka1; [Angka2]; …)
Keterangan Syntax :
 -Angka1 : Merupakan sekumpulan angka, nama range, array, atau referensi sel yang berisi angka-angka yang kita ingin cari nilai tertinggi atau maksimumnya.
- [Angka2], ... : (Opsional) Angka, nama range, array atau referensi sel lain yang akan kita ikutkan untuk dicari nilai paling terbesarnya. Maksimal kita bisa menambahkan sampai 255 argumen pada fungsi Max ini.

4. MIN 

Pada Microsoft Office Excel,penulisan rumus dapat di tulis dengan :
=MIN(Angka1;[Angka2];…)
Keterangan Syntax :
· Angka1 merupakan sekumpulan angka,nama range, array, atau referensi sel yang berisi angka-angka yang kita ingin cari nilai terendah atau nilai terkecil nya.
· Angka2 (pilihan) angka,nama range,array,atau referensi sel lain yang akan kita ikutkan untuk di cari nilai terkecil nya. Maksimal kita bisa menambahkan hingga 255 argumen pada fungsi Min ini. 

5. Hlookup dan Vlookup

(Gambar 9)

Siapkan data yang akan di gunakan,baik data pada tabel utama yang masih kosong maupun tabel berisi data yang akan di ambil.

Fungsi HLOOKUP di tulis dengan cara memasukkan rumus =HLOOKUP karena itu rumus fungsi HLOOKUP.Kemudian disertai tanda kurung yang diawali lokasi data yang sama. Kemudian disertai dengan sorotan table yang memiliki data yang sama dengan data yang masih kosong pada tabel utama. Kemudian,pilih lokasi dimana data yang akan diambil. Misal pada tabel 2, maka pilih 2, setelah itu masukkan TRUE agar nilai bernlai benar.



Fungsi VLOOKUP di tulis dengan cara menginput =VLOOKUP karena itu rumus fungsi VLOOKUP.Kemudian disertai tanda kurung yang diawali lokasi data yang sama. Kemudian disertai dengan sorotan table yang memiliki data yang sama dengan data yang masih kosong pada table utama. Kemudian,pilih lokasi dimana data yang akan diambil. Misal pada table 2,maka pilih 2 setelah iu. Kemudian masukkan TRUE agar nilai bernlai benar. Fungsi LOGIKA AND, OR Operator logika digunakan untuk merealisasikan dua buah atau lebih pernyataan logika. Bentuk umum penulisan sintaknya adalah sebagai berikut :


AND(eks1,eks2,...) bernilai benar jika semua penyataan benar OR(eks1,eks2,...) bernilai benar jika salah satu pernyataan benar
Perhatikan contoh berikut ini :
a. Tambahkan kolom bonus pada tebel laporan penjualan CV STORLIEN GSK COMPUTER

b. Pembeli akan mendapatkan bonus berupa jam dinding jika pembelian lebih dari 25 dan kode barang MS

c. Pada laporan penjualan dilakukan perubahan pemberian diskon.Diskon sebesar 5% akan diberikan bagi yang jumlah pembeliannya >=5 atau kode barang BL

(Gambar 10)

a. Untuk mengisi kolom bonus ketikkan fungsi sebagai berikut :

=IF(AND(E6>=15;D6="MS");"JamDinding";"TidakDapat")

b. Untuk mengisi kolom diskon ketikkan fungsi sebagai berikut :

=IF(OR(E6>=15;D6="BL");5%*H6;0)


6. Fungsi STRING

Fungsi ini digunakan untuk memanipulasi data string. Ada beberapa fungsi string : fungsi LEFT, RIGHT, MID dan Fungsi LEN.

(Gambar 11)

7. Fungsi LEFT (...)

Fungsi left digunakan untuk mengambil karakter dari bagian sebelah kiri dari suatu teks. Bentuk umum penulisannya adalah :
=LEFT(text,num_chars)
Dimana text adalah data yang akan diambil sebagian karakternya dari sebelah kiri, num_chars adalah jumlah karakter yang akan diambil. Lihat rumus pada Gambar 2.31

8. Fungsi MID

Fungsi ini digunakan untuk mengambil sebagian karakter bagian tengah dari suatu teks. Bentuk umum pemakaian fungsi ini adalah:
=MID(text,start_num,num_chart)
Artinya mengambil sejumlah karakter mulai dari start_num, sebanyak num_char. Untuk lebih jelasnya lihat rumus pada Gambar 2.31

9. Fungsi RIGHT

Fungsi ini merupakan kebalikan dari fungsi left, jika fungsi left mengambil sejumlah karakter dari sebelah kiri, maka fungsi mengambil sejumlah karakter dari sebelah kanan teks. Bentuk umum penulisannya adalah :
=RIGHT(text,[num_chars])
Dimana text adalah data yang akan diambil sebagian karakternya dari sebelah kanan, num_chars adalah julah karakter yang akan diambil. Lihat rumus pada Gambar 2.31

10. Fungsi LEN
Fungsi ini digunakan untuk menghitung panjang karakter. Lihat pada gambar 11.

Sekian artikel ini dibuat , mohon maaf apabila ada kekurangan dalam penyajiannya. 

Referensi : Presentasi kelompok 4 ( KTI A) Univ Gunadarma Kalimalang.