Cara Membuat Soal PilGan Menggunakan VBA PowerPoint

halooo, teman-teman tahu tidak bagaimana cara membuat soal pilihan ganda menggunakan VBA power point? Nah untuk yang belum tahu bagaimana caranya, berikut tutorial dari saya yaa.

1. tentu buka dulu MS word Power point.
2. tuliskan kata pembuka dan informasi tentang cara mengerjakan kuis pada slide 1 sertakan pula tombol mulai.


3. slide selanjutnya buatlah soal beserta pilihan jawabannya ( 1 slide terdiri dari 1 soal saja)


4. selelah soal selesai slide selanjutnya buatlah penutup ( contohnya seperti "selesai" dan "mulai lagi")


5. pada slide terakhir buatlah kolom nilai.










6. klik "developer", kemudian klik "visual basic"
7. klik "insert", kemudian klik "module"


8. masukkan tulisan dibawah ini ya

Dim nilai As Integer

Dim jumlah As Integer

Sub mulai()

jumlah = ActivePresentation.SlideMaster.Count

nilai = 0

ActivePresentation.SlideShowWindow.View.Next

End Sub

Sub benar()

jumlah = MsgBox("waw, jawabanmu benar!")

nilai = nilai + 10

ActivePresentation.SlideShowWindow.View.Next

End Sub

Sub salah()

jumlah = MsgBox("ups, jawabanmu salah!")

nilai = nilai + 10

ActivePresentation.SlideShowWindow.View.Next

End Sub

Sub selesai()

ActivePresentation.SlideShowWindow.View.Next

End Sub

Sub hasil()

ActivePresentation.Slides(13).Shapes(2).TextFrame.TextRange.Text = nilai

End Sub

Sub keluar()

ActivePresentation.Slides(12).Shapes(2).TextFrame.TextRange.Text = ""

ActivePresentation.SlideShowWindow.View.Next

End Sub

Sub mengulang()

ActivePresentation.Slides(12).Shapes(1).TextFrame.TextRange.Text = ""

ActivePresentation.SlideShowWindow.View.First

End Sub

9. pada slide 1 klik kolom "mulai" yang telah kamu buat, kemudian pilih insert > action > run macro > mulai

10. pada slide soal klik setiap option secara bergantian kemudian pilih insert > action > run macro> benar(jika jawaban benar, salah(jika jawaban salah)

11. slide terakhir bisa klik mengulang(jika ingin mengulang) dan selesai(jika tidak ingin mengulang kuis)

jangan lupa untuk disimpan yaa :)
untuk contoh hasil yang saya buat bisa dilihat di postingan saya sebelu-sebelumnya :)