24 Januari 2017

Penjumlahan antara dua buah TextBox

Kemaren ada proyek iseng-iseng buat aplikasi lagi yang bisa menunjang pekerjaan dikantor pake VBA, dimana ada kolom penjumlahan dua buah textbox, setelah beberapa hari nyari refrensi di mbah google akhirnya nemu juga, lupa dari mana sumbernya, kita langsung aja ya,

  1. langkah pertama buka dulu excel nya
  2. Kita buat dulu form nya dengan masuk ke menu VBA dengan cara menekan Alt + F11K
  3. Kita  buat form nya dengan cara Insert >> Form
  4. Buat tiga buah textbox dimana data yang ada pada textbox satu dan dua yang akan kita jumlahkan dan hasilnya akan muncul di textbox ketiga, kita masukkan rumus macro nya 

Private Sub TextBox2_change()
If TextBox1.Value = "" Or TextBox2.Value = "" Then
Exit Sub
End If
TextBox3.Value = Format(CDbl(TextBox1.Value) * CDbl(TextBox2.Value), "#,##0")
End Sub

dari rumus VBA diatas akan menghasilkan  nilai pada TextBox3  dalam bentuk nilai mata uang.
sekian dulu tips untuk Penjumlahan dua buah TextBox.
Salam...

3 komentar:

Harisul Ishbah mengatakan...
Komentar ini telah dihapus oleh pengarang.
Unknown mengatakan...

Gatot kodenya..textbox3 tdk bisa terisi sesuai fungsi kode itu..

hadi_wibowo80 mengatakan...

Kalau pembagian gimana mas.

CUSTOM SCRIPT