Excel表格不工作

Question

当涉及到Excel表单时，我是一个完全的新手，并且尝试创建下面的表单。我现在正试着让它和我的学生电子表格一起工作，但是它不起作用。

​

​

我在剧本上已经做了这么多，而且在选择学生名字方面似乎唯一有效的一点，没有什么是我所期望的，我也不知道我哪里出了问题。

​

​

这是为学校艺术部，以便他们可以从名单中选择一个学生，并应填写学生代码和学生表格字段。然后，他们应该能够在相关字段旁边添加学生购买的任何项目的数量，然后更新Excel电子表格中的相关字段。如果该字段中有一个退出号码，则需要将其添加到该数字中。

在这方面的任何帮助或建议都将是非常感谢的！

Answer 1

您可以使用RANGE函数来实现这一点。

例如，如果电子表格如下所示：

+------------+--------+------------+---------------+---------------+
| Pupil Code | Pencil | Edding Pen | A5 Spiral Pad | A6 Spiral Pad |
+------------+--------+------------+---------------+---------------+
| 10154      | 0      | 1          | 0             | 2             |
+------------+--------+------------+---------------+---------------+
| 10155      | 1      | 1          | 0             | 1             |
+------------+--------+------------+---------------+---------------+
| 10156      | 0      | 0          | 0             | 1             |
+------------+--------+------------+---------------+---------------+

您可以使用RANGE函数在电子表格中定位瞳孔代码，方法是：

Dim r as Range

For each r in Range("A2:A100")
   If r.Value = textboxPupilCode.Value Then
      textboxPencil.Value = r.Offset(0,1).Value
   End If
Next r

OFFSET函数是指从当前范围来看的单元格。在这种情况下，单元格的右边是关于瞳孔的代码。