Tips Agar Lulus Pauli Test dan Kraepelin Test (Pauli Test Generator)

Test Psikotes Kerja | Pauli Test dan Kraepelin Test
Sekitar dua minggu lagi, rekan-rekan di instansi tempat saya bekerja sekarang akan menempuh test saringan masuk untuk KPPN Percontohan tahan VI, VII dan VIII yang akan diikuti sekitar 1400 orang peserta yang sebagian besar diikuti oleh karyawan dengan kelompok usia diatas 50 tahun.
Menurut informasi, test ini terdiri dari dua materi pokok yaitu soft competency (Psikotest)  dan Hard Competency (Pengetahuan dasar IT dan Prosedure Kerja). Bagi Sebagian rekan kerja yang berusia diatas 50 tahun, mungkin hard competency dirasa tidak terlalu menjadi beban, namun soft competency yang berisi materi psikotest terasa cukup menguras mental dan pikiran.
Dari sedikit bocoran yang saya dapatkan, salah satu materi soft competency yang diujikan adalah Pauli Test dan Kraepelin Test atau hitungan Koran. Jadi peserta diberikan lembaran seperti kertas Koran yang berisi deretan angka yang membentuk kolom-kolom. Kurang lebih seperti gambar dibawah ini :

gambar pauli test dan kraepelin test

Nah, Cara mengerjakan Pauli test dan Kraepelin test ini adalah mengisikan angka satuan hasil penjumlahan antara 2 angka di setiap kolom, ada yang dari bawah ke atas atau dari atas ke bawah, tergantung jenis test yang diberikan aleh assessor. Penjumlahan pada setiap kolom dibatasi waktu. Jika waktu habis, anda harus segera berpindah ke kolom berikutnya dan melakukan penjumlahan lagi dari bawah ke atas, begitu seterusnya. Berdasar pengalaman saya, Pauli Test dan Kraepelin test ini sangat menguras tenaga dan membutuhkan mental yang kuat. Oleh karena itu, sangat disarankan sebelum menempuh nya, untuk sesering mungkin latihan psikotest agar tidak kaget ketika menghadapi soal aslinya. Berikut cara mengerjakan Pauli test dan kraepelin test, lihat gambar dibawah :

Tips Lulus pauli test dan kraepelin test
Pauli test dan Kraepelin test ini akan digunakan sebagai referensi atau bahan pembanding hasil wawancara untuk pertanyaan-pertanyaan seperti :

1. Apakah anda dapat bekerja di bawah tekanan?
2. Bagaimanakah cara anda menangani konflik yang terjadi?
3. Ceritakan tentang situasi di mana pekerjaan anda dikritik oleh orang lain !
4. Sejauh apa anda dapat menangani perubahan?
5. Tipe orang seperti apa yang akan membuat anda mengalami kesulitan untuk bekerjasama?

Untuk itu, berikut beberapa tips agar anda bisa mengerjakan pauli test dan kraepelin test dengan mudah dan hasil yang memuaskan.
Tips mengerjakan pauli test dan kraepelin test
1) Yang paling penting dalam mengerjakan test ini adalah konsentrasi. Test ini sangat menguras energi, usahakan untuk tidak blank dalam mengerjakan test ini.
2) Usahakan jumlah angka yang terjawab di masing-masing kolom stabil. Jangan memaksakan diri untuk menjawab di kolom-kolom awal sehingga kewalahan di pertengahan hingga akhir kolom sehingga terbentuk kurva yang zig-zag atau menurun. Kendalikan diri dengan patokan penjumlahan sesuai dengan kemampuan anda. Anda tidak perlu menyelesaikan semua penjumlahan sampai ujung atas untuk masing-masing kolom. Usahakan mematok lebih dari 12 perhitungan dan tetap stabil untuk setiap kolomnya.
3) usahakan jangan terus mengerjakan kolom yang sudah habis waktunya karena akan menghabiskan waktu yang disediakan untuk kolom berikutnya dan pasti akan memberikan hasil yang jelek di kolom berikutnya.
Cara membuat lembar kerja pauli test dan kraepelin test sendiri menggunakan Ms. Word 2007 ( Pauli test generator).
Karena inti test ini adalah dari banyaknya latihan, berikut cara membuat lembar kerja pauli test dan kraepelin test sendiri menggunakan Ms. Word 2007. Silahkan dicoba. Berikut langkah-langkahnya :

