- Buka Powerpoint (selanjutnya disingkat PP) anda
- Tekan Alt+F11 (membuka visual basic)
- Tambahkan layer module (Insert : Module)
- Nah di dalam modul kita mengetikkan script VB
Contoh membuat input nama,
Scriptnya :
Dim namaSiswa As String
Sub Nama()
Dim sudah As Boolean
sudah = False
While Not sudah
namaSiswa = InputBox(prompt:="Tulis nama anda", Title:="Masukkan Nama")
If namaSiswa = "" Then
sudah = False
Else
sudah = True
End If
Wend
End Sub
Keterangan :
Dim untuk memberi variabel namaSiswa (string)
Sub merupakan prosedur dengan nama .. Nama
Boolean = true dan False
While..Wend : looping hingga kondisi terpenuhi
- Kita kaitkan dengan button yang ada di PP
- Klik toolbar view PP
- Pada PP input gambar (button terserah lah)
- Klik kanan gambar tsb
- Klik action Setting
- Run macro