Cetak Secara Masal Alamat Paket Kiriman DagangOnline Dengan Microsoft Excel

Pada artikel kali ini kita fokus pada pencetakan masal atau pencetakan sekaligus label alamat kiriman dagangonline, sedangkan pada artikel terdahulu di tekno-g sahabat sudah mempelajari bagaimana menciptakan Aplikasi Cetak Label Alamat Paket Kiriman Jualan Online Dengan Microsoft Excel.

Dengan menggunakan aplikasi teman tidak perlu lagi repot meng klik tombol Print atau Cetak di Microsoft Excel, cukup hanya dengan mengklik tombol mulai cetak maka dengan gampang sobat mampu mencetak sekaligus banyak label jualannya. 

Nah bagaimana melakukannya mari ikuti tindakan berikut ini :

1. Download File yang sudah kami sediakan (cek dibagian bawah postingan ini), jika telah memakai file sebelumnya mampu melakukan copy paste data penjualannya dan menyesuaikan data labelnya.
2. Masuk ke Sheets Data Pelanggan, Pastikan Penomoran Pelanggan atau Urutan Order Penjualan adalah angka 1 dan seterusnya. Kemudian Klik Tombol CETAK MASAL LABEL.

3. Selanjutnya akan timbul jendela CETAK MASAL LABEL seperti dibawah ini ;

Kemudian teman bisa mengendalikan sesuai keperluan pencetakan sekaligus mulai dari data ke berapa sampai dengan data terakhirnya yang diharapkan :

Keuntungan memakai Aplikasi ini :

  • Bisa mencetak Label Jualan Online secara masal tanpa repot mencetak satu persatu
  • Jualan Online lebih terdata dan mampu di follow suatu dikala
  • Microsoft Excel terinstall hampir di seluruh komputer dan PC yang ada, jadi flexible.
  • Memiliki akomodasi Interval Waktu, sehingga bisa dikontrol cara dari satu pencetakan ke pencetakan lainnya.
  • Memakai dua format yang mampu disesuaikan.

Beberapa Hal yang perlu diperhatikan :

  • Pastikan Macro telah diaktifkan atau di Enable kan, jikalau tidak tahu caranya bisa menyaksikan di postingan yang ada juga di web ini.
  • Sudah melakukan Print Preview dan Mengatur Setup Printer yang dipakai serta menentukan printer
  • Untuk membuat File yang bekerjasama dengan postingan ini kami memakai Microsoft Excel 2016, bisa saja tidak kompatibel atau tidak cocok dengan versi yang sobat gunakan, bila dibawah dari versi yang kami miliki. Silahkan diinformasikan di bab komentar jika terjadi dilema.
Demikian artikel Cetak Secara Masal Alamat Paket Kiriman Jualan Online Dengan Microsoft Excel agar berfaedah bagi teman yang mengelola Online Shop nya, bagi sahabat yang ingin menjajal memakai aplikasi ini silahkan di link berikut ini :

Saat membuka file gunakan password : tekno-g

Agar sahabat bisa dengan gampang menggunakan aplikasi diatas berikut video gampang cara menggunakannya :

Terima kasih telah berkunjung ke blog tekno-g ini, Jika sahabat memperoleh hal yang salah dalam artikel ini silahkan komentar yang membangun untuk perbaikan, kami akan berupaya mencari solusi secepatnya mungkin. Apabila merasa berfaedah yang besar silahkan like and share. Terima kasih

Download Pola Kwitansi Nota Pemasaran Sederhana Dengan Microsoft Excel

Sahabat yang mempunyai toko atau daerah perjuangan dalam kecil-kecilan dan menengah acap kali memerlukan Kwitansi atau nota pemasaran ketika bertransaksi dengan pelanggan. Dalam postingan kali ini kami akan membuatkan Contoh Kwitansi Nota Penjualan Sederhana yang dapat dibuat dengan Microsoft Excel dan juga mampu sobat download dan di penyesuaian sesuai dengan keperluan.

Kwitansi atau Nota Penjualan sederhana sangatlah mudah dibuat dengan Microsoft Excel, hanya dengan beberapa langkah maka bentuk dari nota tersebut sudah bisa kita dapatkan dan siap untuk di cetak memakai printer. 
Sebagian dari teman mungkin sudah ada juga yang membuat kwitansi penjualan kepada percetakan sehingga tidak butuhlagi membuat. Namun bagi yang kekurangan stok nota ataupun baru membuat kwitansi pemasaran maka contoh yang ada dalam postingan ini mampu disertai atau di download langsung.
Kwitansi penjualan berkhasiat untuk bukti pemasaran oleh pelaku usaha dan sebagai bukti pembelian oleh konsumen. Dengan memiliki bukti ini yang lazimnya dibuat 2 rangkat maka pelaku usaha bisa mengkalkulasikan stok yang terjual pada satu waktu abad tertentu.
Baik tidak berpanjang lagi berikut cara Membuat Kwitansi atau Nota Penjualan Dengan Microsoft Excel

1. Format Kwitansi Nota Penjualan

  • Pada bab Header atau atas di nota tersebut lazimnya berisi No Kwitansi atau Nota, Nama Pelanggan atau Nama Toko Lain yang berbelanja dan lalu juga ada nama usaha atau toko daerah kita dan dilengkapi dengan logo nya.
  • Pada bagian isi berisikan kolom dan baris, kolom yaitu Banyaknya barang yang dibeli, Nama barang atau jasa yang dibeli, harga satuan, lalu jumlah. 
  • Kemudian barisnya menyesuaikan dengan besar atau panjang dari bentu nota yang dibentuk, lazimnya 10 atau 15 baris tergantung keperluan.
  • Masih pada bagian isi terdapat juga Jumlah total dari pemasaran tersebut.
  • Dan dibagian bawah sekali ada tanggal dan tanda tangan pemasaran lalu nama dan tanda tangan akseptor (konsumen sebagai pembeli).

2. Cara Membuat 

  • Untuk microsoft excel sangatlah membuatnya, tinggal memilih lebar kolom dan baris, lalu pada masing-masing cell masukkan judul kolom yang diperlukan.
  • Tebalkan bagian-bab tertentu dari kolom tersebut dan sesuai besarnya dengan hasil cetakan yang diharapkan contohnya ukuran A5 (ini biasanya 1/2 dari kertas kwarto) atau ukuran lain dikala pencetakan.
  • Jika telah cocok, lakukanlah pencetakan di printer boleh dalam keaadan kosong dan dicetak dalam jumlah tertentu. Jika nanti akan diisi manual atau dengan tulisan tangan. Bisa juga dengan menginput eksklusif pemasaran di Laptop atau komputer, tetapi cara ini memerlukan waktu sedikit waktu lebih bagi yg tidak cepat dalam proses pengetikan.

Bagi teman yang ingin lebih singkat dan tidak mau sibuk-sibuk membuat sendiri Kwitansi Nota Penjualan tersebut, silahkan download dengan mengikuti poin dibawah ini :

Setelah tamat download untuk membuka file Excelnya gunakan password : tekno-g

Terima kasih telah berkunjung ke blog tekno-g ini, Jika teman memperoleh hal yang salah dalam artikel ini silahkan komentar yang membangun untuk perbaikan, kami akan berupaya mencari solusi secepatnya mungkin. Jika merasa berfaedah silahkan like dan share di media umum.. Terima kasih

Aplikasi Cetak 4 Label Alamat Paket Kiriman Jualan Online Dengan Microsoft Excel

