永发信息网

Excel能不能实现窗口式数据输入?大神们帮帮忙

答案:1  悬赏:0  手机版
解决时间 2021-04-14 11:38
Excel能不能实现窗口式数据输入? 我想EXCEL能帮我实现一个功能,以便快速输入数据,我是菜鸟,请详细解答. 我想在打开EXCEL的时候,能弹出一个窗口,窗口里可输入两组数据. 避如我在第一组数据里输入"4",每二组数据里输入50,然后按确定键,他应该会自动在EXCEL界面的每4行,A列自动输入50,然后窗口自动弹出,以便我输入第二组数据.如果在第4行A列先前已经有数据,避如是49,他应该自动加上以前的数据,在第4行A列输入的数值是99. 谢谢. 我刚才问过这个问题,但是还有最后一个问题没有解决, 就是输入完第一组数据后,按完确定键,如果输入无误,光标应该自动跳到第一个文本框。你给了我一个答案,但是运行不了。请再次帮忙。
最佳答案
其他代码不变,只改下面的 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
我要举报
如以上问答信息为低俗、色情、不良、暴力、侵权、涉及违法等信息,可以点下面链接进行举报!
大家都在看
如果有一天妈妈和妻子掉河里了你先救那一个?
坐公交怎么从下沙去胡雪岩故居?
邳州与灵璧最短路线是多少,怎么走
陈艾加醋泡脚的功效
苯中混有溴苯怎么除?溴苯中混有苯怎么除?
石膏板跟夹板哪个比较好?夹板能做造型吗?它
云南冰川公园的形成原因具体是冰川侵蚀这四类
dnf是什么?
单选题下列关于生物圈的说法,正确的是A.生物
德科汽车服务中心地址在什么地方,想过去办事
八年级下古诗中的名句,描写剪纸的诗句
结婚后我自己借钱买的车他没付一分钱 债务算
我是宫颈原位癌患者,刚做了子宫全切除手术一
如何建立自己的电影网站?哪位知道到的啊?成
错位相减杂闹??
推荐资讯
small什么意思?
红米Pro标准版和小米手机6对比哪个好
激光祛痣后好久又疼又痒怎么回事
张记麻辣烫烧烤在哪里啊,我有事要去这个地方
陈记炸酱面馆(后湖岱家山店)在哪里啊,我有事
男孩抽烟好吗?20多岁抽什么烟比较好?
4米12米的舞台屏幕分辨率
里比多(libido)是什么意思?
怎么用纸折指甲?最好发图
徕卡大m和m-p的区别
尖牙换不换??
福特至胜原车屏升级,导航盒上配来的专用线上
正方形一边上任一点到这个正方形两条对角线的
阴历怎么看 ?