MEMBUAT STEMPEL SENDIRI di Excel

Assalamualaikum

membuat stempel tentu harus dengan ijin dari pihak yang memiliki otoritas pada stempel tersebut
tetapi terkadang kita di beri tugas untuk menduplikasi stempel tersebut kedalam laporan atau kartu-kartu yang terkait dengan lembaga kita

nah kali ini kita coba membuka trik yang boleh dikatakan trik lama dan sangat mudah untuk hal tersebut.
kita persiapkan dulu bahannya :
1. Model Stempel biasanya bulat bisa kita download dari om Google
2. Nama/ Tulisan yang akan di masukkan ke Stempel

Pengerjaannya :

1. Edit Gambar yang kita download
    menggunakan Software Editor Image
    seperti Photosop, Corel, Paint dsb.
    hingga tulisan yang ada pada gambar kosong
    (untuk di isikan sesuai data)
    disini saya pakai Paint (fasilitas windows).

2. insert Picture yang sudah di edit ke Sheet
    Excel
3. Insert Word art dan sesuaikan kebutuhan
    lekukan word dengan gambar stempel yang
    di kehendaki
4. Klik Word art kemudian di kotak bar formula
    tuliskan =A1 , ini asumsi nama sekolah di tulis
                                                                                        di cell A1

5. Klik semua shape, image dan word art
    kemudian Klik kanan Group..
6. Selesai

Contoh File sederhana disini

Semoga bermanfaat :)

Silahkan ke menu HOME untuk artikel menarik lainnya

Read More

TERBILANG untuk KWITANSI dan RAPORT non VBA

Assalamualaikum
kali ini saya menyimpan file ini agar tidak lupa rumusnya jika lama tidak tersentuh...
karena itu penyakit saya yang paling utama (pelupa) :v

"RumusTerbilang" ini merupakan hasil modifikasi dari posting di grup EIUG yang semula hanya bisa hingga ratusan menjadi ratusan Milyar,

Seperti ini kira-kira penampakan

untuk lebih jelasnya silahkan download file disini, silahkan bongkar semua isinya dan digunakan jika perlu atau sebagai referensi saja.

oh Iya file ini Office 2013 jadi mudah-mudahan running di versi lain atau nanti saya mencoba update ke versi binary

Yang perlu dipahami disini adalah untuk penggunaan name manager untuk terbilang Raport, kita perlu memperhatikan posisi sheet dan cell jika ingin di copy dan gunakan di file lain, dengan kata lain seperti ini kronologinya :
- buka define name,
- Cari Bilang saja
- copy rumus di dalamnya dan letakkan di samping cell yang ingin di terjemahkan angkanya
- jika error tekan F2 di keyboard dan lihat referensi rumus kemana :)

untuk Terbilang Kwitansi, cukup copy semua rumus dan letakkan disamping cell tujuan

Semoga bermanfaat,
Salam KJ

Silahkan tekan tombol home dibawah untuk artikel menarik lainnya :)

Read More

GRAFIK YANG PERLU DI PELAJARI

Assalamualaikum

Silahkan simak Video Penggunaan Grafik Berikut dan anda akan bingung seperti saya :v
Setelah saya pelajari baru sedikit yang saya mengerti dari Offset, Mod, Rept, dsb :v
Lumayan buat pala pening

Grafik yang dibuat oleh salah satu Master Excel (Andy Pope)

Nikmati saja,

Silahkan ke Tombol HOME untuk Lihat Artikel lainnya dan artikel terkait disebelah kanan milik teman EIUG.

Salam KJ

Read More

KEYBOARD Shortcuts/ Pintasan di Keyboard

Silahkan Bagikan........

Keyboard Shorcuts (Microsoft Windows)

1. CTRL+C (Copy)
2. CTRL+X (Cut)
3. CTRL+V (Paste)
4. CTRL+Z (Undo)
5. DELETE (Delete)
6. SHIFT+DELETE (Delete the selected item permanently without placing the item in the Recycle Bin)
7. CTRL while dragging an item (Copy the selected item)
8. CTRL+SHIFT while dragging an item (Create a shortcut to the selected item)
9. F2 key (Rename the selected item)
10. CTRL+RIGHT ARROW (Move the insertion point to the beginning of the next word)
11. CTRL+LEFT ARROW (Move the insertion point to the beginning of the previous word)
12. CTRL+DOWN ARROW (Move the insertion point to the beginning of the next paragraph)
13. CTRL+UP ARROW (Move the insertion point to the beginning of the previous paragraph)
14. CTRL+SHIFT with any of the arrow keys (Highlight a block of text)
SHIFT with any of the arrow keys (Select more than one item in a window or on the desktop, or select text in a document)
15. CTRL+A (Select all)
16. F3 key (Search for a file or a folder)
17. ALT+ENTER (View the properties for the selected item)
18. ALT+F4 (Close the active item, or quit the active program)
19. ALT+ENTER (Display the properties of the selected object)
20. ALT+SPACEBAR (Open the shortcut menu for the active window)
21. CTRL+F4 (Close the active document in programs that enable you to have multiple documents opensimultaneou sly)
22. ALT+TAB (Switch between the open items)
23. ALT+ESC (Cycle through items in the order that they had been opened)
24. F6 key (Cycle through the screen elements in a window or on the desktop)
25. F4 key (Display the Address bar list in My Computer or Windows Explorer)
26. SHIFT+F10 (Display the shortcut menu for the selected item)
27. ALT+SPACEBAR (Display the System menu for the active window)
28. CTRL+ESC (Display the Start menu)
29. ALT+Underlined letter in a menu name (Display the corresponding menu) Underlined letter in a command name on an open menu (Perform the corresponding command)
30. F10 key (Activate the menu bar in the active program)
31. RIGHT ARROW (Open the next menu to the right, or open a submenu)
32. LEFT ARROW (Open the next menu to the left, or close a submenu)
33. F5 key (Update the active window)
34. BACKSPACE (View the folder onelevel up in My Computer or Windows Explorer)
35. ESC (Cancel the current task)
36. SHIFT when you insert a CD-ROMinto the CD-ROM drive (Prevent the CD-ROM from automatically playing)

Dialog Box - Keyboard Shortcuts
1. CTRL+TAB (Move forward through the tabs)
2. CTRL+SHIFT+TAB (Move backward through the tabs)
3. TAB (Move forward through the options)
4. SHIFT+TAB (Move backward through the options)
5. ALT+Underlined letter (Perform the corresponding command or select the corresponding option)
6. ENTER (Perform the command for the active option or button)
7. SPACEBAR (Select or clear the check box if the active option is a check box)
8. Arrow keys (Select a button if the active option is a group of option buttons)
9. F1 key (Display Help)
10. F4 key (Display the items in the active list)
11. BACKSPACE (Open a folder one level up if a folder is selected in the Save As or Open dialog box)

Microsoft Natural Keyboard Shortcuts
1. Windows Logo (Display or hide the Start menu)
2. Windows Logo+BREAK (Display the System Properties dialog box)
3. Windows Logo+D (Display the desktop)
4. Windows Logo+M (Minimize all of the windows)
5. Windows Logo+SHIFT+M (Restorethe minimized windows)
6. Windows Logo+E (Open My Computer)
7. Windows Logo+F (Search for a file or a folder)
8. CTRL+Windows Logo+F (Search for computers)
9. Windows Logo+F1 (Display Windows Help)
10. Windows Logo+ L (Lock the keyboard)
11. Windows Logo+R (Open the Run dialog box)
12. Windows Logo+U (Open Utility Manager)
13. Accessibility Keyboard Shortcuts
14. Right SHIFT for eight seconds (Switch FilterKeys either on or off)
15. Left ALT+left SHIFT+PRINT SCREEN (Switch High Contrast either on or off)
16. Left ALT+left SHIFT+NUM LOCK (Switch the MouseKeys either on or off)
17. SHIFT five times (Switch the StickyKeys either on or off)
18. NUM LOCK for five seconds (Switch the ToggleKeys either on or off)
19. Windows Logo +U (Open Utility Manager)
20. Windows Explorer Keyboard Shortcuts
21. END (Display the bottom of the active window)
22. HOME (Display the top of the active window)
23. NUM LOCK+Asterisk sign (*) (Display all of the subfolders that are under the selected folder)
24. NUM LOCK+Plus sign (+) (Display the contents of the selected folder)