• Buka Microsoft Word ;
• Setelah itu tekan tombol ALT + F11 ;
• Pilih INSERT pada menu lalu selanjutnya pilih MODULE ;

Kemudian masukan kode dibawah ini (Copas Aja):

Sub PsikoNumGenerator()

Randomize Timer

theEnd = InputBox("Jumlah angka yang akan dibuat", "Jumlah Angka")

If Not IsNumeric(theEnd) Then Exit Sub

If Int(theEnd) = 0 Then Exit Sub

For i = 1 To theEnd

theText = theText & vbTab & Int(Rnd(i) * 10)

Next

Selection.TypeText Text:=theText

End Sub

• Kemudian kembali ke Microsoft Word, tekan tombol ALT + F8 dan pilih RUN;
• Masukan jumlah angka yang kamu inginkan missal 5000 angka dan tada angka-angka tersebut akan secara otomatis di generate oleh perintah diatas.

Ego Memisahkan Kita dari Jati Diri Kita

Ego Memisahkan Kita dari Jati Diri Kita

(Kutipan Maha Guru Ching Hai, Pertemuan Internasional)

Kebijaksanaan itu benar-benar penting; sementara ego, harus kita pangkas. Semakin sedikit ego, semakin baik. Sungguh disayangkan karena kita tidak benar-benar membutuhkan ego ini. Kita yang mengetahui segalanya, Kita yang ahli dalam hal ini dan ahli dalam hal itu – kita tidak butuh semua itu. Karena jika kita tidak memilikinya, maka kita lebih pintar. Kita akan menjadi lebih cerdas, lebih pintar, sungguh.

Satu-satunya alasan mengapa saya bisa melakukan banyak hal dengan baik dan setiap orang menyukainya, mungkin, karena saya punya sedikit atau bahkan tidak memiliki ego sama sekali. Saya senantiasa mengoreksi diri saya sendiri untuk mengawasi apakah ada ego yang muncul. Mungkin yang menjadi penyebab ego kalian tidak lenyap adalah karena kalian tidak memiliki kesempatan untuk bergesekan dengan orang lain, tidak ada yang mengoreksi kalian, tidak ada yang memperbaiki kalian; tidak ada yang memberitahu kalian apa yang salah dengan diri kalian karena kalian tidak melakukan apapun dengan orang lain atau kalian menduduki posisi yang sangat tinggi di dalam masyarakat, misalkan kalian seorang pimpinan atau direktur, manajer, apapun; kalian merupakan orang yang memerintahkan setiap orang apa yang harus dilakukan setiap saat dan tidak ada orang yang berani membantah kalian. Juga, kadang-kadang bahkan sebagai seorang praktisi, kalian tidak memiliki kesempatan untuk dikoreksi oleh siapapun. Tapi jangan tersinggung; pangkaslah ego itu. Ya?

 

Tidaklah cukup hanya dengan bermeditasi. Kalian harus dihadapkan pada banyak situasi agar bertumbuh. Kalian harus keluar dan juga bereaksi dengan kenyataan agar lebih cerdas. Meditasi juga membantu, tapi jika kalian tidak memiliki kesempatan untuk memolesnya, maka itu tidak berhasil.

Jika ada yang memarahi kalian, atau bahkan salah menuduh kalian, berterima kasihlah pada orang itu. Itu bagus bagi kerendahan hati kalian; dan bahkan jika itu tidak benar, juga bagus bagi diri kalian. Pada saat itu, kalian memeriksa diri kalian lalu kalian tahu seberapa besar ego yang kalian miliki. Jika pada saat itu kalian masih berkata, “Oh, saya orang yang sedemikian baik, mengapa dia berkata begini dan begitu?” Dan kalian mengeluh sepanjang hari, lalu kalian mulai membenci orang itu, maka hal itu tetap saja tidak baik. Bagaimanapun, jika seseorang memperbaiki kalian dengan cara apapun, itu sangat bagus bagi diri kalian. Kalian belajar dari kesalahan itu, dan menjadi semakin baik.

 

