复制代码 代码如下:
Private Sub TextBox1_Change()
ThisWorkbook.ActiveSheet.Range("J1") = TextBox1.Text
End Sub
利用这个代码可以写很多自动计算的Excel小模块了
当编辑框内容改变 对应的单元格也随着改变vba代码
类别：VBA 作者：码皇 来源：互联网 点击：
当编辑框内容改变 对应的单元格也随着改变vba代码
当编辑框内容改变，对应的单元格也随着改变
Private Sub TextBox1_Change()
ThisWorkbook.ActiveSheet.Range("J1") = TextBox1.Text
End Sub
利用这个代码可以写很多自动计算的Excel小模块了
Private Sub TextBox1_Change()
ThisWorkbook.ActiveSheet.Range("J1") = TextBox1.Text
End Sub
利用这个代码可以写很多自动计算的Excel小模块了
相关热词搜索：
vba 编辑框