MMC COnsole Windows Shortcut keys

1. SHIFT+F10 (Display the Action shortcut menu for the selected item)
2. F1 key (Open the Help topic, if any, for the selected item)
3. F5 key (Update the content of all console windows)
4. CTRL+F10 (Maximize the active console window)
5. CTRL+F5 (Restore the active console window)
6. ALT+ENTER (Display the Properties dialog box, if any, for theselected item)
7. F2 key (Rename the selected item)
8. CTRL+F4 (Close the active console window. When a console has only one console window, this shortcut closes the console)

Remote Desktop Connection Navigation
1. CTRL+ALT+END (Open the Microsoft Windows NT Security dialog box)
2. ALT+PAGE UP (Switch between programs from left to right)
3. ALT+PAGE DOWN (Switch between programs from right to left)
4. ALT+INSERT (Cycle through the programs in most recently used order)
5. ALT+HOME (Display the Start menu)
6. CTRL+ALT+BREAK (Switch the client computer between a window and a full screen)
7. ALT+DELETE (Display the Windows menu)
8. CTRL+ALT+Minus sign (-) (Place a snapshot of the active window in the client on the Terminal server clipboard and provide the same functionality as pressing PRINT SCREEN on a local computer.)
9. CTRL+ALT+Plus sign (+) (Place asnapshot of the entire client window area on the Terminal server clipboardand provide the same functionality aspressing ALT+PRINT SCREEN on a local computer.)

Microsoft Internet Explorer Keyboard Shortcuts
1. CTRL+B (Open the Organize Favorites dialog box)
2. CTRL+E (Open the Search bar)
3. CTRL+F (Start the Find utility)
4. CTRL+H (Open the History bar)
5. CTRL+I (Open the Favorites bar)
6. CTRL+L (Open the Open dialog box)
7. CTRL+N (Start another instance of the browser with the same Web address)
8. CTRL+O (Open the Open dialog box,the same as CTRL+L)
9. CTRL+P (Open the Print dialog box)
10. CTRL+R (Update the current Web )

Read More

Menampilkan data dari beberapa Sheet di Excel tanpa VBA

Assalamualaikum

Menampilkan data dari beberapa Sheet di Excel tanpa VBA, bagi yang sudah biasa dengan excel pasti langsung kepikiran dengan rumus Vlookup, HLookup, Index-Match, atau Offset-Match. Baiklah sekarang kita Siapkan saja file yang berisi beberapa sheet yang didalam setiap sheet terdapat data tabel dengan isi terdiri dari keyword-keyword yang sama, misalnya Nomor Induk Siswa (NIS), NIP, atau kode Barang dan sebagainya.
nah untuk mengolah file tersebut ke sheet laporan karena biasanya dalam sebuah file yang banyak data dan sheet terdapat satu sheet untuk di laporkan hasilnya.

seperti FlowChart berikut :

Setiap tabel yang kita miliki di setiap sheet sebaiknya kita beri nama dengan Name manager agar lebih mudah pemanggilannya tidak perlu lagi bolak-bolik sheet untuk blok tabel, misalnya tabel_data, tabel_kinerja, tabel_Gaji dsb

di sheet laporan kita bisa mengandalkan beberapa rumus untuk eksekusi ke sheet/tabel yang dikehendaki, dalam file sampel kita menggunakan Function CHOOSE sebagai eksekutor pemilih tabel.
Gambaran rumus CHOOSE adalah memilih sesuai perintah urutan :

 syntax : CHOOSE(pilih urutan, Pilihan1, pilihan2, .....dst)

dalam file sampel terdapat tabel Value_01, Value_02, Value_03, dan Cell E2 sebagai index pilihan jadi rumus kita tuliskan : CHOOSE(E2,Value_01,Value_02,Value_03)

untuk eksekusi kita memakai Vlookup sebagai pemanggil data tunggal yang di bungkus dalam name manager (R_Nama dan R_Value).

Properti lain dalam file lampiran adalah Conditional Formatting custom yang mengubah angka ke text seperti pada pilihan Halaman.

Untuk lebih jelasnya silahkan download file di bawah
Download File Disini