Tidak ada orang yang buruk, hanya ego yang buruk. Sesungguhnya ego adalah musuh terburuk bagi setiap orang. Banyak orang suka menyimpannya, itulah masalahnya. Jika kalian terlalu banyak mendengarkan ego ini, kalian melupakan Diri agung kalian, kecerdasan Diri kalian, kebijaksanaan Diri kalian. Itulah satu-satunya masalah. Sungguh kasihan jika kalian terus mendengarkan ego itu, seperti kalian tahu terlalu banyak dan semua itu. Maka kalian tidak mengetahui Jati Diri kalian.  

Yang menjadi masalah utama adalah ego memisahkan kita dari Jati Diri kita, yang benar-benar mengetahui segalanya. Jika kita mengira bahwa kita mengetahui segalanya tentang dunia ini, maka kita tidak mengenali Jati Diri kita sendiri. Itulah masalah terbesar tentang ego.

Ego adalah musuh terbesar. Kadang kala ego bahkan menghancurkan pernikahan, menghancurkan hubungan percintaan, menghancurkan persahabatan, menghancurkan kasih antara ibu dan putranya, atau ayah dan putrinya, karena ego senantiasa menyebabkan konflik – tidak ingin melakukan apapun yang menyenangkan bagi ibu atau ayah atau menyenangkan pasangan, hanya ingin melakukan hal yang menyebabkan masalah. Hari demi hari seperti ini, jika seorang pasangan selalu menyebabkan masalah, maka tentu saja hubungan pun putus. Kalian tidak bisa mengingat apapun kecuali hal buruk dari satu sama lain–cendera mata yang buruk, kejadian buruk, peristiwa buruk, hasil buruk – dan segala sesuatu tak pernah baik. Jadi, tentu saja hubungan itu tidak bisa langgeng dengan cara seperti ini, pernikahan tidak bisa berlanjut.

Ini hanya merupakan hal-hal fisik. Berbicara mengenai tingkatan spiritual, tentu saja kalian bahkan jauh dari Diri kalian. Jika kalian agak melekat pada pengetahuan duniawi, bahkan jika kalian tidak cukup banyak mengetahui namun kalian mengira kalian banyak mengetahui, dan kalian melekat pada hal tersebut, maka kalian tidak mengenali Jati Diri kalian. Misalnya, jika memiliki sesuatu di depan kalian, walau hanya sebuah tirai tipis, kalian tidak bisa melihat diri kalian di cermin. Tapi jika tirai tipis itu jatuh, maka kalian bisa melihat diri kalian dengan jelas. Inilah masalah ego. Yang menghalangi orang-orang; yang menghalangi Jati Diri kalian dan hal lain yang datang di dekat kalian. Lalu membuat segalanya rusak atau hancur atau menyimpang; bukan hal yang nyata lagi.

Sungguh disayangkan. Ego bukanlah hal yang harus kita pertahankan. Itu merupakan musuh kita. Sedikit pengetahuan yang kita sangka kita ketahui – itu bukanlah pengetahuan sejati kita. Ego sangatlah sulit untuk dibuang, sangat, sangat sulit; dan menghancurkan banyak hal di dunia ini. Menyebabkan perang. Menyebabkan permusuhan dan kebencian, dan menghancurkan banyak negara. Orang yang tidak memiliki ego tidak pernah ingin berperang dengan siapapun karena mereka bisa melihat betapa tidak bergunanya hal-hal tersebut. Jadi, ego adalah musuh terburuk bagi siapapun di dunia ini.

Hewan-hewan, mereka tidak punya ego. Anjing-anjing sejati, misalnya, tidak memiliki ego sama sekali. Mereka sangat murni, itulah sebabnya mereka bisa mengasihi kita setiap saat. Bahkan jika kita memarahi mereka, mereka segera datang sambil mengibaskan ekor, saat kita datang dan mengasihi mereka. Mereka tidak pernah menyimpan kebencian apapun di dalam hati walau hanya sedetik. Kalian bisa melihat hal itu. Jadi jika kalian ingin melihat makhluk tanpa ego, lihatlah pada anjing. Benar-benar seperti itu.

