asumsinya itu dia gak membaca ke range Mr, tapi dia langsung dikalikan dengan
textbox disitu,
dan menyalin ke Range, tetapi tidak membaca /mengambil dari range lagi, tetapi
apdetcontrolnya saya buat langsung pemanggil commanbutton seperti file yang
saya lampirkan tadi,
berikut scriptnya :
Private Sub CommandButton1_Click()
TextBox87.VALUE = Format((((Val(TextBox49.VALUE) * Val(TextBox50.VALUE) + _
Val(TextBox52.VALUE) * Val(TextBox51.VALUE) + _
Val(TextBox54.VALUE) * Val(TextBox53.VALUE) + _
Val(TextBox56.VALUE) * Val(TextBox55.VALUE) + _
Val(TextBox58.VALUE) * Val(TextBox57.VALUE) + _
Val(TextBox60.VALUE) * Val(TextBox59.VALUE) + _
Val(TextBox62.VALUE) * Val(TextBox61.VALUE) + _
Val(TextBox64.VALUE) * Val(TextBox63.VALUE)) + _
Val(TextBox66.VALUE) + Val(TextBox67.VALUE) + _
Val(TextBox69.VALUE) + Val(TextBox71.VALUE) + _
Val(TextBox73.VALUE) + Val(TextBox65.VALUE)) / _
Val(TBPV.VALUE)) / 10)
TextBox88.VALUE = Format((Val(TBPV.VALUE) * (Val(TextBox27.VALUE) * 10000000))
- _
Val(TBPV.VALUE) * (Val(TextBox87.VALUE) * 10000000))
End Sub
Hs,
M. Mirza