Untuk kendala silahkan hubungi KJ dan mari sama-sama belajar, karena artikel ini dibuat agar jika suatu saat kita lupa kita bisa membaca kembali :)

Salam KJ,

Untuk Artikel lain silahkan tekan tombol Home dibawah

Read More

Menampilkan Foto di Excel tanpa VBA

Assalamualaikum

Kali ini kita membuat penampil foto database tanpa VBA :)
Cekidot ...............................................................

Bahan-bahan yang diperlukan
- Database
- Picture sesuai ukuran yang dikehendaki dengan ekstensi ringan saja BMP, walau yang lain
  memungkinkan seperti JPEG dan PNG
- Foto Sesuai ukuran cell atau suka-suka anda :v

Langkah-langkahnya :
1. siapkan database,
   atur lebar tinggi cell untuk penyimpanan foto
   masukkan foto (insert)
   ok selesai insert foto

2. siapkan image untuk bacground sebenarnya sembarang image juga boleh :)

3. Buat Tampilan untuk foto misal Kartu atau report database

4. Mulai hubungkan tampilan dengan rumus dan data base

Copy define name ke name yang ke-2

5. Selesai :)

Semoga bermanfaat ya...

oh iya filenya lupa... ada disini kalau anda beruntung :v becanda ,
silahkan download disini

Salam dari NewBe
KJ99

Read More

MEMBUAT PASSWORD LOGIN VBA

Assalamualaikum Wr Wb

Membuat password Login biasanya untuk membatasi user pengguna sebuah program atau file
untuk kali ini diberi contoh yang sangat sederhana, karena saya juga seorang pemula yang mencoba membuat dari hasil googling dan belajar :)

Artikel ini cuma membahas untuk membatasi login user secara umum saja satu arah
kadang kita menemui login berdasarkan User dengan password berbeda-beda pula

Sampel form login

untuk membuat itu kita perlu
Userform, Textbox, dan Commandbutton

Userform : untuk menampung tampilan awal
Textbox   : untuk penulisan Username/password
CommandButton : untuk eksekusi

Tuliskan script berikut pada userform (double click userform)

'===Untuk Mengaktifkan posisi kursor awal di kolom user====
Private Sub UserForm_activate()
Me.TextBox1.Value = ""
Me.TextBox1.SetFocus
End Sub

'===Untuk tampilan tulisan hanya * saja di kolom input password==
Private Sub UserForm_Initialize()
Me.TextBox2.PasswordChar = "*"
End Sub

'===untuk mencegah user menutup jendela form===
Private Sub UserForm_QueryClose(Cancel As Integer, CloseMode As Integer)
  If CloseMode = vbFormControlMenu Then
    Cancel = True
    MsgBox "Silahkan masukkan Password", , " maaf...."
  End If
End Sub

'===Untuk eksekusi===

Private Sub CommandButton1_Click()

If TextBox2.Value <> "KJ99" Then

    MsgBox "Password salah, Bye...... ^_^", , "Maaf"

    ThisWorkbook.Save

    ThisWorkbook.Close

End If

Unload Me

Thisworkbook.application.visible=true

Sheets("Sheet1").Activate

End Sub

Pada script Sheets("Sheet1").Activate bisa kita ganti dengan tujuan lain, misal:
Userform2.Show 'jika kita punya form selanjutnya
sheets("sheet1").activate 'jika ingin langsung ke sheet1


Nah pada Thisworkbook (sisi kiri jendela VBA) sama kita double click kemudian masukkan kode berikut :

Private Sub Workbook_BeforeClose(Cancel As Boolean)
Sheets("HOME").Activate 'Silahkan Ganti dengan sheet sesuai yang anda miliki misal Sheet1
ThisWorkbook.Save
End Sub

'Untuk menyembunyikan Excel dan menampilkan Form login secara tunggal
Private Sub Workbook_Open()
ThisWorkbook.Application.Visible = False 
FORMLOGIN.Show
End Sub

Semoga artikel ini bermanfaat, terutama bagi saya yang sering lupa jadi nulis disini biar gampang baca lagi kalau lupa :v

Contoh File Form Login disini, Password: KJ99

Salam KJ

Read More