Sebagian besar hewan tidak memiliki ego sama sekali, sampai manusia ikut campur dan merusak sifat dasar mereka. Itulah masalahnya. Kita manusia tidak hanya merusak diri kita dengan sedikit hal yang kita sebut sebagai pengetahuan dunia, tetapi kita juga merusak alam, dan kita juga merusak hewan. Kita memaksa mereka bertingkah tidak karuan. Saya mengamati semua itu dan saya mengetahuinya. Itu adalah kebenaran yang terjadi. Saya tidak hanya berbicara berdasarkan buku-buku –tetapi benar-benar seperti itu.

TUTORIAL MEMBUAT KABEL VGA DENGAN KABEL UTP

Eksperimen bikin kabel VGA (perpanjangan)

 Kabel perpanjangan vga fungsinya digunakan untuk menyambung LCD proyektor yang digantung di langit-langit ke output vga splitternya atau ke vga conector pada laptop. Tanpa kabel ini tentunya akan sulit karena jaraknya panjang antara posisi laptop yang ada di bawah dengan LCD proyektor yang tergantung di langit-langit. Perlu diketahui eksperimen kali ini juga hasil dari googling....thanks to you.....

 gambar 1. VGA kabel buatan pabrik 

Langsung saja sediakan komponen berikut ini :

1. Kabel LAN (CAT5e) yaitu kabel yg biasa dipake buat nyambung jaringan LAN. saya pake kabel LAN yang ada shieldingnya yaitu yg berpelindung dgn bungkus aluminium foil yang ada kabel ground-nya. sebetulnya pake kabel LAN biasa juga bisa...namun asumsi saya memakai kabel shielding akan lebih baik karena groundingnya cukup baik. Gunakan sepanjang 15 meter saja jgn terlalu panjang. Soalnya semakin panjang sinyal semakin lemah jadi gambarnya jadi jelek...

 gambar 2. kabel cat 5

2. 2 biji VGA konektor 15 pin male (lanangan) . ini adalah konektor yg biasa digunakan untuk output VGA bentuknya seperti huruf D yg terdiri dari 15 pin. Adapun no pin bisa dilihat pada bodi konektor tersebut. Saya beli dari toko elektronik, kalo di solo belinya di toko ORIENTAL(bukan promosi cuman kasih info saja...) di tempat lain saya kurang tau heheheh.,...

gambar 3.konektor vga male

3. rumah konektor 2 biji

gambar 4 rumah konektor

 Sedangkan peralatan yang dipake antara lain solder dengan timahnya, gunting, tang buat ngupas dan motong kabel. Nah itu saja yang diperlukan....

Nah berikut ini skema kabel dan pin yang harus disambung beserta warna kabelnya biar lebih enak nyoldernya :

pin 1 ---> orange
pin 2 ---> hijau
pin 3 ---> biru
pin 4 ---> gak dipake
pin 5 ---> gak dipake
pin 6 ---> putih-orange
pin 7 ---> putih hijau
pin 8 ---> putih biru
pin 9 ---> gak dipake
pin 10 ---> gak dipake
pin 11 ---> gak dipake
pin 13 ---> coklat
pin 14 ---> putih coklat
pin 15 ---> gak dipake

gambar 5. cara pemasangan pin pada vga dan kabel utp

Nah itu kabel sesuai dengan warna solderkan pada masing-masing konektor sesuai dengan nomor pin sesuai dengan keterangan di atas. Solder kedua VGA konektor pada masing-masing ujung kabel. Setelah itu solder kawat shielding (yaitu kawat yg nempel dengan pembungkus foil aluminiumnya) dengan besi bodi konektor. Kalau pake kabel LAN biasa yg tidak ada shieldingnya ya ga usah disolder. cuman gitu aja....jangan lupa pasang rumah konektor dan baut dengan kencang.

Saat nyolder perlu hati2 karena jarak pin yg cukup rapat Sebaiknya solder dulu pada pin bagian tengah yaitu deretan pin 6, 7 dan 8 baru diikuti pin pada barisan pinggir yaitu pin 1, 2, 3....dan pin 13, 14. Gunakan solder yg ujungnya lancip biar gak nempel ke mana-mana. AWAS JG SAMPE SOLDERAN ANTAR PIN BERSINGGUNGAN ATAU NEMPEL...pokoknya hati2 aja dan pelan-pelan nyoldernya....Kalo perlu cek dengan multitester dan pastikan solderan benar dan tidak saling nempel satu sama lain.

