我想咨询一个问题啊

yiyi · 发表于 2005-4-7 10:09

我想咨询一个问题啊。怎么样才能从1一直排序的无穷大。而不用我一个一个的往表格里一个个的输入呢？谢谢

james.wan · 发表于 2005-4-7 11:54

QArSTld9.rar (5.66 KB, 下载次数: 19)

yiyi · 发表于 2005-4-7 14:02

谢谢啊啊。这么厉害啊。怎么弄的啊。

cpali3023 · 发表于 2005-4-7 17:20

这样写代码可能简单一些，它可以第一个数值为起始数值向下按行数自动加总写入。
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Cells(Target.Cells(1, 1).Row, 1) = Target.cells(1,1).Row - [a1].End(xlDown).Row + [a1].End(xlDown)
End Sub

[此贴子已经被作者于2005-4-7 17:23:23编辑过]

ladhome · 发表于 2005-4-8 01:09

B列输入时,A列自动生成序号,不是更方便了吗?

ZaPBEu4x.rar (1.53 KB, 下载次数: 9)

yiyi · 发表于 2005-4-8 08:20

怎么都这么厉害啊。谢谢啊。我一直喜欢用excel却真的没有想到我想要怎么样。就可以怎么样。谢谢大家啊。ladhome姐姐用的没有宏啊。个怎么弄的呢?还有啊。为什么大家都有这个等级：高级一

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

[求助] 我想咨询一个问题啊

这样能实现你的要求不？

回复：（yiyi）我想咨询一个问题啊