twitter

Translate


بسم الله الرحمن الرحيم 

nah inii niii saya kasih tau yang pakai Download file addins excel.. 
yukk,,disimak duluu...  ^_^

CARA MUDAH MEMBUAT FUNGSI TERBILANG PADA EXCEL 2007






Untuk membuat tulisan terbilang dari suatu angka secara otomatis (tanpa mengetik manual) dalam excel ini caranya yang paling simple :
1. Download file addins excel untuk terbilang disini..
2. Simpan/save file tersebut di computer (misal di c:\My Documents)
3. Buka aplikasi Excel 2007 anda,
4. Masuklah ke office button (pojok kiri atas) – lalu klik tombol “Excel options”


5. Pilih tabs “Add-Ins”, lalu klik tombol “Go…” yang berada pada bagian
bawah panel form.


6. Setelah muncul kotak berikut tekan pada tombol “Browse”.



7. Pilih direktori tempat anda menyimpan file unduhan tadi (misal di c:/My Documents)


8. Klik tombol “Ok” lalu akan muncul kotak berikut:



9. Klik Ok lagi untuk menyeselaikan proses pemasangan Add-Ins
Sekarang kita check apakah fungsi tersebut berfungsi. Untuk memakainya anda perlu mengetahui formulanya. Missal angka yang hendak anda buatkan terbilangnya ada di cell “A1”, maka formulanya adalah sebagai berikut:
=terbilang(A1,4,”Rupiah.”)

Penjelasan formula tersebut adalah sbb.:
1. A1 adalah cell tempat angka yang akan dikonversi ke nilai terbilang.
2. 4 adalah style case, anda dapat memilih 0,1,2,3,4 untuk menampilkan style penulisan yang berbeda.
3. “Rupiah.” Adalah text keterangan mata uang, dapat diganti dengan mata uang lain yang anda perlukan dengan cara manual.
Anda juga dapat mencoba cara lain dengan mengetikkan “=terbilang()” tanpa spasi, di cell edit bar seperti berikut, lalu tekan tombol “fx”

Maka akan muncul kotak dialog seperti berikut:


Coba masukkan nilai-nilai yang sesuai pada fungsi tersebut dan lihat hasilnya..

Trik ini tidak hanya berlaku untuk Excel 2007 melainkan untuk versi lain juga dengan prinsip yang sama. Yaitu anda harus mencari menu untuk menginstall Add-Ins baru. 
Selamat mencobaaa.. ^_^ barakallah..

.


بسم الله الرحمن الرحيم 

Membuat Fungsi Terbilang

hmm.. ini nantinya saya bedakan,, versi 1 dan 2...ada yang tau mengapa begitu?? hmm,,, sayaa yaa kurang tau pula.. :D
hmm. ni saya bedakan menjadi 2 versi hanya krna saat brosingdi mbah google ada 2 cara,,  ini ada yang pakai Visual Basic Editor dan ada yang pakai  Download file addins excel.. 
yukk,, simak yang versi 1 dulu,, inii yang pakai Visual Basic Editor .. ^_^
smaak berikut,, langkah-langkahnya.. 
  1. Buka Microsoft Excel.
  2. Tekan Alt + F11 untuk membuka VBA Editor, atau klik menu Tools -> Macro -> Visual Basic Editor.







3. Di Visual Basic Editor, klik menu Insert -> Module.

  4. Lalu copy-paste script ini ke bidang kerjanya:
  1. Public Function TERBILANG(x As Double) As String
    Dim tampung As Double
    Dim teks As String
    Dim bagian As String
    Dim i As Integer
    Dim tanda As Boolean
     
    Dim letak(5)
    letak(1) = "RIBU "
    letak(2) = "JUTA "
    letak(3) = "MILYAR "
    letak(4) = "TRILYUN "
     
    If (x < 0) Then
        TERBILANG = ""
    Exit Function
    End If
     
    If (x = 0) Then
        TERBILANG = "NOL"
    Exit Function
    End If
     
    If (x < 2000) Then
        tanda = True
    End If
    teks = ""
     
    If (x >= 1E+15) Then
        TERBILANG = "NILAI TERLALU BESAR"
    Exit Function
    End If
     
    For i = 4 To 1 Step -1
        tampung = Int(x / (10 ^ (3 * i)))
        If (tampung > 0) Then
            bagian = ratusan(tampung, tanda)
            teks = teks & bagian & letak(i)
        End If
        x = x - tampung * (10 ^ (3 * i))
    Next
     
    teks = teks & ratusan(x, False)
    TERBILANG = teks & " Rupiah"
    End Function
     
    Function ratusan(ByVal y As Double, ByVal flag As Boolean) As String
    Dim tmp As Double
    Dim bilang As String
    Dim bag As String
    Dim j As Integer
     
    Dim angka(9)
    angka(1) = "SE"
    angka(2) = "DUA "
    angka(3) = "TIGA "
    angka(4) = "EMPAT "
    angka(5) = "LIMA "
    angka(6) = "ENAM "
    angka(7) = "TUJUH "
    angka(8) = "DELAPAN "
    angka(9) = "SEMBILAN "
     
    Dim posisi(2)
    posisi(1) = "PULUH "
    posisi(2) = "RATUS "
     
    bilang = ""
    For j = 2 To 1 Step -1
        tmp = Int(y / (10 ^ j))
        If (tmp > 0) Then
            bag = angka(tmp)
            If (j = 1 And tmp = 1) Then
                y = y - tmp * 10 ^ j
                If (y >= 1) Then
                    posisi(j) = "BELAS "
                Else
                    angka(y) = "SE"
                End If
                bilang = bilang & angka(y) & posisi(j)
                ratusan = bilang
                Exit Function
            Else
                bilang = bilang & bag & posisi(j)
        End If
    End If
    y = y - tmp * 10 ^ j
    Next
     
    If (flag = False) Then
        angka(1) = "SATU "
    End If
    bilang = bilang & angka(y)
    ratusan = bilang
    End Function

















    5.  Setelah di paste, coba cek script ini dengan klik menu Debug -> Compile VBA Project, jika tidak keluar kotak peringatan apapun biasanya script anda sudah beres.
    6.  Tutup jendela Visual Basic Editor anda.