Selamat mencoba ya.......!!!!!

Menggabungkan File install.wim ke iso

Windows Vista Direct Download Links

Windows Vista used to be available for public download on servers owned by Digital River, Microsoft's service provider for e-commerce. As of February 2015, these downloads have been pulled. "Free" access to the OS disk images is no longer possible.

Important Note February 2015

The download servers msft-dnl.digitalrivercontent.net, msft.digitalrivercontent.net and azcdn01.digitalrivercontent.net have been taken down, and all Windows OS downloads have been pulled from the Azure storage.

Order a Replacement Disk from Microsoft

If you own a legit Windows Vista product key, Microsoft might send you a replacement disk. A small processing fee applies. Apart from this, Microsoft no longer distributes Windows Vista disks or disk images.

Purchase a fresh Windows system

This is the fallback solution. If you're not eligible for a replacement disk, you can still buy a new or second hand Windows Vista system, and receive a fresh disk with it. If you have an existing key, you can of course use it with the purchased disk as well, and hence equip two computers with Windows. Windows Vista is available from Amazon in four different editions:

• Windows Vista Home Basic
• Windows Vista Home Premium
• Windows Vista Business
• Windows Vista Ultimate

Download Windows Vista Setup Files

The following table is provided for reference only, so that you know which file name is which Windows version, in case you find some of the files from an alternative download source. The downloads in this table are no longer working.

Windows Vista 32 bit

Product	Language	Download Link
Windows Vista Ultimate x86 SP1	Dutch (Netherlands)	VistaSetupPrep.exe (X14-68066.exe) boot.wim install.wim
Windows Vista Ultimate x86 SP1	English (USA)	X14-63452.exe boot.wim install.wim
Windows Vista Ultimate x86 SP1	French (France)	X14-68064.exe boot.wim install.wim
Windows Vista Ultimate x86 SP1	German (Germany)	X15-19134.exe boot.wim install.wim
Windows Vista Ultimate x86 SP1	Spanish (Spain)	VistaSetupPrep.exe (X14-68065.exe) boot.wim install.wim
Windows Vista x86 RTM	English (USA)	X13-49114.exe X13-49116.exe X13-49118.exe X13-49120.exe

Windows Vista 64 bit

Product	Language	Download Link
Windows Vista Ultimate x64 SP1	Dutch (Netherlands)	VistaSetupPrep.exe (X14-68071.exe) boot.wim install.wim
Windows Vista Ultimate x64 SP1	English (USA)	X14-63453.exe boot.wim install.wim
Windows Vista Ultimate x64 SP1	French (France)	X14-68069.exe boot.wim install.wim
Windows Vista Ultimate x64 SP1	German (Germany)	X15-19135.exe boot.wim install.wim
Windows Vista Ultimate x64 SP1	Spanish (Spain)	VistaSetupPrep.exe (X14-68070.exe) boot.wim install.wim
Windows Vista x64 RTM	English (USA)	X13-49115.exe X13-49117.exe X13-49119.exe X13-49121.exe

Windows Vista Ultimate (PRODUCT) RED

This is a collection of screen saver, side bar apps, background images etc. dipping your desktop into deep red, like the red ribbon, indicating solidarity with victims of AIDS/HIV. When properly purchased, a percentage of the proceeds of Vista RED editions goes towards fighting AIDS in Africa. Please don't just indicate your support. Do give! The HIV rate in Sub-Saharan Africa is at an alarming 5%, and even little donations can have great impact there.
The actual download disappeared from Digital River's servers in February 2015 together with the other Windows Vista downloads.

Product	Language	Download Link
Windows Vista Ultimate (PRODUCT) RED	English (USA)	X15-19965.exe

Tutorial: Create a Windows Vista installation disk or iso image the easy way

