请问如何向一个空列填入数据

threshold1980 · 发表于 2013-6-8 18:09

本帖最后由 threshold1980 于 2013-6-9 16:21 编辑

比如一个表有两个字段，第一个字段有内容，第二个字段均为空
如何用vba 将第二个字段从头到尾填入从1递增的数字呢

比如目前是这样
A B
a
s
d
f

我想让他变这样
A B
a 1
s 2
d 3
f 4

谢谢大家

test.zip (25.55 KB, 下载次数: 6)

ASLXT · 发表于 2013-6-8 18:22

说不清楚,发一个实例上来

threshold1980 · 发表于 2013-6-8 18:29

ASLXT 发表于 2013-6-8 18:22
说不清楚,发一个实例上来

这有啥说不清的，一个表有两列，一列为空，我想把空的这列填上数字，而且是从1开始，依次加1递增的数字，你看这样说行不

smhf_6 · 发表于 2013-6-8 19:07

本帖最后由 smhf_6 于 2013-6-8 19:08 编辑

　这个不用VBA吧
　1、＝row()-1

2、B2输入1，B3开始　＝B2+1

3、前3格分别输入1、2、3,选中后双击，快速填充

threshold1980 · 发表于 2013-6-9 09:27

smhf_6 发表于 2013-6-8 19:07
　这个不用VBA吧
　1、＝row()-1

我怎么觉得你说的是excel啊，我说的是access，前两个没看懂，第三个方法试了不行啊，另外我主要是要写代码，这是功能之一，一定要用vba实现的

ASLXT · 发表于 2013-6-9 16:13

是要写代码，不过你连实例都不发上来，还要老师自己建表、添加数据？我不可能在word中给你写代码吧？错了会误导人的。

threshold1980 · 发表于 2013-6-9 16:22

ASLXT 发表于 2013-6-9 16:13
是要写代码，不过你连实例都不发上来，还要老师自己建表、添加数据？我不可能在word中给你写代码吧？错了会 ...

老师，已经上附件了

ly · 发表于 2013-6-9 17:19

threshold1980 发表于 2013-6-9 16:22
老师，已经上附件了

Id自动编号，不是已经有了吗？

threshold1980 · 发表于 2013-6-9 17:56

ly 发表于 2013-6-9 17:19
Id自动编号，不是已经有了吗？

我只是举个例子，我只是想比较简单易懂的说明我的问题，便于交流。我的实际应用会比这里描述的例子复杂的多，我只要知道了如何通过代码可控的插入我的数字，那么后续我的实际应用中就可以自由发挥了

		自动登录	找回密码
密码			免费注册