Nah sekarang tinggal coba aja:
  1. Ketik di cell sembarang sederet angka (misal di cell A1), lalu untuk memanggil fungsi terbilang ini (misal di cell A2), tinggal ketik=TERBILANG(A1).
    contoh
Cukup mudah bukan? Anda dapat mengunduh contoh artikel ini di sini.

Just in case, jika macro ini tidak bisa di jalankan di Excel anda (karena secara default Excel menset keamanan terhadap macro ke level tinggi), cek Security macro setting di Excel anda. Untuk melihat konfigurasi Security macro, klik Tools -> Macro-> Security dan pilih opsi Low lalu klik tombol OK. Saran saya pastikan anda sudah mempunya anti virus terinstal di komputer anda untuk menjaga agar virus macro tidak dapat menyerang komputer anda.


















Selamat mencobaa kawaan.. ;)  barakallah yaa..aamiin.. ^_^



بسم الله الرحمن الرحيم 

Cara Mengedit File Word Yang Terkunci

Bila Anda mendapatkan file Microsoft Word tidak bisa di edit karena terkunci atau terprotection dan hanya bisa dibaca saja maka Anda harus mengetahui password untuk mengeditnya.

Bagaimana jika password untuk mengedit file tersebut juga tidak ada? Nah bila Anda menemukan hal seperti ini, mungkin trik berikut dapat Anda coba.

Caranya:
1. Buka file doc tersebut

2. Lalu save as ke format Rich text formt (*.rtf)















3. Kemudian buka kembali file tersebut dengan opsi "open with" ke "wordpad" bawaan Windows










4. Nah sekarang filenya sudah dapat di edit kembali

5. Setelah itu Anda dapat save as lagi ke ekstensi doc.











Selamat mencoba yaa... ^_^
barakallah..

sumber : http://blogamka.blogspot.com/2012/01/cara-mengedit-file-word-yang-terkunci.html


بسم الله الرحمن الرحيم 

Cara Melindungi Word 2007 dengan Password

Anda dapat membuat sebuah aplikasi dimana bila seseorang ingin menggunakan aplikasi Microsoft Word 2007 harus memasukkan sebuah password yang telah Anda tentukan.

Caranya:
1. Buka aplikasi Microsoft Word Anda, kemudian pilih ribbon [View].

2. Pada pita di bawahnya, klik tombol [Macros].











3. Setelah muncul jendela “Macros”, isi “Macro name” dengan nama “AutoNew”.

4. Klik [Create] untuk mulai membuat makro.

5. Selanjutnya, akan muncul jendela Microsoft Visual Basic editor. Pada jendela tersebut, ketikkan skrip di bawah ini.

Sub AutoNew()
'
' AutoNew Macro
'
'
pass = InputBox("Masukkan password Anda.")
If pass = "amka" Then
End
Else
MsgBox ("Password yang Anda masukkan salah.")
ActiveDocument.Close
End If
End Sub











Pada skrip di atas, Anda dapat mengganti “amka” dengan password yang akan Anda inginkan.

Simpan makro Anda kemudian tutup aplikasi Microsoft Word.

Sekarang, buatlah shortcut Microsoft Word baru dengan cara mengklik kanan mouse pada desktop dan pilih menu [New] > [Shortcut].











Isi “Type the location of the item” dengan "C:\Program Files\Microsoft Office\Office12\WINWORD.EXE" /n, kemudian klik [Next].










Isikan “Type a name for this Shortcut” dengan nama “Microsoft Office Word 2007”.














