Tampilkan postingan dengan label Powerpoint. Tampilkan semua postingan
Tampilkan postingan dengan label Powerpoint. Tampilkan semua postingan

Senin, 15 Juni 2015

Media Pembelajaran - Mengenal Pecahan



Media Pembelajaran - Pamong Didik. Tidak lama ini saya kembali memberikan bantuan kepada salah seorang mahasiswi universitas terbuka untuk menyelesaikan pembuatan media pembelajaran berbasis Microsoft PowerPoint.

Pamong Didik - Media Pembelajaran Matematika SD Mengenal Pecahan
Media Pembelajaran - Mengenal Pecahan
Media pembelajaran ini digunakan untuk pembelajaran pada tingkat SD dengan materi bahasan yaitu Mengenal Pecahan. Untuk lebih jelasnya silahkan melihat bahkan diperbolehkan untuk mendownload langsung media pembelajaran ini.






Rabu, 10 Juni 2015

Media Pembelajaran - Energi Panas dan Bunyi

 Media Pembelajaran - Pamong Didik. Memahami berbagai bentuk energi dan cara penggunaannya dalam kegiatan sehari-hari merupakan salah satu materi pembelajaran yang akan saya berikan. Melalui bahan ajar pembelajaran berbasis powerpoint ini yang sudah saya jadikan file pdf bisa digunakan untuk melakukan proses pembelajaran untuk mata pelajaran Ilmu Pengetahuan Alam (IPA) dengan materi energi panas dan bunyi.

Pamong Didik - Media Pembelajaran - IPA - Energi Panas dan Bunyi
Media Pembelajaran - IPA - Energi Panas dan Bunyi

Untuk materi pembelajarannya silahkan dilihat pada tampilan dibawah ini, semoga bermanfaat.





Kamis, 13 November 2014

Download Template Powerpoint Gratis : Hi-Tech

image

Di tengah beberapa aktivitas, saya mencoba kembali membuat kreasi template (tema) powerpoint dengan style futuristic. Template ini saya buat dengan memadukan gambar dan beberapa shape. Anda dapat menggunakan template ini untuk presentasi maupun sebagai template media pembelajaran interaktif. Tentu saja GRATIS alias tak perlu membeli untuk menggunakan template yang saya beri nama Hi-Tech ini.

Harapan saya apa yang sudah saya buat ini dapat bermanfaat lebih luas. Silahkan dishare agar dapat digunakan oleh banyak pihak. Masukan untuk perbaikan sangat saya harapkan. Terima kasih !

Jika anda menginginkan memesan template yang lain

Silahkan hubungi kami di nomor HP/WhatsApp 081567814148

Kami layani sesuai keinginan anda

 

Download Template Powerpoint Hi-Tech : [klik di sini]

Senin, 10 November 2014

Contoh soal menyusun kalimat menggunakan Microsoft Mouse Mischief

 
Presentasi Pembelajaran menggunakan aplikasi microsoft Mouse Mischief
Presentasi Pembelajaran - PamongDidik. Presentasi media ajar pembelajaran dengan materi menyusun kalimat dalam pelajaran Bahasa Inggris tingkat SMP / MTs kelas IX, materi ini dibuat dengan menggunakan aplikasi mouse mischief sehingga ketika melakukan proses pembelajaran jadi lebih menarik dan atraktif lagi.

Selasa, 28 Oktober 2014

Media Pembelajaran - Mengenal Lingkungan Alam dan Buatan

 
Pamong Didik - Media Pembelajaran - Mengenal Lingkungan Alam dan Buatan
Media Pembelajaran - Mengenal Lingkungan Alam dan Buatan

Media Pembelajaran - Pamong Didik. Mengenalkan aneka macam Lingkungan Alam dan Buatan disekitar kepada para anak didik dengan bahan ajar pembelajaran berbasis presentasi akan sangat menarik diberikan. Bahasan mengenai aneka lingkungan alam dan lingkungan buatan serta manfaat dan tata cara pemeliharaannya akan menjadi lebih mudah diajarkan.

