Simulasi Fisika dengan Visual Basic Application (VBA)

Simulasi dengan Visual Basic Application merupakan aplikasi tambahan yang terdapat di dalam aplikasi MO Excel 2007. Ada perbedaan antara simulasi dengan menggunakan standart MO Excel 2007 dengan menggunakan Aplikasi Visual Basic.

Pada simulasi dengan MO Excel 2007, ketika ingin dijalankan (run) maka dengan menekan F9 berkali-kali sehingga nampak simulasinya, kekurangannya nampak gerakan atau simulasi patah-patah atau putus-putus. Sedangkan pada simulasi dengan menggunakan Aplikasi Visual Basic gerakan simuluasi lebih bagus hanya dengan menekan Run pada Macro Visual Basic.

Sebagai contoh akan dijelaskan cara kerja untuk membuat simulasi gelombang menjalar dari kiri ke kanan. Data-data yang dibutuhkan ada 3 (tiga) variabel, yaitu:
(1) Koordinat x
(2) Koordinat y
(3) Fase

Selanjutnya

ikuti langkah-langkah berikut ini:

1. Ketikkan data koordinat x pada halaman kerja excel, dimulai pada cell A1 sebagai title koordinat x, pada cell B1 masukkan data = 0 (nol), selanjutnya pada C1 =B1+0,1 lalu tekan enter
2. Copy vaste (Fill Handle) data pada C1 untuk D1 sampai didapat data n1 = 30 atau bisa lebih
3. Pada cell A2 tuliskan title koordinat y
4. Selanjutnya pada cell B2 masukkan persamaan =sin(B1) lalu enter diperoleh hasil =0 (sin 0 = 0)
5. Copy vaste (Fill Handle) hasil B2 untuk C2 sampai data n1 = 30. Perhatikan gambar 1 di bawah ini
Gambar 1 tidak utuh (ada sebagian data yang tidak dapat diambil)


6. Insert grafik XY (Scatter), sehingga nampak grafik gelombang fungsi sinus, lihat gambar 2.

7. Nampak grafik yang belum dapat bergerak atau menjalar dari kiri ke kanan, untuk menggerakkannya diperlukan data tambahan yaitu fase gelombang. Fase bisa dimulai 0,1, 0,2, 0,3, 0,4, 0,5 dst. Sehingga kalau fase dimasukkan dalam persamaan y =sin(x+fase), maka akan menghasilkan grafik yang bergerak tapi masih manual. Lebih jelasnya ikuti langkah di bawah ini:
• Pada cell A3 tuliskan title Fase, kemudian pada cell B3 masukkan data 0,1
Perhatikan gambar 3.
• Kemudian pada persamaan di B2 ubah =sin(B1) menjadi =sin(B1+B3) kunci dengan menekan B3F4 sehingga rumusnya berubah menjadi =sin(B1+$B$3) lalu enter
• Copy vaste (Fill Handle) hasil pada cell B2 untuk C2, D2, E2, dst (sampai data 30)
• Silahkan ubah nilai pada cell B3 mulai dari 0,1, 0,2, 0,3, 0,4, dst
• Hasil ubahan data fase gelombang membuat grafik gelombang juga bergerak. Persoalannya cara kerjanya masih manual, nanti nilai pada fase diubah baru kemudian grafik simulasi juga bergerak.
  

Supaya simulasi grafik gelombang fungsi sinus bergerak secara otomatis maka Aplikasi Visual Basic dapat kita gunakan. Lanjutkan langkah-langkah berikut ini:

1. Pada Menu Bar klik Developer (bagi yang belum mengetahui cara mengaktifkan Visual Basic Application silahkan baca (di sini), bagi yang sudah aktif VBA-nya akan seperti gambar 4 no.1

2. Silahkan klik Visual Basic (Gambar 4 no. 2)
3. Muncul halaman kerja Aplikasi Visual Basic
4. Jika Anda mengetikkan data excel Anda pada Sheet 1 maka pada halaman kerja VBA Anda membuka sheet 1 (lihat gambar 5 no. 1)
5. Kemudian ketikkan script VBA pada sheet 1, dengan script berikut ini:
Sub simulasi()
For n = 1 To 1000
Range("B3").FormulaR1C1 = -n * 0.1
DoEvents
Next n
End Sub (Gambar 5 no. 2, silahkan pelajari script tersebut!)
6. Kembali ke halaman kerja MO Excel 2007 dengan cara klik ikon excel pada menu VBA (Gambar 5. no. 3)
7. Pada halaman kerja MO Excel 2007, klik ikon Macro dari Developer (Gambar 4 no. 3) kemudian muncul kotak dialog Macro (Gambar 6 di bawah ini)

8. Silahkan klik Run dan perhatikan bentuk simulasi gelombang berjalan