pak Harry.. untuk penambahan, bentuk dasarnya adalah seperti ini:
A + B + C + ... + Z setiap variabel A, B, C, sampai Z di atas silakan diganti dengan nama textboxnya, perhatikan bahwa untuk penambahan menggunakan tanda + jika ingin melakukan pengurangan tinggal ganti tanda + menjadi - jika ingin melakukan perkalian tinggal ganti tanda + menjadi * jika ingin melakukan pembagian tinggal ganti tanda + menjadi tanda / Jan kira hal tersebut mudah dimengerti dan bisa diterapkan dalam berbagai macam jumlah textbox, mulai dari 2 buah textbox sampai 1 juta textbox juga bisa selama formnya mencukupi Jan hanya memberikan penjelasan tentang hal-hal yang mendasar, untuk solusinya silakan dicoba sendiri -Miss Jan Raisin- Pada 13 November 2013 16.32, Harry <[email protected]> menulis: > > > Dear BeExceller, > > Menyambung Scrip yang diberikan Pak Bagus, hasilnya sesuai dengan apa yang > saya maksudkan dengan pertanyaan saya pada Studi Kasus. > Setelah dituangkan pada Workbook saya ternyata masih mengalami beberapa > kendala. Apapun situasi pada Studi Kasus yang saya lampirkan hanya memiliki > 2 (dua) TextBox sementara pada workbook saya ada lebih dari 10 (sepuluh) > TexBox. Misalnya txtJUMLAH, txtJUMLAH2, txtJUMLAH3, txtJUMLAH4, txtJUMLAH5, > txtJUMLAH6, txtJUMLAH7, txtJUMLAH8, txtJUMLAH9, txtJUMLAH10 dan, > txtJUMLAH11. > > Saya sudah mencuba dengan menggunakan Scrip sbb: > > *Private Sub txtJUMLAH_Change()* > * If IsNumeric(txtJUMLAH.Text) And IsNumeric(txtJUMLAH2.Text) **And > IsNumeric(txtJUMLAH3.Text) Then* > * txtTOTAL.Text = txtJUMLAH.Text - txtJUMLAH2.Text** - > txtJUMLAH3.Text* > * End If* > *End Sub* > > *Private Sub txtJUMLAH2_Change()* > * If IsNumeric(txtJUMLAH.Text) And IsNumeric(txtJUMLAH2.Text) ** And > IsNumeric(txtJUMLAH3.Text) Then* > * txtTOTAL.Text = txtJUMLAH.Text - txtJUMLAH2.Text** - > txtJUMLAH3.Text* > * End If* > *End Sub* > > Tetapi masih Error. > Dengan kata lain saya bermaksud menjumlahkan banyak TexBox sekaligus. > Mohon bantuan teman-temen BeExceller akan hal tersebut diatas. > Sebelum dan sesudahnya saya mengucapkan terima kasih, > > > Regards, > > > > Harry > > >