Pada kesempatan yang lalu kami sudah berbagai bagaimana menciptakan Aplikasi Cetak Label Alamat Paket Kiriman Jualan Online Dengan Microsoft Excel. Namun aplikasi tersebut hanya mendukung 1 alamat untuk satu lembar cetakan, sehingga jadi boros dan sisa kertas tidak mampu dipakai atau bila mau dipakai mesti dimasukan dengan posisi yang pas ke printer.

Karena ada seruan dari netizen bagaimana jika dalam 1 halaman bisa dijadikan 2 atau lebih label jualan online sehingga lebih bisa meminimalkan kertas, untuk itu kami sudah memodifikasi aplikasi yang ada, silahkan simak caranya dan dibagian bawah postingan ini juga terdapat video bagaimana cara melakukan penyesuaian kalau masih kurang terperinci, lalu terdapat juga link download dalam deskripsi video tersebut semoga sahabat tidak sulit lagi dalam melaksanakan modifikasi.
Baca Juga : Aplikasi Cetak Label Alamat Paket Kiriman Jualan Online Dengan Microsoft Excel

Baiklah kita langsung saja menerangkan bagaimana melaksanakan download file nya dan cara modifikasinya. Kita awali dengan cara merubah 1 label menjadi 4 label :

A. Modifikasi 1 Label Alamat Menjadi 4 Label

  • Blog Label alamat yang telah ada kemudian copy dan paste ke lokasi yang dikehendaki mirip gambar diatas.
  • Atur kembali lebar kolom dan baris sesuai dengan teladan yang sudah ada pada label pertama.

B. Sesuaikan Rumus Excel Untuk Membaca Alamat dan Data Pelanggan

  • Pastikan rumus excel yang memakai vlookup telah disesuaikan dengan mengganti referensi No Pelanggan yang dibaca.
  • Contoh Pada Label 2 di Cell Nama rumus menjadi =VLOOKUP($Q$7;DATAPELANGGAN;2;FALSE) amati yang warna merah, silahkan ganti sesuai dengan Posisi Cell No Pelanggan.
  • Demikian juga pada Label 3 dan 4. Untuk lebih terperinci silahkan lihat di Video dibawah postingan ini.

C. Cara Penggunaan

  • Setelah label di copy menjadi 4 dan rumus disesuaikan maka sekarang dalam 1 lembar kertas (dalam setting kami memakai A4 atau Kwarto)
  • Silahkan ubah no konsumen sesuai dengan no pelanggan yang mau diantarpaketnya. Makara Pelanggan 1, 2, 3 dan 4 atau bisa saja nomor lain misalnya 5, 7, 9, 3 dan seterusnya sesuai dengan keperluan.

D. Cara Cetak / Print

  • Karena ada pergantian, maka tentukan sudah memblok seluruh label yang mau dicetak
  • Kemudian klik Menu Page Layout, Set Print Area
  • Setelah itu baru di Cetak/Print
  • Pengaturan perataan, margin dan posisi cetak mampu dilaksanakan pada hidangan print

Berikut hasil cetak yang kami coba dengan printer pdf :

Lihat pada nama yang ditandai warna merah, terdapat nama dan alamat yang berlawanan kan? Kaprikornus satu lembar kertas A4 bisa diisi dengan 4 Label Alamat kiriman online.
Untuk lebih jelas silahkan lihat video dibawah ini atau Klik Disini untuk membuka video di layar youtube anda.

Bagi teman yang ingin mendapat File Silahkan :

Terima kasih sudah berkunjung ke blog tekno-g ini, Jika sahabat menemukan hal yang salah dalam postingan ini silahkan komentar yang membangun untuk perbaikan, kami akan berupaya mencari penyelesaian secepatnya mungkin. Apabila merasa berfaedah yang besar silahkan like and share. Terima kasih

Cara Mengetahui Cell Yang Berisi Formula Atau Rumus Dengan Conditional Formatting Di Microsoft Excel

Sahabat tekno-g kali ini kita akan membaca bagaimana cara mengetahui cell yang berisi formula atau rumus dengan conditional formatting di Microsoft Excel. Artikel ini pernah di Publish di salah satu Tabloid Komputer yang terkenal yaitu PC-Plus dimana waktu itu kami menjadi kontributor pada salah satu halaman tips dan trik di tabloid tersebut.

Ok, sebelum kita lanjut bagaimana caranya, kita mesti tahu dulu kenapa kita butuh tahu cell yang berisi formula ? Baik berikut karena :
  • Terkadang kita butuh mengolah data dengan excel namun tanpa sengaja telah menginput atau mengganti isi dari sebuah cell dengan data yang kita miliki, celakanya cell tersebut mengandung formula khusus atau fungsi yang kita buat, namun diakhir proses kita menyimpan file, menutup worksheet kesudahannya kehilangan formula tersebut.
  • Bisa jadi formula yang kita miliki adalah rumus yang kompleks misalnya rumus yang memiliki nalar pencabangan yang banyak dan bekerjasama (link) dengan sheets atau bahkan file excel yang yang lain. Jika tanpa sengaja terhapus pasti akan sungguh merepotkan untuk membuatnya kembali.
  • Kita tergolong orang yang suka melaksanakan Cut dan Paste atau Copy Paste Mania, tanpa sengaja mem paste di cell yang justru disitu ada rumus yang penting maka ini pastinya akan menyusahkan kita.

Apa solusinya ? Ada beberapa solusi diantaranya yaitu :

  1. Menyembunyikan baris (row) atau kolom (column) dengan kemudahan hide
  2. Memproteksi cell dan mengaktifkan perlindungan workbook sehingga hanya cell tertentu saja yang mampu di edit.
  3. Memberi tanda khusus pada cell yang mempunyai formula dengan mempergunakan conditional formatting.

