作者:乔山办公网日期:
返回目录:excel表格制作
从Excel工具栏中插入百一个VBA的控件-编辑框。
双击这个编辑框,进入VBA编程窗口。
删除原来的度所有内容,输入以下内容:
Private Sub TextBox1_LostFocus()
Range("A1").Value = TextBox1.Text
End Sub关闭编程窗口,回到Excel界面。
在编辑框中输入一个字专串。
用鼠标点击编属辑框之外的其它地方,看看所输入的字串是不是出现在A1
程序算出来正常。
效果如下图所示: