Cara membuat lembar kerja pauli test dan kraepelin test sendiri menggunakan Ms. Word 2007

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

Thank's for reading the articelCara membuat lembar kerja pauli test dan kraepelin test sendiri menggunakan Ms. Word 2007 .If You want to copy paste your website please tag my link Cara membuat lembar kerja pauli test dan kraepelin test sendiri menggunakan Ms. Word 2007 Intro My Website.
<a href="http://operaterpm.blogspot.com/2015/07/cara-membuat-lembar-kerja-pauli-test.html">Cara membuat lembar kerja pauli test dan kraepelin test sendiri menggunakan Ms. Word 2007</a>