Excel能不能实现窗口式数据输入?大神们帮帮忙
答案:1 悬赏:0 手机版
解决时间 2021-04-14 11:38
- 提问者网友:雾里闻花香
- 2021-04-14 07:11
Excel能不能实现窗口式数据输入? 我想EXCEL能帮我实现一个功能,以便快速输入数据,我是菜鸟,请详细解答. 我想在打开EXCEL的时候,能弹出一个窗口,窗口里可输入两组数据. 避如我在第一组数据里输入"4",每二组数据里输入50,然后按确定键,他应该会自动在EXCEL界面的每4行,A列自动输入50,然后窗口自动弹出,以便我输入第二组数据.如果在第4行A列先前已经有数据,避如是49,他应该自动加上以前的数据,在第4行A列输入的数值是99. 谢谢. 我刚才问过这个问题,但是还有最后一个问题没有解决, 就是输入完第一组数据后,按完确定键,如果输入无误,光标应该自动跳到第一个文本框。你给了我一个答案,但是运行不了。请再次帮忙。
最佳答案
- 五星知识达人网友:廢物販賣機
- 2021-04-14 07:41
其他代码不变,只改下面的 Private Sub CommandButton1_Click() If Not IsNumeric(TextBox1.Text) Then MsgBox "行号必须是数字", vbCritical, "提示" Exit Sub End If If Not IsNumeric(TextBox2.Text) Then MsgBox "内容必须是数字", vbCritical, "提示" Exit Sub End If Dim lngI As Double lngI = ActiveSheet.Range("A" & Int(TextBox1.Text)).Value ActiveSheet.Range("A" & Int(TextBox1.Text)).Value = lngI + TextBox2.Text ActiveSheet.Range("A" & Int(TextBox1.Text)).Select'加上这一句,工作表中选择新输入内容的单元格 TextBox1.Text = "" TextBox2.Text = "" TextBox1.SetFocus'加上这句,窗口上 选择第一个文框 End Sub
我要举报
如以上问答信息为低俗、色情、不良、暴力、侵权、涉及违法等信息,可以点下面链接进行举报!
大家都在看
推荐资讯