The following instructions work with the former Digital River downloads. You need to have backup files of your downloads if you want to proceed with it.
You will need the three downloaded files (one *.exe and two *.wim files) as well as some zip software such as 7-zip and an iso image software such as ImgBurn.
The following screenshots show the process of creating an English Windows Vista 64 bit iso image on Windows 8.1 32 bit. Other languages and bit editions work exaxtly the same. As you can see, the restriction that 64 bit iso files could only be created on a 64 bit system is no longer valid. Since ImgBurn runs on all Windows systems as well as on Wine, things will be much easier now. Only a few clicks are required.

So you start with all three Windows Vista files in one folder. It should look like on the screen shot now. X14-63453 is the setup file for the English Windows Vista 64 bit. The *.wim files come from the same download set. First thing to do, open the *.exe file in 7-zip and extract the contents to some folder on your hard drive.

7-zip will create a new folder called "Vista", which is the root folder of the installation DVD. It contains a subfolder named "sources". Now move the two *.wim files into there.

What reamins to be done now is to create the iso image, and/or an installation disk from the new folder with the Vista files. You do that using ImgBurn. Let's look at the screen shot first.

This is the settings screen for ImgBurn. You don't need to change a lot from the default settings. Browse for the "Vista" folder as the source. Choose a file name and a location for the iso file you want to create ("destination"). Then go to the "advanced" tab, and select "bootable disc".
In the options screen for bootable discs, select the check box to make the image bootable. As the boot image, select the "etfsboot.com" file in the "boot" subfolder. Then enter "Microsoft Corporation" as the developer ID. All other settings, please do not change.
So, that was already it, you can trigger burning the disk or creating the iso image now, and ImgBurn will do its thing. ImgBurn will offer you to auto fix some issues like a missing name tag, and the disc type. You can confirm all the auto fixes. After about 5 minutes, your disc or your file is already done.

buat server dari centos

https://drive.google.com/drive/my-drive

buka protect excel

Cara Membuka Proteksi Sheet Microsoft Excel tanpa password

Pagi ini ada seorang rekan yang datang dengan membawa file excel yang tidak bisa diedit, karena diproteksi sheet  oleh pembuatnya.  Saat mencoba mengedit maka akan muncul peringatan seperti ini

"the cell or chart you are trying to change is protected and therefore read-only. TO Modify a protected cell or chart, first remove protection using Unprotect Sheet command (Review tab, Change group). You may be prompted for password""

atau ciri lain dari sheet yang diproteksi adalah jika kita lihat pada tab review maka akan ada icon unprotect Sheet 

Icon Unprotect Sheet

File tersebut hanya bisa diedit jika kita mengetahui password untuk Unprotect Sheet. Baru sadar ternyata sudah bertahun-tahun tidak bermain-main dengan Sheet Excel yang diproteksi :D. Kalau dulu, biasanya saya menggunakan Open Office untuk mengedit file yang terproteksi, dari hasil percobaan, ternyata proteksi excel tidak berlaku di program lain seperti Open Office, Libre Office dll. 

Kebetulan Komputer yang saya gunakan belum terinstall Open Office/Libre Office, sepertinya membutuhkan waktu lama jika harus mendownload dan menginstall program tersebut. Maka dengan bantuan mbah Google, akhirnya bisa menemukan cara membuka proteksi Sheet Excel dengan menggunakan VB (Visual Basic) Script. 

Berikut ini adalah step by step membuka proteksi Sheet Excel dengan menggunakan VB Script:

1. Buka file excel yang di proteksi
2. Tekan tombol kombinasi “ALT+F11″
3.  Klik Insert > module
4. copy paste-kan code berikut ini:

Public Sub AllInternalPasswords()
        ' Breaks worksheet and workbook structure passwords. Bob McCormick 
        '  probably originator of base code algorithm modified for coverage 
        '  of workbook structure / windows passwords and for multiple passwords
        '
        ' Norman Harker and JE McGimpsey 27-Dec-2002 (Version 1.1)
        ' Modified 2003-Apr-04 by JEM: All msgs to constants, and
        '   eliminate one Exit Sub (Version 1.1.1)
        ' Reveals hashed passwords NOT original passwords
        Const DBLSPACE As String = vbNewLine & vbNewLine
        Const AUTHORS As String = DBLSPACE & vbNewLine & _
                "Adapted from Bob McCormick base code by" & _
                "Norman Harker and JE McGimpsey"
        Const HEADER As String = "AllInternalPasswords User Message"
        Const VERSION As String = DBLSPACE & "Version 1.1.1 2003-Apr-04"
        Const REPBACK As String = DBLSPACE & "Please report failure " & _
                "to the microsoft.public.excel.
programming newsgroup."
        Const ALLCLEAR As String = DBLSPACE & "The workbook should " & _
                "now be free of all password protection, so make sure you:" & _
                DBLSPACE & "SAVE IT NOW!" & DBLSPACE & "and also" & _
                DBLSPACE & "BACKUP!, BACKUP!!, BACKUP!!!" & _
                DBLSPACE & "Also, remember that the password was " & _
                "put there for a reason. Don't stuff up crucial formulas " & _
                "or data." & DBLSPACE & "Access and use of some data " & _
                "may be an offense. If in doubt, don't."
        Const MSGNOPWORDS1 As String = "There were no passwords on " & _
                "sheets, or workbook structure or windows." & AUTHORS & VERSION
        Const MSGNOPWORDS2 As String = "There was no protection to " & _
                "workbook structure or windows." & DBLSPACE & _
                "Proceeding to unprotect sheets." & AUTHORS & VERSION
        Const MSGTAKETIME As String = "After pressing OK button this " & _
                "will take some time." & DBLSPACE & "Amount of time " & _
                "depends on how many different passwords, the " & _
                "passwords, and your computer's specification." & DBLSPACE & _
                "Just be patient! Make me a coffee!" & AUTHORS & VERSION
        Const MSGPWORDFOUND1 As String = "You had a Worksheet " & _
                "Structure or Windows Password set." & DBLSPACE & _
                "The password found was: " & DBLSPACE & "$$" & DBLSPACE & _
                "Note it down for potential future use in other workbooks by " & _
                "the same person who set this password." & DBLSPACE & _
                "Now to check and clear other passwords." & AUTHORS & VERSION
        Const MSGPWORDFOUND2 As String = "You had a Worksheet " & _
                "password set." & DBLSPACE & "The password found was: " & _
                DBLSPACE & "$$" & DBLSPACE & "Note it down for potential " & _
                "future use in other workbooks by same person who " & _
                "set this password." & DBLSPACE & "Now to check and clear " & _
                "other passwords." & AUTHORS & VERSION
        Const MSGONLYONE As String = "Only structure / windows " & _
                 "protected with the password that was just found." & _
                 ALLCLEAR & AUTHORS & VERSION & REPBACK
        Dim w1 As Worksheet, w2 As Worksheet
        Dim i As Integer, j As Integer, k As Integer, l As Integer
        Dim m As Integer, n As Integer, i1 As Integer, i2 As Integer
        Dim i3 As Integer, i4 As Integer, i5 As Integer, i6 As Integer
        Dim PWord1 As String
        Dim ShTag As Boolean, WinTag As Boolean
        
        Application.ScreenUpdating = False
        With ActiveWorkbook
            WinTag = .ProtectStructure Or .ProtectWindows
        End With
        ShTag = False
        For Each w1 In Worksheets
                ShTag = ShTag Or w1.ProtectContents
        Next w1
        If Not ShTag And Not WinTag Then
            MsgBox MSGNOPWORDS1, vbInformation, HEADER
            Exit Sub
        End If
        MsgBox MSGTAKETIME, vbInformation, HEADER
        If Not WinTag Then
            MsgBox MSGNOPWORDS2, vbInformation, HEADER
        Else
          On Error Resume Next
          Do      'dummy do loop
            For i = 65 To 66: For j = 65 To 66: For k = 65 To 66
            For l = 65 To 66: For m = 65 To 66: For i1 = 65 To 66
            For i2 = 65 To 66: For i3 = 65 To 66: For i4 = 65 To 66
            For i5 = 65 To 66: For i6 = 65 To 66: For n = 32 To 126
            With ActiveWorkbook
              .Unprotect Chr(i) & Chr(j) & Chr(k) & _
                 Chr(l) & Chr(m) & Chr(i1) & Chr(i2) & _
                 Chr(i3) & Chr(i4) & Chr(i5) & Chr(i6) & Chr(n)
              If .ProtectStructure = False And _
              .ProtectWindows = False Then
                  PWord1 = Chr(i) & Chr(j) & Chr(k) & Chr(l) & _
                    Chr(m) & Chr(i1) & Chr(i2) & Chr(i3) & _
                    Chr(i4) & Chr(i5) & Chr(i6) & Chr(n)
                  MsgBox Application.Substitute(MSGPWORDFOUND1, _
                        "$$", PWord1), vbInformation, HEADER
                  Exit Do  'Bypass all for...nexts
              End If
            End With
            Next: Next: Next: Next: Next: Next
            Next: Next: Next: Next: Next: Next
          Loop Until True
          On Error GoTo 0
        End If
        If WinTag And Not ShTag Then
          MsgBox MSGONLYONE, vbInformation, HEADER
          Exit Sub
        End If
        On Error Resume Next
        For Each w1 In Worksheets
          'Attempt clearance with PWord1
          w1.Unprotect PWord1
        Next w1
        On Error GoTo 0
        ShTag = False
        For Each w1 In Worksheets
          'Checks for all clear ShTag triggered to 1 if not.
          ShTag = ShTag Or w1.ProtectContents
        Next w1
        If ShTag Then
            For Each w1 In Worksheets
              With w1
                If .ProtectContents Then
                  On Error Resume Next
                  Do      'Dummy do loop
                    For i = 65 To 66: For j = 65 To 66: For k = 65 To 66
                    For l = 65 To 66: For m = 65 To 66: For i1 = 65 To 66
                    For i2 = 65 To 66: For i3 = 65 To 66: For i4 = 65 To 66
                    For i5 = 65 To 66: For i6 = 65 To 66: For n = 32 To 126
                    .Unprotect Chr(i) & Chr(j) & Chr(k) & _
                      Chr(l) & Chr(m) & Chr(i1) & Chr(i2) & Chr(i3) & _
                      Chr(i4) & Chr(i5) & Chr(i6) & Chr(n)
                    If Not .ProtectContents Then
                      PWord1 = Chr(i) & Chr(j) & Chr(k) & Chr(l) & _
                        Chr(m) & Chr(i1) & Chr(i2) & Chr(i3) & _
                        Chr(i4) & Chr(i5) & Chr(i6) & Chr(n)
                      MsgBox Application.Substitute(MSGPWORDFOUND2, _
                            "$$", PWord1), vbInformation, HEADER
                      'leverage finding Pword by trying on other sheets
                      For Each w2 In Worksheets
                        w2.Unprotect PWord1
                      Next w2
                      Exit Do  'Bypass all for...nexts
                    End If
                    Next: Next: Next: Next: Next: Next
                    Next: Next: Next: Next: Next: Next
                  Loop Until True
                  On Error GoTo 0
                End If
              End With
            Next w1
        End If
        MsgBox ALLCLEAR & AUTHORS & VERSION & REPBACK, vbInformation, HEADER
    End Sub

5. Klik pada sheet atau workbook yang akan kita buka password-nya
6. Klik Macro > Show Macro > Internal Password > Run
7. Tunggu beberapa saat (tergantung besar kecil ukuran File)
8. Jika proses sudah selesai, maka anda sudah bisa mengedit file tersebut dengan leluasa. Untuk mengecek apakah file masih terproteksi bisa juga dilihat di tab Review, maka icon Unprotect Sheet sudah berganti menjadi Protect Sheet.

Semoga bermanfaat jika  suatu saat anda lupa password proteksi sheet atau membutuhkan mengedit file yang ternyata diproteksi.

CARA RESET CANON MX 360

Usahakan posisi printer off (Kabel Masih Terpasang)

1. tekan dan tahan tombol stop bersama-sama dengan tombol power
2. tombol power posisi masih di tekan(tahan) tekan tombol stop 6x
3. Printer akan masuk ke save mode, hubungkan kabel usb ke komputer
4. jalankan aplikasi resetter klik disini
5. masukan kertas kosong
6. jalankan aplikasi resetter
7. klik" main " printer akan ngeprint 1 lembar 
8. matikan printer ,hidupkan lagi