Question

EXCEL中的VBA窗体文字框的代码的问题

EXCEL中的VBA窗体文字框的代码输入
Private Sub TextBox1_Change()
Sheets("输入").Range("e6").Value = UserForm1.TextBox1.Value
End Sub

Private Sub TextBox10_Change()
Sheets("输入").Range("e17").Value = UserForm1.TextBox10.Value
End Sub

Private Sub TextBox11_Change()
Sheets("输入").Range("h17").Value = UserForm1.TextBox11.Value
End Sub
为什么只有在文字框内输入内容的时候Excel单元格的内容才会同文字框一起改变，在不输入内容的时候原有数据不替换相应的单元格，怎么让它全部替换为文字框的内容呢？

Answer 1

按你目前的代码根本就实现不了，因为你不输入内容的话，textbox的change事件就不会触发。你可以考虑在窗体上加一个命令按钮，代码如下：
Private Sub CommandButton1_Click()
Sheets("输入").Range("e6").Value = UserForm1.TextBox1.Value

Sheets("输入").Range("e17").Value = UserForm1.TextBox10.Value

Sheets("输入").Range("h17").Value = UserForm1.TextBox11.Value

End Sub

Answer 2

不要用change事件吧？增加一个按钮，编写按钮的代码，当各文字框输入完毕后，按下按钮才对EXCEL对应单位格的值进行替换

Answer 3

你在文本框中输入内容的时候就会替换

追问

但是，如果我不输入内容它就不替换，比如box1中本来是数字5，但是单元格e6为7，如果从box1中输入2，e6也自动变为2了，但是如果什么也不动，box1中的数字还是1，单元格e6还是7，怎么让e6也是5呢？