文本框方程的變量回答另一個文本框

我想進入與細胞（V38）的值乘時，能夠從textbox5使用的值，並將它顯示答案textbox7文本框方程的變量回答另一個文本框

Private Sub TextBox7_Change() 
Dim value As Integer 
If TextBox5.value > 0 Then 
    TextBox7.value = TextBox5.value * Sheet1(v38).value 
Else 
    Me.TextBox7.value = 0 
End If 
End Sub

來源

2017-06-23 Tim

更具體，你想什麼，以實現和你做了什麼至今。你是否有任何錯誤，如果是的話顯示它們。想象一下，你正在回答某個人的問題，你需要什麼信息 – Skeptor

Textbox7_change事件會觸發一個無限循環..去Textbox5_change事件 –

所以這是我最終做到的，它運作良好。

Private Sub TextBox5_Change() 
 
On Error Resume Next 
 
Dim value As Integer 
 
On Error Resume Next 
 

 
If TextBox5.value > 0 Then 
 
TextBox7.value = Round(TextBox5.value * Range("v38"), 1) 
 
Else 
 
    Me.TextBox7.value = 0 
 
DoEvents 
 
End If 
 

 
End Sub

來源

2017-06-29 06:20:19 Tim

文本框方程的變量回答另一個文本框

回答

相關問題