Dalam artikel ini kita akan menggunakan cara yang ketiga, jikalau ada kesempatan kita juga akan menerangkan cara 1 dan 2. Baik mari langsung kita lihat cara menciptakan conditional formattingnya.

  1. Dalam worksheet, klik [Insert]>[Name]>[Define].
  2. Dalam kotak obrolan Define Name, ketik pada kotak Names in Workbook. SEL_PUNYA_FORMULA (ini mampu diubah sesuai cita-cita)
  3. Masukkan rumus berik ut kotak Refers to: =GET.CELL(48,INDIRECT(“rc”,FALSE)) lalu klik Klik [Add]>[OK].
  4. Perhatikan tanda , (koma) bisa jadi berubah menjadi ; (titik koma) sesuai dengan setting Excel yang sahabat miliki. 
  5. Kemudian blok seluruh sel dalam range kerja Anda, kemudian klik [Format]>[Conditional Formatting].
  6. Dalam kotak Conditional Formatting, pilih Formula Is yang terletak di bawah Condition 1, lalu masukkan rumus berikut di sebelahnya: =Sel_Punya_Rumus
  7. Lalu klik [Format] dan sesuaikan format sel yang berisi rumus sesuai dengan impian Anda, contohnya klik [Pattern] pilih warna hijau muda lalu klik [OK] dan [OK] sekali lagi (pergeseran dapat dipraktekkan pada, border dan warna latar sel).


    Jika tidak ada kesalahan dalam mengikuti semua petunjuk diatas, maka setiap cell yang berisi rumus akan ditandai dengan warna hijau muda.

    Terima kasih sudah berkunjung ke blog tekno-g ini, Jika teman memperoleh hal yang salah dalam postingan ini silahkan komentar yang membangun untuk perbaikan, kami akan berusaha mencari penyelesaian secepatnya mungkin. Apabila merasa berguna yang besar silahkan like and share. Terima kasih

    Aplikasi Cetak Label Alamat Paket Kiriman DagangOnline Dengan Microsoft Excel

    Bisnis online yang memiliki fisik produk tidak terlepas dari pengiriman produk tersebut terhadap konsumen, lazimnya kita akan menulis Label Alamat Penerima Kiriman, bisa pribadi di kiriman atau dibuat dulu di kertas kemudian kertas tersebut di tempel pada produk. Biasanya untuk lebih rapi dan terstruktur pemilik online shop akan menyimpan data pelanggannya di komputer atau laptop kemudian kemudian data tersebut di cetak dalam format Label Alamat Pengiriman Paket Jualan Online.
    Kali ini untuk membuat lebih mudah sobat tekno-g kami sudah menyiapkan suatu file yang mampu disebut aplikasi siap pakai dan mampu dipakai untuk mencetak label alamat paket kiriman jualan online dengan microsoft excel.
    Apa saja keunggulan dari aplikasi ini :
    • Hanya Terdiri Dari 1 (satu) file dengan alamat yang mampu dibentuk secara dinamis
    • Data Pelanggan (Nama, Alamat dan Nomor Handphone) tersimpan dalam satu sheet yang mampu ditambah terus sesuai kebutuhan seperti database
    • Bisa disesuaikan formatnya dengan kebutuhan
    • Gratis dan siap pakai

    File ini mampu sahabat download dengan link yang terdapat di selesai postingan ini, namun sebelumnya mari kita lihat dahulu seperti apa aplikasi cetak label tersebut :

    1. Format Label Kiriman

    Secara sederhana format label mesti mengikuti ketentuan yang ada pada jasa kurir atau pengantaran paket online. Adapun format patokan dari label pengirim adalah sebagai berikut :
    • Harus Mencantumkan Nama, Alamat Jelas dan Nomor Hp Penerima
    • Harus Terdapat Nama, Alamat Jelas dan Nomor Hp Pengirim
    • Keterangan Singkat Isi Barang

    Sedangkan posisi dari format tersebut :

    • Untuk Penerima berada pada posisi yang gampang di baca dan lazimnya ditaruh pada bab yang terluas dari sisi paket, dan pengirim di posisikan disebelah kiri dari bagian penerima atau dibagian lain yang lebih kecil
    • Bisa dibentuk dalam satu lembar kertas (seperti aplikasi yang kita buat ini) kemudian dicetak atau ditulis dan ditempel pada paket kiriman jualan online. 

    2. Format Sheets Database Pelanggan

    Karena ini ialah semacam aplikasi sederhana maka formatnya pun sederhana yaitu meliputi database pelanggan yang terdiri cuma 4 kolom saja adalah Nama, Alamat, No Hp dan Pilihan Kurir. Database ini terus bisa ditambah sesuai kebutuhan dan tentu saja kekuatan dari memory laptop atau komputer teman, jangan khawatir 

    3. Preview Cetakan Label Kiriman

    Sebelum dilaksanakan pencetakan pencetakan di printer, sebaiknya kerjakan dulu preview dari aplikasi label alamat kiriman untuk melihat akibatnya. Jika telah cocok maka kerjakan pencetakan 
    Cara Menggunakan Aplikasi

    a. Mengenal Aplikasi

    Aplikasi ini dibentuk dengan Excel dan sungguh gampang penggunaannya, terdiri dari 2 sheets utama (sheest lain mampu ditambahkan belakangan) yaitu Label1 dan DataPelanggan. Sheets Label1 ialah sheet untuk mencetak label yang datanya diperoleh dari Sheets DataPelanggan, sedangkan sheets data pelanggan yakni Sheets untuk menginput data konsumen.

    b. Input Data Pelanggan

    • Untuk mengisi data pelanggan, sahabat tinggal mengaktifkan sheets DataPelanggan, Input data berurutan mulai dari no, nama, alamat dan kurir.
    • No wajib unik dan upayakan berurutan (meskipun tidak harus berurutan).
    • Setelah data di input di Sheets DataPelanggan, Pindah ke Label1 dan masukkan No Pelanggan sesuai dengan kolom No di Sheets DataPelanggan.
    • Maka Label Alamat Paket Kiriman sesuai dengan nama konsumen siap untuk di cetak

    c. Logo 

    • Jika dibutuhkan logo dapat di tambahkan dari sajian Insert dan masukkan logo sesuai dengan logo Toko Online yang sobat miliki.

    d. Pencetakan

    • Label Alamat yang ingin di cetak semestinya di preview dulu untuk mem paskan posisi margin dari kertas yang dipakai, dan lazimnya ini cuma dipakai 1 kali saja dan seterusnya mampu pribadi di cetak.

    Demikian Aplikasi Cetak Label Alamat Paket Kiriman Jualan Online Dengan Microsoft Excel biar berguna bagi teman yang mengurus Online Shop nya, bagi sobat yang ingin mencoba memakai aplikasi ini silahkan di link berikut ini :

    Saat membuka file gunakan password : tekno-g

    Agar teman mampu dengan mudah memakai aplikasi diatas berikut video mudah cara menggunakannya :

    Terima kasih telah berkunjung ke blog tekno-g ini, Jika sobat menemukan hal yang salah dalam postingan ini silahkan komentar yang membangun untuk perbaikan, kami akan berupaya mencari solusi secepatnya mungkin. Apabila merasa berfaedah yang besar silahkan like and share. Terima kasih

    Jumlah Baris, Kolom Dan Worksheet Pada Excel 2016

    Pernahkan sahabat bertanya berapa banyak jumlah baris, kolom dan worksheet dalam satu file Excel ? Jika pernah, tentu teman akan menemukan jawabannya dengan mudah. Dengan kemajuan teknologi kini ini, semua pertanyaan itu dapat dengan mudah di cari jawabannya melalui internet. Google sebagai mesin penelusuran sudah meng index luar biasa banyak dari halaman-halaman web yang ada dengan demikian kita bisa menerima data yang berafiliasi dengan penelusuran kita.

    Ok, berikut Jumlah baris, kolom dan sheet pada Microsoft Excel 2016, 2013, 2010 dan 2007 ialah :
    Jumlah Baris 1,048,576
    Jumlah Kolom 16,384
    Jumlah Sheets Tidak Terbatas Sesuai Kapasitas Memory

    Dengan data baris dan kolom sebanyak itu, sebenarnya untuk teman yang memerlukan database dengan kapasitas kecil dan sedang telah lebih dari cukup, bayangkan dengan 1 juta lebih baris data mampu digunakan dalam satu sheets.
    Artinya Microsoft Excel mampu juga dipakai untuk membuat database dalam lingkungan yang tidak terlalu besar dan jumlah transaksi yang tidak terlampau banyak. Tentu saja dengan memperhatikan memory atau RAM yang dimiliki oleh Laptop atau Komputer.
    Dalam pengalaman kami untuk mengerjakan Microsoft Excel 2007 keatas dibutuhkan minimal RAM sebesar 1 Gigabyte supaya aplikasi berlangsung mulus. Karena semakin besar jumlah data maka semakin besar keperluan memorinya.
    Terima kasih sudah berkunjung ke blog tekno-g ini, Jika sobat menemukan hal yang salah dalam artikel ini silahkan komentar yang membangun untuk perbaikan, kami akan berusaha mencari solusi secepatnya mungkin. Apabila merasa berfaedah yang besar silahkan like and share. Terima kasih

    Cara Mudah Membuat Angka Terbilang Otomatis Dengan Excel Menggunakan Macro

    Sebenarnya sudah banyak yang sharing cara membuat angka terbilang otomatis di Microsoft Excel. Sebagian besar web yang membagikan membuat angka terbilang tersebut memakai tata cara memakai Add Ins, sehingga sangat memudahkan pengguna Excel untuk membuat angka terbilang. Namun kali ini kami akan membuatkan bagaimana cara menciptakan angka terbilang dengan Excel memakai Macro atau VBA.

    Bagi yang belum kenal dengan Macro atau VBA silahkan buka link berikut : Mengenal Macro (VBA) di Microsoft Excel.
    Apa yang dimaksud dengan angka terbilang ? coba amati gambar dibawah ini :

    Pada gambar diatas tampakangka yang kita tulis pada Cell A2 akan diterjemahkan menjadi terbilang Pada Cell B2. Angka 1.100.201 akan menjadi terbilangnya “Satu Juta Satu Ratus Ribu Dua Ratus Satu Rupiah”. Jika ini dilaksanakan secara manual maka akan menyantap waktu dan yang paling fatal bisa saja terjadi kesalahan. Angka terbilang umumnya banyak dipakai untuk Invoice, Kwitansi, dan atau tanda terima pembelian barang maupun jasa.
    Untuk membuat lebih mudah hal tersebut diatas maka mari kita buat dengan Excel lalu gunakan Macro untuk membuat angka terbilang secara otomatis, jadi tidak perlu lagi khawatir akan terjadi kesalahan dalam pengetikan angka terbilang tersebut.

    A. Aktifkan Microsoft Excel

    – Pada Cell A2, masukan angka 10000
    – Pada Cell B2, masukan rumus atau formula =terbilang(A2)

    Setelah data tersebut dimasukkan maka akan timbul Error pada formula excel, seperti dibawah ini.
    Masih Error

    Error tersebut menunjukkan bahwa FORMULA terbilang() belum kita buat. Untuk itu mari lanjut kita buat dulu formulara terbilang() menggunakan Macro agar angka terbilang di cell B2 mampu langsung otomatis tertera “Sepuluh Ribu Rupiah”.

    B. Aktifkan Layar Macro atau VBA

    – Tekan Alt + F11, sehingga timbul layar mirip berikut :

    – Tambahkan 1 module

    – Copas isyarat VBA berikut :
    (Credit Kode Berikut Buat Pak Masino Sinaga : https://ilovephpmaker.wordpress.com)
     Option Explicit 'Credit For Mr Masino Sinaga 'Modified By Tekno-G.Blogspot.Com Public Function terbilang(ByVal N As Long) As String     Const Ribu = 1000&     Const Juta = Ribu * Ribu     Const Milliar = Ribu * Juta     'Const Trillion = Thousand * Billion      Dim Buf As String: Buf = ""      If (N = 0) Then terbilang = "Nol": Exit Function      If (N = Milliar) Then         Buf = Buf & EnglishDigitGroup(N \ Milliar) & " Milliar"         N = N Mod Milliar         If (N) Then Buf = Buf & " "     End If      If (N >= Juta) Then         Buf = Buf & EnglishDigitGroup(N \ Juta) & " Juta"         N = N Mod Juta         If (N) Then Buf = Buf & " "     End If      If (N >= Ribu) Then                  If N \ Ribu = 1 Then            Buf = Buf & "Seribu"         Else            Buf = Buf & EnglishDigitGroup(N \ Ribu) & " Ribu"         End If                  N = N Mod Ribu                  If (N) Then Buf = Buf & " "              End If      If (N > 0) Then         Buf = Buf & EnglishDigitGroup(N)     End If      terbilang = Buf + " Rupiah" '    a = terbilang End Function  ' Support function to be used only by terbilang() Function EnglishDigitGroup(ByVal N As Integer) As String     Const Ratus = " Ratus"     Const satu = "Satu"     Const dua = "Dua"     Const tiga = "Tiga"     Const Empat = "Empat"     Const Lima = "Lima"     Const Enam = "Enam"     Const Tujuh = "Tujuh"     Const delapan = "Delapan"     Const sembilan = "Sembilan"     Dim Buf As String: Buf = ""     Dim Flag As Integer: Flag = False      'Do Ratuss     Select Case (N \ 100)     Case 0: Buf = "":  Flag = False     Case 1: Buf = "Seratus": Flag = True     Case 2: Buf = dua & Ratus: Flag = True     Case 3: Buf = tiga & Ratus: Flag = True     Case 4: Buf = Empat & Ratus: Flag = True     Case 5: Buf = Lima & Ratus: Flag = True     Case 6: Buf = Enam & Ratus: Flag = True     Case 7: Buf = Tujuh & Ratus: Flag = True     Case 8: Buf = delapan & Ratus: Flag = True     Case 9: Buf = sembilan & Ratus: Flag = True     End Select      If (Flag) Then N = N Mod 100     If (N) Then         If (Flag) Then Buf = Buf & " "     Else         EnglishDigitGroup = Buf         Exit Function     End If      'Do sepuluhs (except teens)     Select Case (N \ 10)     Case 0, 1: Flag = False     Case 2: Buf = Buf & "Dua Puluh": Flag = True     Case 3: Buf = Buf & "Tiga Puluh": Flag = True     Case 4: Buf = Buf & "Empat Puluh": Flag = True     Case 5: Buf = Buf & "Lima Puluh": Flag = True     Case 6: Buf = Buf & "Enam Puluh": Flag = True     Case 7: Buf = Buf & "Tujuh Puluh": Flag = True     Case 8: Buf = Buf & "Delapan Puluh": Flag = True     Case 9: Buf = Buf & "Sembilan Puluh": Flag = True     End Select      If (Flag) Then N = N Mod 10     If (N) Then         If (Flag) Then Buf = Buf & " "     Else         EnglishDigitGroup = Buf         Exit Function     End If       Select Case (N)     Case 0: 'ndak ado     Case 1: Buf = Buf & satu     Case 2: Buf = Buf & dua     Case 3: Buf = Buf & tiga     Case 4: Buf = Buf & Empat     Case 5: Buf = Buf & Lima     Case 6: Buf = Buf & Enam     Case 7: Buf = Buf & Tujuh     Case 8: Buf = Buf & delapan     Case 9: Buf = Buf & sembilan     Case 10: Buf = Buf & "Sepuluh"     Case 11: Buf = Buf & "Sebelas"     Case 12: Buf = Buf & "Dua belas"     Case 13: Buf = Buf & "Tiga belas"     Case 14: Buf = Buf & "Empat belas"     Case 15: Buf = Buf & "Lima Belas"     Case 16: Buf = Buf & "Enam Belas"     Case 17: Buf = Buf & "Tujuh Belas"     Case 18: Buf = Buf & "Delapan Belas"     Case 19: Buf = Buf & "Sembilan Belas"     End Select      EnglishDigitGroup = Buf End Function

    – Sehingga risikonya mirip ini

    – Sekarang Cek Lagi di Excel Book1, ternyata masih Error

    C. Merubah Macro Settings, Agar Formula Terbilang Bisa dikerjakan..

    Agar macro bisa berlangsung dengan baik, maka perlu dilaksanakan perubahan macro setting di Excel adalah dengan cara :
    – Klik Menu File, Options

    – Lalu Klik Trust Center, Macro Settings, Pilih Enable All Macro

    Ubah Macro Settings

    D. Hasil Akhir Angka Terbilang Otomatis Dengan Excel

    Berikut hasil karenanya, sobat tekno-g mampu memakai file tersebut untuk membuat banyak sekali macam kebutuhan yang memakai angka terbilang antara lain : kwintansi, invoice, faktur penjualan, struk penjualan dan lain-lain.

    Hasil Akhir Angka Terbilang Otomatis Dengan Excel

    Silahkan cermati, cuma dengan formula terbilang() kita tidak butuhlagi repot mengetik angka terbilang, semoga postingan ini dapat menawarkan faedah untuk kita bareng , silahkan share postingan ini dan kalau mengcopy untuk di muat di web lain jangan lupa menyertakan link aslinya yaitu :
    Nah bagi yang tak inginrepot untuk membuka-buka macro, kami akan sediakan file Add ins siap pakai, dan bisa digunakan dengan file lain secara bersama-sama dalam satu komputer atau bisa juga file yang telah ready code macronya.. tabah ya tunggu tanggal mainnya akan kami buat artikel dan upload file nya.

    Cara Membuat Surat Masal Tanpa Mail Merge Dengan Microsoft Excel

    Tekno-G. Kali ini kita akan sharing membuat surat masal tanpa mail merge dengan Excel. Sebenar dalam postingan ini masih menggunakan rancangan Mail Merge, namun database yang dipakai tidak terpisah. Mungkin sobat telah sering memakai kemudahan Mail Merge antara Microsoft selaku master dari suratnya dan Microsoft Excel sebagai Database dari data yang dipakai pada master surat tersebut.
    Secara besar pemahaman Mail Merge yaitu Proses Entri Otomatis Nama dan Alamat serta variabel lain pada Master Surat atau Amplop atau Label, untuk mengantarsurat atau penawaran khusus kepada banyak alamat sekaligus. Dengan demikian pengerjaan surat masal akan sangat menolong bab admin atau manajemen dalam membuat surat yang ditujukan pada banyak alamat sekaligus.
    Bayangkan kalau kita mempunyai 100 (seratus) atau bahkan hingga ribuan Nama dan alamat yang akan diproses pengiriman datanya, maka kalau tidak menggunakan fasilitas surat masal atau mail merge, maka proses itu akan sungguh sulit dan makan waktu, sebab pasti aku kita akan membuat banyak file atau melakukan proses copy paste yang lumayan banyak.
    Oke, agar tidak panjang-panjang penjelasannya mari kita mulai cara menciptakan surat masal tanpa mail merge di Excel. 
    1. Buat Master Surat di Sheet1, kemudian untuk membuat lebih mudah Ubah Name Sheet1 menjadi MASTERSURAT
    2. Siapkan Data Nama pada Sheet2, lalu untuk membuat lebih mudah ubah Name Sheet2 menjadi DATA
    3. Blok Tabel Nama Undangan yang ada di Sheet DATA dan berikan nama untuk Tabel tersebut menjadi DATAUNDANGAN di Name Box dan Tekan Enter
    4. Kembali ke Sheet MASTERSURAT, masukan FORMULA :
    =VLOOKUP(N2,DATAUNDANGAN,2,FALSE)
    di Cell C6
    5. Ubahlah Data nomor urut seruan di Cell N2, dan perhatikan Nama Undangan di Cell C6 maka otomatis akan berganti-ubah sesuai dengan data yang kita masukkan.
    Untuk mempermudah sahabat, File Contoh Cara Membuat Surat Masal Tanpa Mail Merge Dengan Microsoft Excel.xls sudah mampu di download disini (Klik Untuk Download)
    Untuk Mudahnya sahabat mampu menyaksikan video berikut ini :
    Beberapa catatan dalam Membuat Surat Masal Tanpa Mail Merge Dengan Excel :
    • Keuntungan Membuat Surat Masal Tanpa Mail Merge Dengan Excel
    1. File Master Surat dan Data Nama atau Alamat berada dalam 1 Lokasi File Excel sehingga proses terhubungnya lebih cepat
    2. Praktis di Modifikasi untuk kebutuhan lain, contohnya untuk membuat Kwitansi (Akan Tekno-G buat pada artikel terpisah)
    3. Konsumsi space media penyimpanan lebih kecil dan source memory juga jadi lebih minimal
    4. Tidak perlu setting ulang jikalau di copy ke lokasi lain, jikalau memakai mail merge Microsoft Word dan Excel diperlukan setting ulang saat file berganti kawasan penyimpanan.
    • Kelemahan Membuat Surat Masal Tanpa Mail Merge Dengan Excel
    1. Kurang Flexible dalam menciptakan format surat, perataan text, tabulasi, border dan lain-lain
    2. Proses pencetakan masih manual dengan mengganti nomor urut usul satu per satu balasannya cukup menyibukkan, namun hal ini mampu tertuntaskan sehingga menjadi otomatis (Akan Tekno-G buat pada postingan terpisah)

    Demikian sharing kali ini perihal cara Membuat Surat Masal Tanpa Mail Merge Dengan Microsoft Excel semoga dapat menginspirasi sobat untuk menciptakan Dokumen yang lain dengan menggunakan meteode diatas. Jika bermanfaat silahkan sharing ke sahabat kita lainnya.

    Mengenal Macro (Vba) Di Microsoft Excel

    1.1.   Macro dan Formula a. Macro
    Sahabat tekno-g.blogspot.co.id ingin tahu apa itu macro? Tentu ini pertanyaan yang hendak timbul ketika anda membaca buku judul ini, bahkan mungkin anda telah mampu membandingkan dengan buku yang lain bahwa macro tersebut bisa di exploitasi menjadi virus komputer, lho kok mampu?!. Coba lihat defenisi di paragraf berikut.
    Sebuah acara yang ditulis atau direkam yang menyimpan serangkaian perintah-perintah excel lalu nanti mampu digunakan dengan hanya memakai satu perintah saja. Macro mampu secara otomatis melakukan perintah yang kompleks dan mampu meminimalkan tindakan yang digunakan dalam melaksanakan perintah tersebut. Macro di rekam kedalam VBA (Visual Basic for Application) atau anda mampu sendiri menjadikannya pada VBA Editor.

    Misalnya untuk mem format suatu sel menjadi abjad tebal dan miring sekaligus di garis bawahi. Paling tidak anda akan melakukan tiga langkah pemfokusan keyboard namun dengan macro anda mampu menciptakan semua itu hanya dengan menekan satu tombol kombinasi shortcut atau mengklik pada icon yang sudah di hubungkan dengan macro.

    Sekarang jelas bahwa Macro selain mampu dipakai untuk mempermudah pekerjaan namun juga bisa di exploitasi untuk dijadikan virus komputer. Karena macro memakai bahasa basic maka secara tidak pribadi anda juga dapat mengasah kesanggupan pemograman anda yang umum bergelut dengan bahasa basic.

    b. Formula

    Formula di dalam Excel yakni serangkaian perintah yang terdiri dari angka, operator matematika, sekumpulan data dan fungsi atau variasi dari kesemuanya itu yang hendak menciptakan nilai tertentu sesuai dengan hasil yang dinginkan.

    Formula di dalam Excel di awali dengan tanda = (sama dengan)  dan dibarengi dan fungsi tertentu yang sudah ditawarkan oleh excel atau variasi formula menurut harapan pengguna.

    1.2.   Menjadi Kreatif dengan Excel

    Begitu banyak fungsi yang disediakan oleh Excel dan tidak semua yang bisa diketahui oleh pengguna excel, untuk itu diharapkan kreatifitas yang tinggi dalam mengolah suatu formula kalau kita menemukan masalah yang harus dipecahkan dengan formula yang rumit maka kita mampu menggunakan kombinasi fungsi-fungsi sederhana sehingga menghasilkan suatu formula yang elok. Selain formula kita juga harus inovatif dalam menggunakan fitur-fitur lain excel, misalnya dengan akomodasi scalling, kita mampu memprint out suatu bagan yang dibentuk dengan fasilitas drawing  pada aneka macam media kertas yang kita inginkan.

    Penggabungan macro dan formula dan menginteraksikan dengan cell-cell yang ada dalam worksheet juga merupakan cara yang sungguh manis untuk menghasilkan suatu aplikasi yang tangguh.

    1.3.   Aktifasi dan spesifikasi metode untuk penggunaan VBA

    a. Mengaktifkan VBA

    • Klik Tools, Macro, Visual Basic Editor, atau
    • Tekan tombol (Alt+F11)

    b. Spesifikasi Sistem

    Untuk mengoperasikan VBA tidak diperlukan spesifikasi komputer yang terlalu mutakhir, tetapi jikalau anda memerlukan hasil yang optimal pastinya semakin tinggi spesifikasi komputer yang anda miliki akan memberi hasil yang semakin baik, komputer ber processor sekelas Pentium I pun sudah mencukupi, syarat mutlak yang diperlukan untuk mendapatkan hasil yang terbaik dari tip dan trik yang akan kita laksanakan dalam buku ini adalah :

    • Komputer ber processor sekelas Pentium I atau lebih tinggi
    • Microsoft Office, Word dan Excel model 97 atau lebih tinggi (2000, 2003-XP)
    • Memori komputer yang memadai

    Sebagai suplemen pengetahuan anda dapat mengakses file help VBA, secara default help VBA tidak diaktifkan langsung ketika menginstall aplikasi Microsoft Office, anda dapat menambahkannya saat help VBA meminta anda untuk menginstallkan kembali file tersebut.

    Konsekuensi yang mesti anda terima, kalau komputer yang anda gunakan mempunyai spesifikasi yang pas-pasan yaitu bertambah banyak macro yang anda buat maka akan kian lambat aplikasi yang mengandung macro tersebut prosesnya. Juga ada beberapa macro yang kita buat hanya akan mulus jalannya bila menggunakan Office 2000 atau lebih.

    1.4.   Berkenalan dengan VBA (Visual Basic For Application)

    Untuk lebih gampang melaksanakan tip dan trik berikutnya, ada baiknya kita mengetahui sekilas tentang VBA Window.

    VBA Window ialah tampilan bidang kerja yang dipakai untuk menciptakan program-program macro secara manual, disini kita akan mengakses berbagai bagian dari VBA mulai dari Menu, Toolbar, Project Window, Code Window, Properties Window, UserForm, Module, dan lain-lain.

    Gambar 1.1. Tampilan VBA (Visual Basic for Application) Window

    Beberapa bab yang paling penting untuk dimengerti :

    1. Project Window

    Pada jendela ini seluruh object yang berafiliasi dengan macro kita diakses, diantaranya Sheet, Document (di dalam Word), UserForm, Module. Untuk mengakses suatu object mampu dikerjakan dengan double klik pada object tersebut.

    Gambar 1.2. Project Window

    2. Menu dan Toolbar

    Bagian ini digunakan untuk mengakses perintah-perintah yang berafiliasi dengan object, khusus Toolbar ada tiga icon yang penting untuk mengerjakan macro yang anda buat, ialah ; icon run, break dan reset.

    Gambar 1.3. Menu dan Toolbar

    3. Code Window

    Jendela yang digunakan untuk menulis isyarat program macro, jendela ini akan muncul jikalau anda ingin mengaitkan kode pada object tertentu, seperti didalam modul, Userform, kontrol dan object lainnya. Dropdown list dibagian kanan merupakan object, disebelah kiri procedure.

    Gambar 1.4. Code Window

    4. Properties Windows

    Merupakan kawasan mengakses properti yang dimiliki oleh sebuah object, bagian ini akan berubah dengan sendirinya jikalau kita mengklik atau mengakses objek tertentu.

    Gambar 1.5. Properties Window

    5. UserForm

    Merupakan interface yang mampu dipakai untuk mengentri data, info dan lain-lain. Dibagian ini terdapat aneka macam macam kontrol yang disertakan dari Toolbox

    Gambar 1.6 UserForm

    6. Toolbox

    Toolbox digunakan untuk mengakses kendali yang mau digunakan dalam Userform, contohnya label, texbox, image dan lain-lain.

    Gambar 1.7. Toolbox

    1.5. Melindungi dari Macro Jahat (Virus Macro)

    Seperti yang sudah disinggung sebelumnya macro mampu dimanfaatkan untuk menciptakan virus komputer, untuk melindungi diri dari macro jenis ini microsoft office memberi keleluasaan terhadap pengguna office untuk memilih tingkat keamanan dari aplikasi office yang digunakan, bila suatu file office (excel, word dan lain-lain) mengandung macro didalamnya maka saat file tersebut diaktifkan maka aplikasi akan menimbulkan suatu kotak obrolan yang menanyakan apakah  macro dilaksanakan (dengan segala resiko yang hendak ditanggung), sebaliknya bila anda khawatir maka anda mampu menghalangi macro tersebut untuk tidak jalan pada saat file diaktifkan. Bagaimana caranya ikuti langkah berikut :

    Untuk Excel 97, aktifkan Excel Klik Tools, Option, pilih tab General, amati Kotak  (CheckBox) Macro virus protection, jika tanda cek diaktifkan maka perlindungan akan diaktifkan, demikian sebaliknya.

    ·      
    Untuk Excel 2000, aktifkan Excel Klik, Macros, Security, Pilih Option High Level untuk memproteksi, pilih low level untuk menetralisir proteksi

    Gambar 1.8. Perlindungan Virus Macro Excel 2000

    Sebagai catatan, sekali virus macro anda beri fleksibilitas untuk aktif tanpa melaksanakan tindakan diatas, maka anda telah memberi akses untuk virus itu mendekam bahkan menyebar ke komputer lain.

    Untuk menjajal file-file latihan yang disertakan bareng buku ini biar tidak mengusik maka sebaiknya anda menonaktifkan dukungan macro.

    2.1.   Merekam Macro

    Kasus :

    Memformat Cell, Teks ditebalkan (Bold), dimiringkan (Italic) sekaligus digarisbawahi (Underline).

    Pemecahan :

    –          Aktifkan Excel, kemudian simpan file dengan nama Latihan01.xls

    –          Klik Tools, Macro, Record New Macro, akan timbul kotak obrolan Record Macro.

     

    Gambar 2.1 Dialog Record Macro

    –          Masukan nama macro di Macro Name (contohnya FormatSel), Shortcut Key (misalnya Ctrl+k), OK

    Toolbar Record macro akan timbul


    Gambar 2.2 Toolbar Record Macro

    –          Sorot sembarang Sel, Klik Icon Bold, Klik Icon Italic, Klik Icon Underline

    –          Klik Icon Stop pada Toolbar Record Macro

    Penerapan :

    –          Sekarang setiap kali anda ingin memformat sel dengan Bold, Italic dan Underline. Anda tinggal menyorot sel dan tekan Shortcut Ctrl+k.

    2.2. Mengaitkan Macro dengan Menu, Toolbar dan Object

    Kasus :

    Bagaimana mengaitkan macro dengan dengan Menu, Toolbar dan Object.

    Pemecahan :

    Asumsi anda telah mempunyai macro FormatSel

    Mengaitkan Macro dengan Menu

    Sebelum mengaitkan macro dengan Menu anda harus apalagi dulu menciptakan menu sendiri yang anda harapkan ikuti tindakan berikut:

    –  Membuat sajian gres

    Ø  Tools, Customize, Klik Tab Command, Pilih New Menu pada Categories, Klik tahan dan seret New Menu dari dalam Command ke barisan Menu kafetaria.


    Gambar 2.3  Menu buatan sendiri

    Ø  Setelah New Menu terbentuk, Klik kanan New Menu tersebut untuk membuat Caption Pribadi, dalam kotak Name, ketik Latihan Macro untuk Menu Utama.

    Gambar 2.4 Mengganti Caption Menu

    – Mengaitkan Macro dengan Menu

    Setelah hidangan utama dibuat lalu macro yang mau kita kaitkan pada menu tersebut akan menjadi Sub hidangan dibawah Menu Latihan Macro, ikuti langkah berikut.

    Ø  Dalam keadaan Kotak Dialog Customize masih terbuka, klik Macros di dalam Categories, di bagian Command di sebelah kanan klik tahan Custom Menu dan seret ke sajian Latihan Macro lalu letakan dibawah menu tersebut, ubah namanya dengan mengganti Caption &Format Sel.

    Gambar 2.5 Menambahkan Sub Menu Format Sel

    Ø  Klik kanan lalu pilih Assign Macro, Pilih Macro FormatSel, OK

    Gambar 2.6 Mengaitkan Macro dengan Menu

    Ø  Tutup Customize, Klik Close.

    Mengaitkan Macro dengan Toolbar (Icon)

    – Membuat Icon gres

    Ø  Tools, Customize, Klik Tab Command, Macros  pada Categories, Klik tahan dan seret Custom Button dari dalam Command ke barisan Toolbar.

    Ø  Setelah Custom Button terbentuk, Klik kanan Custom Button tersebut, Pastikan Default Style dalam keadaan terpilih biar yang ditampilkan hanya icon saja.

    Ø  Sebagai embel-embel untuk mengganti bentuk icon anda dapat mengklik Edit Button Image, disini nanti akan mampu di atur bentuk icon yang anda suka.


    Gambar 2.7 Membuat Icon sendiri pada Toolbar

    –          Mengaitkan Macro dengan Toolbar (icon)

    Ø  Dalam keadaan Dialog Customize masih aktif, klik kanan Icon gres tersebut, Klik Assign Macro, Pilih Macro FormatSel, OK

    Ø  Tutup Customize, Klik Close.

    Mengaitkan Macro Dengan Object

    Object yang dimaksud disini yaitu shape yang bisa dibentuk lewat Toolbar Drawing.

    – Masukan suatu object, misalnya oval

    – Klik kanan Oval tersebut, Klik Assign Macro, Pilih Macro FormatSel, OK

    – Sekarang setiap kali anda mengklik object tersebut maka makro yang telah anda rekam akan di lakukan

    Gambar 2.8 Mengaitkan Macro dengan Object

    2.3.   Membuat Msgbox

    Msgbox ialah sebentuk pesan yang muncul dalam kondisi tertentu misalnya jika ada error atau cuma sekedar informasi.

    Kasus :

    · Bagaimana memunculkan pesan ketika sebuah file Excel di buka

    · Memunculkan Pesan pada tanggal tertentu.

    Pemecahan :

    · Membuat Pesan dikala Excel di buka

    – Aktifkan Excel, aktifkan VBA

    – Didalam VBA, Double Klik ThisWorkbook (didalam Project Explorer)

    Gambar 2.9 Object This Workbook

    – Dalam Code Window pada Dropdown Object pilih Workbook, pada Procedure pilih Open


    Gambar 2.10 Object Workbook dan Procedure Open

    –  Ketik  baris program berikut ini :

    Private Sub Workbook_Open()

          MsgBox “Selamat Menggunakan Excel”,_

          vbInformation, “Pesanku”

    End Sub

    –  Tutup VBA, simpan file Excel dengan nama Latihan02.xls

    –  Sekarang Coba Buka file Latihan02.xls, maka akan muncul pesan :

    Gambar 2.11 Msgbox saat file dibuka

    Memunculkan Pesan pada tanggal tertentu

    – Ikuti langkah-langkah untuk menimbulkan pesan ketika sebuah file excel di buka.

    – Dalam Dropdown Object pilih Workbook, pada Procedure pilih Open

    – Ketik  baris program berikut ini :

    Private Sub Workbook_Open()

          Dim TANGGAL, BULAN As String

          TANGGAL = Format(Now(), “dd”)

          BULAN = Format(Now(), “mmmm”)

          If TANGGAL = 1 Then

    MsgBox “Sekarang udah tanggal ” & TANGGAL & ” Bulan ” & BULAN & “, waktunya kita gajian”, vbInformation, “Info Terkini”

          End If

    End Sub

    –  Simpan File dengan nama Latihan03.xls, lalu coba buka lagi, amati balasannya.

    Gambar 2.12 Pesan tanggal tertentu

    Penerapan :

    • Trik di atas dapat dipakai bila anda memiliki file yang formatnya sama dan anda akan mengcopy file tersebut setiap bulannya atau anda ingin kejutan dengan memberikan pesan selamat ulang tahun kepada seseorang.
    • Mengcopy file yang sama setiap bulan dengan nama yang berlawanan pada  tanggal tertentu, contohnya setiap tanggal 1 bulan selanjutnya secara otomatis akan timbul pesan yang meminta anda untuk mengcopy file tersebut  (save as) dengan nama bulan berikutnya.

    Caranya, ikuti langkah dikala Excel di buka, kemudian ketik program berikut :

    Private Sub Workbook_Open()

       On Error Resume Next

       Dim TANGGAL, NAMAFILE, BULAN As String

       TANGGAL = Format(Now(), “dd”)

       BULAN = Format(Now(), “mmmm”)

    NAMAFILE = “Laporan Bulan ” & Format(Now(), “MMMM YYYY”)‘Ketik satu baris

    If TANGGAL = 1 Then

    JAWABAN = MsgBox (“Sekarang udah tanggal ” & TANGGAL & ” Bulan ” & BULAN & ” apakah anda ingin mengcopy file ini ?”, vbYesNo, “konfirmasi”)‘Ketik satu baris

    If JAWABAN = vbYes Then

    ChDir “C:\My Documents”     

    ActiveWorkbook.SaveAs FileName:=NAMAFILE, FileFormat:=xlNormal ‘Ketik satu baris

             End If

    Else

    Exit Sub

    End If

    End Sub

    Simpan File dengan nama Latihan04.xls, lalu coba buka lagi, maka setiap tanggal 1 bulan berikutnya akan timbul pesan, untuk menjajal acara ini anda mampu mengganti tanggal menjadi tanggal hari ini, kemudian klik run pada toolbar.

    Gambar 2.13 Mengcopy File yang Sama Setiap Bulan

    Jika Yes di Klik maka file akan di Save As menjadi Laporan Bulan September 2004.xls (bila bulan ini bulan September 2004).

    – Membuat Pesan Ulang Tahun

    Ketik Listing Program Berikut di dalam Object Workbook dengan Procedure Open

    Private Sub Workbook_Open()

         Dim TANGGAL, NAMA, BULAN As String

         TANGGAL = Format(Now(), “dd”)

         BULAN = Format(Now(), “mm”)

         If TANGGAL = 03 And BULAN = 12 Then

    MsgBox “Selamat Ulang Tahun Buat Najwa”, vbInformation, “Happy Birthday”

         End If

    End Sub

    Tutup VBA, lalu simpan file dengan nama Latihan05.xls. Sekarang coba buka lagi file tersebut kalau hari ini Tanggal 03 Desember maka akan muncul pesan sebagai berikut :

    Gambar 2.14 Msgbox Ucapan ulang tahun

    Untuk menjajal program ini anda bisa mengganti TANGGAL dan BULAN sesuai dengan hari ini, lalu Klik Icon RUN di dalam VBA, atau Tutup File dan coba Buka Kembali.

    2.4. Form VBA

    Form VBA merupakan sebuah penampilan yang mampu kita pakai untuk menginput data kedalam lembaran kerja Excel, meskipun bahwasanya Excel sudah memiliki performa yang fleksibel terkadang juga perlu menggunakan Form yang dapat kita rancang sendiri.

    Kasus :

    Bagaimana menciptakan suatu Form dan mengaitkannya dengan Macro.

    Pemecahan :

    Membuat UserForm VBA

    Aktifkan VBA, dalam jendela VBA Klik Insert, Userform (Klik Icon Userform), maka dalam jendela project akan ditambah suatu Userform1, dibagian kanan akan ditampilkan beberapa UserForm1 tersebut dan siap diolah sesuai dengan dengan kebutuhan kita, untuk properti mirip penggantian judul (caption) dan pengaturan lainnya dapat dilakukan lewat jendela properties di bab kiri bawah jendela VBA. (lihat kembali BAB I bagian 1.5 Berkenalan dengan VBA)

    Gambar 2.15 UserForm

    Mengaitkan UserForm dengan Macro

    Untuk melaksanakan form tanpa harus membuka VBA lagi maka kita harus mengaitkan Form dengan Macro, baik itu dengan menggunakan Shortcut (pemfokusan kombinasi tombol pada keyboard) atau dengan toolbar dan Object.

    Langkah-langkah mengaitkan Form dengan Macro.

    –          Simpan File dengan nama Latihan06.xls kemudian Klik Userform1, pada bagian properties Name ganti menjadi FrmAwal (tergantung keinginan anda), anda juga mampu menyertakan Control lain ke dalam form contohnya Label, Image dan lain-lain. Demikian juga dengan Properti Caption mampu anda ganti misalnya Form Pertama.

    –          Tambahkan sebuah modul kedalam Project Window, Klik Menu Insert, Module, lalu di dalam project akan timbul suatu Module, double klik modul tersebut dibagian kanan akan muncul code window editor kemudian ketik :

    Sub BukaFrm()

      FrmAwal.Show

    End Sub

    Gambar 2.16 Menambahkan Module

    Simpan kembali file, tutup tampilan VBA, sekarang anda berada pada jendela Excel, Buatlah suatu Icon baru di toolbar (lihat kembali trik 2.2), lalu klik kanan Toolbar, Klik Customize, setelah jendela Customize timbul klik kanan Icon yang baru anda tambahkan tadi.

    Ø  Klik Assign Macro, Pilih Macro BukaFrm, OK

    Ø  Tutup Customize, Klik Close.

    – Sekarang coba klik icon tersebut maka akan timbul sebuah form mirip gambar berikut.

    Gambar 2.17 UserForm Form Pertama

    – Untuk Mengaitkan dengan dengan shortcut Klik Tools, Macro, Macros, kemudian Pilih FrmAwal kemudian Klik Options, dan tekan tombol shortcut yang anda harapkan contohnya Ctrl+f, lalu klik ok.

    – Sekarang setiap kali anda menekan ctrl + f maka akan muncul form diatas.

    Gambar 2.18 Mengaitkan UserForm dengan Macro

    Penerapan :

    Untuk pola penerapan penggunaan form mampu dilihat pada trik 2.6 dan 2.14.

    2.5. Form yang tidak bisa di – close

    Pada form terdapat suatu close button yang berfungsi untuk menutup form tersebut. Adakalanya kita tak ingin form tersebut ditutup dengan memakai close button tetapi dengan memakai tombol kita sendiri.

    Kasus :

    Bagaimana menciptakan tombol exit langsung dan menonaktifkan tombol close pada form.

    Pemecahan :

    Buka kembali file Latihan06.xls dan aktifkan VBA, tambahkan Control Command Button, ganti Properti Name dengan CmdExit dan Properti Caption dengan EXIT.

    – Doubel Klik FrmAwal, kemudian Pilih Procedure QueryClose dan ketik;

    Private Sub UserForm_QueryClose(Cancel As Integer, _ CloseMode As Integer)

         If CloseMode = vbFormControlMenu Then

            MsgBox “MAAF NGGAK BISA DITUTUP.”

            Cancel = True

         End If

    End Sub

    – Kembali ke Project, pilih (double klik) FrmAwal, lalu Double Klik CmdExit dan Ketik ;

    Private Sub CMDEXIT_Click()

         Unload Me

    End Sub

    – Sekarang tutup VBA lalu coba Klik Kembali Icon atau tekan Shortcut yang telah anda buat tadi, setelah muncul Form Pertama coba anda Klik close button maka akan muncul pesan dan form tidak bisa ditutup kecuali anda menekan EXIT.

    Gambar 2.19 Menonaktifkan Tombol Close UserForm

    Penerapan :

    Penggunaan code diatas mampu dikerjakan jikalau anda mengharapkan user hanya mampu  meng close form sesuai dengan tombol atau ketentuan  yang anda inginkan atau anda ingin menciptakan form dengan password.

    2.6.   Membuat Splash Screen Pribadi

    Selain memunculkan pesan (msgbox) diawal sebuah file Excel di buka anda juga dapat mempergunakan Form VBA untuk menimbulkan pesan pribadi, penampilan akan lebih atraktif alasannya adalah muncul dalam bentuk splash screen (penampilan yang muncul cuma beberapa detik lalu akan hilang kebanyakan mengumumkan nama sebuah program dan register acara tersebut kemudian nama para programmernya)

    Kasus :

    Bagaimana menciptakan splash Screen pada sebuah file Excel.

    Pemecahan :

    – Buka kembali file Latihan5.xls lalu aktifkan VBA.

    – Kita telah memiliki sebuah Userform, yaitu FrmAwal (bila memakai file yang lain tambahkan saja Userform dan tambahkan kontrol label serta image pribadi anda), agar tampaklebih elok untuk propeties Caption pada FrmAwal seharusnya anda kosongkan.

    – Double Klik Object ThisWorkbook dalam Project Explorer (pada bagian kiri jendela VBA dengan icon aksara x dilatari kertas) ketik instruksi berikut :

    Private Sub Workbook_Open()

         FrmAwal.Show

    End Sub

    –          Double Klik FrmAwal dan pilih procedure Activate, ketik arahan berikut :

    Private Sub FrmAwal_Activate()

    Application.OnTime Now + TimeValue(“00:00:05”), _ “TutupFrmAwal” ‘ketik satu baris

    End Sub

    – Double Klik Module1 (jika belum ada, Klik Insert, Module), lalu ketik instruksi berikut :

    Private Sub TutupFrmAwal()

         Unload FrmAwal

    End Sub

    – Simpan file, save as, Latihan07.xls,  tutup file, kemudian coba laksanakan lagi, akhirnya akan muncul FrmAwal ketika file pertama dibuka, lalu sehabis lima detik FrmAwal akan hilang dengan sendirinya. Anda dapat mengubah usang aktifnya FrmAwal dengan menyesuaikan TimeValue.

    Gambar 2.20 Splash Screen Pribadi

    Penerapan :

    – Splash Screen Pribadi ini mampu berkhasiat selaku inisial file pribadi yang anda miliki, bila anda sering berkirim file terhadap orang lain,  maka trik ini dapat menjadi identitas tersendiri kepada file tersebut.