Hapus shortcut yang ada di menu start, kemudian pindahkan shortcut yang baru saja Anda buat ke menu Start, menggantikan shortcut yang asli.















Mulai sekarang bila seseorang ingin menggunakan Microsoft Word 2007 dan membuat dokumen baru, muncullah kotak yang meminta password.










Contoh Word yang di password.

Sumber: PCplus http://blogamka.blogspot.com/2012/04/cara-melindungi-word-2007-dengan.html



بسم الله الرحمن الرحيم 

Mail Merge di Microsoft Word 2007

Mail Merge adalah fasilitas untuk membuat surat atau dokumen dalam jumlah banyak dengan isi dokumen sama tapi tujuan berbeda. Atau fasilitas untuk menggabungkan dokumen-dokumen yang berbeda. Mail Merge dapat membuat data field pada surat, label dan amplop terisi secara otomatis sesuai dengan record data sumbernya. Dengan mengunakan Mail Merge kita dapat membuat sebuah surat atau dokumen yang akan ditujukan kepada banyak penerima (recipients).

Mengoperasikan Mail Merge Untuk Membuat Label Undangan

Mail merge manfaatnya sangat banyak, diantaranya membuat label, surat, dan lain-lain, dimana sumber datanya bisa diambil dari file lain, semisal Excel, Access, bahkan Word itu sendiri. Pada kesempatan kali ini, marilah kita coba manfaatkan fasilitas Mail Merge untuk membuat label nama dan departemen pada daftar undangan menggunakan kertas label Tom & Jerry No.103, yang umumnya banyak dijual di toko-toko buku.

Simak berikut langkah-langkahnya.. ^^


1. Pertama-tama, bukalah Microsoft Word 2007, kemudian pilih tab Mailings àStart Mail Margeà labels.











2. Klik tombol New label. Isilah data-datanya sesuai dengan yang tertera pada gambar dibawah ini :

















3. Klik tombol OK.










4. Setelah semua parameter dimasukan,klik Ok terus sampai semua di windows labels kemudian klik new document  sehingga terdapat dokumen baru berbentuk seperti ini :













5. Persiapkan di dalam satu file Excel, seluruh daftar nama dan alamatnya. Misal datanya adalah sbb :












6. Kembali lagi ke file yang tadi dibuat di Word, pilih tab Mailings kemudian pilih Select Recipients à Use Existing List,
 maka akan muncul window file browse, pilihlah file excel yang telah kita buat pada langkah 5 di atas. 














7. Setelah file excelnya dipilih, akan muncul pilihan sheet mana yang akan digunakan, pilihlah sheet 1 karena datanya memang ada di sheet1 ini, kemudian klik OK dan OK lagi, maka data di excel telah masuk kedalam mail merge yang kita buat.










8.Kemudian pilih Insert Merge Field untuk memasukan field mana saja yang akan dimasukan kedalam address label yang akan kita buat. Disini kita akan memasukan field NAMA dan DEP, sehingga tampilannya akan seperti di bawah ini :













9. Untuk melihat hasilnya, klik Preview Results. Hasilnya adalah sbb :













10. Untuk mencetak label ini ke printer, pilih Finish & Merge kemudian pilih Print Documents. Bilamana sebelum diprint, ada yang hendak diedit terlebih dahulu, maka pilih Finish & MergeàEdit Individual Documents.


Mengoperasikan Mail Merge Untuk Membuat Surat Bisnis

Kita bisa memanfaatkan fasilitas Mail Merge untuk pembuatan surat bisnis, surat penawaran, surat undangan, proposal, dan surat-surat lainnya yang hendak kita kirimkan kepada lebih dari satu orang. 

Simak berikut langkah-langkahnya.. ^^

1. Buatlah satu surat penawaran, misalnya sbb :

















2. Siapkan daftar Nama Perusahaan yang hendak kita kirimkan surat penawaran. Buatlah daftarnya di dalam satu file Excel, misalnya sbb :












3. Kembali ke file surat penawaran, simpan kursor pada line dibawah “Kepada Yth:”, kemudian pada tab Mailings, pilih Select RecipientsàUse Existing Lists
Pilihlah file yang sudah dibuat pada langkah 2 di atas. 

4. Maka kini Anda telah terkoneksi dengan sumber data. Silahkan tambah field2 yang Anda inginkan, melalui menu Insert Merge Field. Misal hasilnya sbb:










5. Untuk melihat hasilnya, klik Preview Results. Hasilnya adalah sbb :










6. Untuk mencetak surat ini ke printer, pilih Finish & Merge kemudian pilih Print Documents. Bilamana sebelum diprint, ada yang hendak diedit terlebih dahulu, maka pilih Finish & Merge
àEdit Individual Documents.

Gimana sobat?? sudah jelas,, mudah dimengerti kn?? ^_^  
barakallah yaa,, smoga bermanfaat.. aamiin.

^^.."SLAMAT MENCOBA YA"..^^