VBA自动更新用户表单文本框

我试图用C2的值更新用户表单TextBox2 “需要的单元格数”。用户在TextBox1中输入单元格数,它就会更新单元格值A2,但我无法让它自动将C2的值传递给其他文本框。在C2中有一个简单的公式=(A2*2)+1,但我认为这不应该有问题。

Private Sub TextBox1_Change()
ThisWorkbook.Worksheets("Sheet2").Range("A2").Value = TextBox1.Value 
End Sub


Private Sub TextBox2_Change()

TextBox2.txtEcpNum.Text = CStr(Range("C2").Value) 
TextBox2.Show

End Sub

enter image description here

解决方案:

Textbox2_Change() 事件处理程序没有被调用,当 Textbox1_Change() 正被调用。您需要做的就是改变 Textbox2 换了 Textbox1,即在同一个事件处理程序中。即:

Private Sub TextBox1_Change()

    ThisWorkbook.Worksheets("Sheet2").Range("A2").Value = TextBox1.Value
    TextBox2.txtEcpNum.Text = CStr(Range("C2").Value) 
    TextBox2.Show 

End Sub

本文来自投稿,不代表实战宝典立场,如若转载,请注明出处:https://www.shizhanbaodian.com/139.html

(0)
上一篇 2022年5月29日 下午8:34
下一篇 2022年5月29日 下午8:34

相关推荐

发表评论

登录后才能评论