Excel实现窗口式数据输入

Excel能不能实现窗口式数据输入?

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

你可能喜欢

  • EXCEL人事管理系统
  • 数据透视表实例
  • 车辆管理系统软件
  • EXCEL数据透视表
  • 数据透视表练习
  • 数据透视表教程
  • Excel使用技巧大全(超
  • 仓库管理系统

Excel实现窗口式数据输入相关文档

最新文档

返回顶部