Silahkan simak dan perhatikan bahan ajar pembelajaran yang saya berikan ini, semoga bermanfaat.






Minggu, 14 September 2014

Tutorial Cara Memasang Powerpoint Online

Selain kita bisa menikmati tayangan slide Powerpoint secara offline, kini secara online pun kita bisa menikmatinya. Untuk dapat menggunakana layanan online Powerpoint ini kita dapat menggunakan penyedia layanan drive online, di antaranya Microsoft OneDrive yang bisa diakses di alamat http://onedrive.live.com/ . Di sini kita mendapatkan drive sebesar 15 GB secara gratis.


Berikut ini tutorial cara memasang powerpoint online di Microsoft OneDrive :



Semoga bermanfaat !

Sabtu, 05 Juli 2014

Kumpulan Website Tempat Download Template PowerPoint Gratis

Template PowerPoint dengan theme yang sesuai dan background yang menawan akan membantu Anda untuk desain slide presentasi yang menarik.



Berikut ini 15 websites untuk download template PowerPoint gratis. Selamat mengoleksi.

      Memiliki 646 templates dan themes PowerPoint gratis. Update: nama situs sekarang berubah menjadi Presentation Magazine.

          Memiliki template dan background PowerPoint dengan berbagai kategori: abstrak, bisnis, keuangan, pemandangan alam, tempat wisata, dan lain-lain.

          Download kumpulan template gratis dalam satu paket. Rancangan template memiliki tampilan yang elegan dan juga terdapat grafik SmartArt yang menawan.

          Memiliki berbagai tema dan warna templates PowerPoint. Situs ini juga memberikan template gratis dengan tema peta-peta negara di dunia.

          Situs ini memiliki kumpulan template PowerPoint yang unik. Master Templates Memiliki kumpulan template yang menarik. Setiap template terdiri dari title master page, slide master page, dan 3 backgrounds. Presentation Point Memiliki kumpulan template PowerPoint yang elegan dan unik.

          • Power-templates.com
          Memiliki template PowerPoint dengan berbagai tema, yang berhubungan dengan bisnis, pendidikan, medis, pernikahan, sains, dan banyak lagi. Update: Situs ini sudah tidak aktif.

          Template PowerPoint yang disediakan memiliki tema yang beragam dan terbagi dalam berbagai warna.

          Memberikan template PowerPoint gratis beserta file button (format JPG dan PNG) untuk digunakan sebagai action button atau hyperlink pada slide.

          Memiliki banyak kumpulan template dengan tema abstrak dan juga background animasi. inspired piece Ada banyak themes PowerPoint yang terdapat di situs ini.

          Di sini, Anda bisa mendapatkan template untuk PowerPoint 2003, 2007, 2010, dan 2013. Memiliki banyak template berkualitas tinggi dengan berbagai tema, seperti akademis, bisnis, hobi, teknologi, dan lain-lain.

          Memiliki kumpulan template dengan warna background yang elegan. Template yang disediakan juga kompatibel dengan Open Office, Google Doc atau Keynote. Perlu registrasi untuk mendapatkan template PowerPoint.

          Memiliki template gratis untuk title slide. Perlu registrasi untuk download atau klik tombol Like Facebook, Tweet, atau Google+.






          Memiliki kumpulan template yang menarik. Setiap template terdiri dari title master page, slide master page, dan 3 backgrounds.



          Memiliki kumpulan template PowerPoint yang elegan dan unik.





          Ada banyak themes PowerPoint yang terdapat di situs ini.




          Sumber : 15 Websites untuk Download Template PowerPoint Gratis

          Dan juga saya ingin menambahkan situs yang menjadi tempat sering saya melakukan download template powerpoint lainnya adalah

          Pada situs ini kita akan disediakan beragam template powerpoint beserta bagian-bagian dari tema, chart, serta elemen-elemen lain yang beragam

          yang pada situs ini merupakan bagian dari situs Graphicriver, sehingga banyak template-template bagus didalamnya. 

          Senin, 25 November 2013

          Download Animasi Pembiasan Cahaya

           

          Cahaya dapat mengalami pembiasan. Pembiasan cahaya terjadi bila cahaya melewati batas dua medium yang berbeda kerapatannya (misalnya udara dengan air), ditandai dengan pembelokan cahaya pada bidang batas tersebut.

          HUKUM PEMBIASAN CAHAYA (HUKUM SNELLIUS)

          1. Sinar datang, sinar bias dan garis normal terletak pada satu bidang datar.
          2. Jika sinar datang dari medium yang kurang rapat menuju medium yang lebih rapat, sinar akan dibiaskan mendekati garis normal. Jika sinar datang dari medium yang lebih rapat menuju medium yang kurang rapat, sinar akan dibiaskan menjauhi garis normal.

          Untuk download animasi pembelajaran sains untuk materi pembiasan : [ klik di sini]

          image

          Senin, 31 Desember 2012

          Menampilkan dan Menyembunyikan Gambar dengan VBA

          Sahabat Sang Pengajar..kita lanjutkan belajar kita mengenai pemrograman menggunakan Visual Basic for Application (VBA) pada Microsoft Office Powerpoint. Kali ini kita akan mempelajari cara menampilkan dan menyembunyikan gambar dengan menggunakan VBA. Cara ini lebih efektif dan efisien daripada menggunakan efek animasi pada Powerpoint.

          image

          Untuk membuatnya siapkan gambar-gambar yang akan ditampilkan. Dalam tutorial ini saya pilih 3 gambar binatang, yaitu kucing, ayam, dan harimau. Langkah-langkahnya adalah sebagai berikut :

          1. Pada slide 1 sisipkan 3 buah gambar tersebut denga Insert > Picture.

          2. Kemudia ubah nama gambar dengan cara klik gambar diikuti klik Format > Selection Pane. Ubah nama ketiga gambar menjadi kucing, ayam, dan harimau.

          image

          3. Buka jendela code VBA, kemudian ketikkan script berikut :

          Sub kucing()
          With ActivePresentation.Slides(1)
          .Shapes("kucing").Visible = msoTrue
          .Shapes("ayam").Visible = msoFalse
          .Shapes("harimau").Visible = msoFalse
          End With
          End Sub


          Sub ayam()
          With ActivePresentation.Slides(1)
          .Shapes("kucing").Visible = msoFalse
          .Shapes("ayam").Visible = msoTrue
          .Shapes("harimau").Visible = msoFalse
          End With
          End Sub


          Sub harimau()
          With ActivePresentation.Slides(1)
          .Shapes("kucing").Visible = msoFalse
          .Shapes("ayam").Visible = msoFalse
          .Shapes("harimau").Visible = msoTrue
          End With
          End Sub

          4. Buatlah 3 buah tombol untuk mengeksekusi masing-masing gambar, yaitu tombol Kucing, Ayam, dan Harimau.

          5. Hubungkan tiap tombol dengan Run macro sebagai berikut : tombol Kucing dengan Run Macro kucing, tombol Ayam dengan Run Macro ayam, dan tombol Harimau dengan Run Macro harimau.

          image

          6. Simpan file dalam format Powerpoint Macro-enabled Presentation kemudian jalankan dengan menekan tombol F5.

          Untuk lebih jelasnya silahkan download file pemrograman menampilkan dan menyembunyikan gambar ini dengan [klik di sini].

          Mudah bukan ? Jangan lupa berikan komentar di bawah artikel ini, ya. Selamat belajar !

          Minggu, 30 Desember 2012

          Simulasi Luas dan Keliling Persegi

          Sahabat Sang Pengajar….kali ini kita akan melanjutkan belajar kita mengenai pemrograman VBA pada Microsoft Office Powerpoint. Aplikasi yang akan dibuat adalah simulasi luas dan keliling persegi pada persegi panjang. Dengan simulasi ini kita akan mengetahui perubahan luas dan keliling pada bangun persegi maupun persegi panjang jika panjang dan lebarnya kita ubah.

          image

          Untuk membuat simulasi ini pada slide kita pasang 1 buah shape rectangle, 1 buah tabel dengan 6 baris dan 6 kolom, 2 buah SpinButton dari developer(SpinPanjang dan Spin Lebar), serta beberapa teks seperti pada gambar di atas. Prinsip pembuatannya adalah ubah panjang dan lebar shape reactangle, nilai panjang, nilai lebar, luas, dan keliling sesuai dengan nilai yang diberikan pada SpinPanjang dan SpinLebar. Berikan bilangan pengali sehingga pertambahan panjang dan lebar shape rectangle sesuai dengan panjang dan lebar tabel.

          Mudah bukan…silahkan dipelajari sendiri, ya……Untuk download file ini silahkan [klik di sini]. Semoga artikel mengenai simulasi luas dan keliling persegi ini bermanfaat. Jangan lupa untuk memberikan komentar di bawah posting ini.

          Kamis, 20 Desember 2012

          Animasi Gerak Mobil dengan Powerpoint

          Sore ini sambil mengisi waktu saya mencoba membuat sebuah animasi gerak mobil. Terinspirasi materi animasi yang saya dapatkan sebelumnya, saya tertarik untuk membuatnya. Langsung ingat dengan Powerpoint, software sejuta umat.

          image

          Untuk gambar mobil, marka, lampu lalu lintas maupun jalan raya saya buat dengan menggabungkan beberapa shape. Agar lebih menarik setiap mobil diberi animasi sesuai denga gerak mobil yang diinginkan. Tentu saja dengan mengatur mana gerak yang didahulukan dan mana yang selanjutnya (with previous – after previous). Setelah selesai maka semua animasi di triggerkan dengan tombol mulai. Penasaran?

          Silahkan coba membuatnya. Saya yakin anda akan membuat jauh lebih baik lagi. Sebagai referensi silahkan download file yang saya buat ini dengan [klik di sini]. Selamat mencoba !

           

          Salam Sang Pengajar

          Selasa, 18 Desember 2012

          Tutorial Membuat Quiz Penjumlahan Secara Random dengan VBA

          Apa kabar sahabat Sang Pengajar??? Baik-baik saja, bukan…..Kali ini kita akan melanjutkan belajar kita mengenai Visual Basic for Application(VBA) pada Microsoft Office Powerpoint. Belajar kita kali ini adalah membuat soal penjumlahan secara random. Penasaran, kan? Yuk kita mulai belajar kita.

          image

          Langkah-langkah pembuatan quiz penjumlahan secara random adalah :
          1. Buka Microsoft Office Powerpoint dan buatlah 3 slide baru
          2. Pada masing-masing slide tambahkan Teks dan Shape sebagai berikut :

          image

          3. Buka jendela code VBA kemudian Insert > Module, copykan Script VBA berikut ini :

          Dim JumlahBenar As Integer
          Dim JumlahSalah As Integer
          Dim nama As String


          Sub Mulai()
              JumlahBenar = 0
              JumlahSalah = 0
              Randomize
              NamaSiswa
              ActivePresentation.SlideShowWindow.View.Next
          End Sub

          Sub NamaSiswa()
              nama = InputBox("Tuliskan namamu")
          End Sub


          Sub Benar()
              JumlahBenar = JumlahBenar + 1
              MsgBox "Jawabanmu benar, " & nama
          End Sub


          Sub Salah()
              JumlahSalah = JumlahSalah + 1
              MsgBox "Jawabanmu salah, " & nama
          End Sub


          Sub Tampilkan()
              MsgBox "Kamu mengerjakan dengan benar " & JumlahBenar & " dari " _
                  & JumlahBenar + JumlahSalah & ", " & nama
          End Sub


          Sub SoalRandom()
              Dim BilanganSatu As Integer
              Dim BilanganDua As Integer
              BilanganSatu = Int(10 * Rnd)
              BilanganDua = Int(10 * Rnd)
              Jawab = InputBox("Berapakah " & BilanganSatu & " + " & BilanganDua & "?")
              If Jawab = BilanganSatu + BilanganDua Then
                  Benar
              Else
                  Salah
              End If
          End Sub

           

          4. Kemudian hubungkan tombol Mulai dengan Run Macro Mulai, Tombol Soal dengan Run Macro SoalRandom, Tombol Nilai diberi Hyperlink Next, dan Tombol Cek Nilai dengan Run Macro Tampilkan.

          image
          5. Quiz selesai dibuat. Silahkan tutup jendela code VBA dan jalankan quiz dengan menekan F5. 
          Mudah bukan??? Selamat berkreasi ya. Jangan lupa tinggalkan komentar anda sebagai masukan untuk perbaikan. Untuk lebih jelasnya silahkan download file quiz random ini dengan [klik di sini].

          Jumat, 14 Desember 2012

          MATERI DIKLAT MULTIMEDIA PEMBELAJARAN INTERAKTIF

           

          Pada tanggal 11-15 Desember 2012 bertempat di LPMP Provinsi Jawa Tengah diadakan Diklat Pembuatan Multimedia Pembelajaran Interaktif bagi guru yan sebelumnya mengikuti Lomba Multimedia Pembelajaran di LPMP. Materi yang disajikan pada diklat ini antara lain :

          1. Konsep ICT based Learning

          2. Storyboard dan GBIM

          3. DKV

          4. PPT Image Processing

          5. Animasi Pembelajaran

          6. Template Design

          7. VBA Programming

          8. Audio-Video Recording

          clip_image002

          Kesempatan pertama menjadi narasumber di LPMP diberikan kepada saya. Materi yang saya sampaikan adalah PPT Image Processing dan VBA Programming.

          image
          Bagi sahabat sang pengajar yang menginginkan materi ini silahkan download :

          1. Presentasi Materi VBA Programming [klik di sini]

          2. Presentasi Materi PPT Image Processing [klik di sini]

          3. Simulasi Luas dan Keliling Persegi Panjang [klik di sini]

          4. Simulasi dan Animasi Luas dan Keliling Persegi Panjang [klik di sini]

          Minggu, 02 Desember 2012

          Membuat Animasi Pencampuran Warna dengan Powerpoint

          Sahabat Sang Pengajar, untuk posting kali ini kita akan belajar cara membuat animasi pencampuran warna dengan Powerpoint. Animasi ini bisa diperuntukkan pembelajaran mengenai warna dan pencampuran warna. Tidak perlu panjang lebar berikut ini animasi pencampuran warna yang akan kita buat.

          image

          1. Untuk membuatnya kita mulai dengan insert > shapes > pilih shapes yang oval. Kemudian letakkan pada slide.
          2. Buat satu shape lagi dan letakkan di sebelah kanan shape sebelumnya.
          3. Beri warna pada kedua shape tersebut seperti pada gambar di atas. 
          4. Beri animasi pada shape kedua dengan animasi Motion Paths > Left.
          5. Lengkapi animasi pada shape serta hubungkan dengan tombol mulai animasi seperti pada gambar di bawah ini :

          image

           

          Untuk lebih jelasnya silahkan download file animasi pencampuran warna dengan [klik di sini]. Selamat belajar, jangan lupa tinggalkan komentar anda, ya !

          Sabtu, 01 Desember 2012

          Pemrograman VBA untuk Memperbesar dan Mempekecil Shape

          Sahabat Sang Pengajar, kita akan kembali melanjutkan belajar kita mengenai pemrograman Visual Basic for Application(VBA) pada Microsoft Office Powerpoint. Tema yanh akan kita pelajari adalah pemrograman VBA untuk memperbesar dan memperkecil shape. Dengan pemrograman ini kita tidak perlu membuat dua slide atau lebih untuk membuat animasi shape menjadi lebih besar atau lebi h kecil.

          image  image

          Untuk membuat program ini cukup dengan membuat module kemudian kita buat 2 sub, sebagai berikut :

          'Sub untuk memperbesar shape
          Sub Besarkan(myShape As Shape)
              myShape.Height = myShape.Height * 2
              myShape.Width = myShape.Width * 2
              myShape.ActionSettings(ppMouseClick).Run = "Kecilkan"
          End Sub


          'Sub untuk memperkecil shape
          Sub Kecilkan(myShape As Shape)
              myShape.Height = myShape.Height / 2
              myShape.Width = myShape.Width / 2
              myShape.ActionSettings(ppMouseClick).Run = "Besarkan"
          End Sub

           

          Jika sudah silahkan simpan dalam type Powerpoint macro-enabled Presentation(pptm). Mudah bukan? Untuk download file ini silahkan [klik di sini]

          Selasa, 27 November 2012

          Quiz dengan VBA Versi BARU

          Perkembangan dunia multimedia pembelajaran semakin pesat. Kini semakin banyak software yang digunakan untuk membuat multimedia pembelajaran interaktif atau yang lazim disebut MPI. Mulai dari Microsoft Office Powerpoint, Macromedia Flash, Adobe Profesional Flash, Autoplay, Swishmax, Lectora, hingga Aurora 3D Presentation.
          Untuk membuat quiz dengan menampilkan nilai siswa biasanya masih didominasi penggunaan flash, wondershare quiz creator, maupun Visual Basic for Application(VBA) pada Microsoft Office Powerpoint. Quiz yang menggunakan VBA pada Microsoft Office Powerpoint dulu hanya menggunakan script VBA yang dipasang pada module saja. Kini mulai dikembangkan dengan memberi script VBA pada slide maupun control.
          Prinsip dari pembuatan quiz ini adalah program atau perintah ketika suatu kontrol di klik atau diberi data input akan ditampilkan di kontrol tertentu pada slide yang lainnya.
          Penasaran, kan ? Silahkan download dan pelajari sendiri cara pembuatan Quiz dengan VBA versi baru ini [klik di sini]

          Sabtu, 02 Juni 2012

          MEMBUAT APLIKASI PENGENALAN ANGKA UNTUK ANAK DENGAN VBA PADA POWERPOINT

          Pengetahuan itu bukanlah salinan dari obyek dan juga bukan berbentuk kesadaran apriori yang sudah ditetapkan di dalam diri subyek, ia bentukan perseptual, oleh pertukaran antara organisme dan lingkungan dari sudut tinjauan biologi dan antara fikiran dan obyeknya menurut tinjauan kognitif.
          Piaget, dalam Bringuier, 1980, hlm. 110.

          Dunia anak adalah dunia bermain. Masa di mana anak memiliki kecenderungan senang bermain. Tetapi, kita juga mengetahui bahwa masa kanak-kanak adalah masa perkembangan kecerdasan, di mana anak bisa menyerap pembelajaran yang kita berikan secara optimal.
          Jean Piaget (1896-1980), pakar psikologi dari Swiss, mengatakan bahwa anak dapat membangun secara aktif dunia kognitif mereka sendiri. Dalam pandangan Piaget, terdapat dua proses yang mendasari perkembangan dunia individu, yaitu pengorganisasian dan penyesuaian (adaptasi).

          Di sini jelas sekali bahwa kemampuan kita mengorganisasikan anak dalam belajarnya sangatlah berperan, selain kemampuan anak beradaptasi dengan pembelajaran yang kita lakukan. Sehingga, kemampuan kita dalam metode maupun media pembelajaran sangat dibutuhkan.
          Salah satu aplikasi yang bisa kita maksimakan untuk media pembelajaran adalah Microsoft Office Powerpoint yang telah dilengkapi dengan aplikasi pemrograma visual basic (VBA). Kali ini kita akan membuat aplikasi yang sederhana, yaitu aplikasi pengenalan angka untuk anak, sebagai berikut :



          Cara kerja aplikasi ini adalah anak diminta klik tombol “GANTI ANGKA” sambil kita dampingi belajarnya, kemudian anak kita minta menyebutkan angka berapakah yang muncul. Agar lebih menyenangkan maka kita beri pujian pada anak jika mereka benar dalam menyebutkan angka, dan memberi arahan jika anak belum benar menyebutkan angkanya.

          Untuk membuat aplikasi ini sangatlah mudah. Pertama, silahkan buka Microsoft Office Powerpoint. Kemudian buatlah satu shape oval dengan cara klik Insert > Shapes > Oval. Beri nama shapes ini dengan cara klik shapes oval > Format > Selection Pane > ubah menjadi Oval_txt. Lalu tambahkan satu buah command button dari menu Developer dengan cara klik Developer > Command Button (ActiveX Control) > Drag and Drop sesuai keinginan di slide. Kemudian, ubah propeties Command Button dengan klik kanan pada Command Button. Beri label tombol tersebut dengan mengubah caption menjadi “GANTI ANGKA”.

          Langkah selanjutnya klik 2x pada Command Button GANTI ANGKA tersebut, ketikkan kode VBA sebagai berikut :

          Private Sub CommandButton1_Click()
          ActivePresentation.Slides(1).Shapes("Oval_txt").TextFrame.TextRange.Text = Int(50 * Rnd + 1)
          End Sub



          Kode tersebut untuk membuat angka random antara 1 sampai 50. Anda bisa merubahnya sesuai tahap belajar anak. Jika sudah tambahkan gambar sebagai background agar lebih menarik. Simpan aplikasi yang telah anda buat dengan Save As > beri nama file > pilih Save As Type : Powerpoint Maco-Enabled Presentation. Aplikasi siap dijalankan dengan klik slide show atau klik F5. Mudah bukan?

          Aplikasi ini bisa anda download dengan klik di sini. Semoga bermanfaat.


          Selasa, 13 Maret 2012

          Tutorial Membuat Media Berhitung untuk Anak dengan VBA pada Powerpoint



          Apa kabar sahabat ?, pada kesempatan ini kita akan belajar kembali mengenai pemrograman pada powerpoint menggunakan visual basic for aplication (VBA). Kali ini kita akan membuat program yang sangat sederhana, yaitu media berhitung untuk anak yang memuat penjumlahan dan pengurangan seperti ditunjukkan pada gambar di bawah ini :


           Untuk membuatnya ikuti langah-langkah di bawah ini :

          • Bukalah Program Microsoft Office Powerpoint kemudian pilih layout blank
          • Klik menu developer dan insert delapan buah Text Box, dan tiga buah Command Button, lalu atur properties masing-masing :

          Kontrol

          Name

          Caption

          TextBox1

          a

           

          TextBox2

          b

           

          TextBox3

          c

           

          TextBox4

          keterangan

           

          TextBox5

          d

           

          TextBox6

          e

           

          TextBox7

          f

           

          TextBox8

          keterangan2

           

          CommandButton1

          cek

          CEK

          CommandButton2

          cek2

          CEK

          CommandButton3

          Reset

          RESET

          •  Pasang kode VBA di masing-masing CommandButton dengan cara klik dua kali pada masing-masing tombol dan ketikkan kode VBA sebagai berikut :

          Nama Kontrol

          Caption

          Kode VBA

          CommandButton1

          CEK

          Private Sub Cek_Click()

          Call Rumus

          End Sub

          CommandButton2

          CEK

          Private Sub Cek2_Click()

          Call Rumus2

          End Sub

          CommandButton3

          RESET

          Private Sub Reset_Click()

          a = ""

          b = ""

          c = ""

          d = ""

          e = ""

          f = ""

          keterangan = ""

          keterangan2 = ""

          End Sub

          • Pasang juga kode VBA di bagian General sebagai berikut :

          Sub Rumus()

          If c = Val(a) + Val(b) Then keterangan = "benar"

          If c <> Val(a) + Val(b) Then keterangan = "salah"

          End Sub

           

          Sub Rumus2()

          If f = Val(d) - Val(e) Then keterangan2 = "benar"

          If f <> Val(d) - Val(e) Then keterangan2 = "salah"

          End Sub

          • Atur tampilan agar lebih menarik dengan menambahkan background, shape, maupun picture yang kita inginkan.
          • Simpan file dalam format pptm
          • Jalankan program yang telah anda buat.

          Mudah bukan. Salam Sang Pengajar !

           

           

          Arsip Blog