[求助]等差数列的EXCEL表格怎么做？

BABU

有A B C D E F 六个数，他们之间是等差数列，等差是4，如果我任意输入6个数字中的一个，其他5个应该该如果用EXCEL做出来。 请教大家拉！！[em01][em01][em01][em01][em01]

晓月清风

用VBA代码很麻烦,需要判断同行中某一单元格的值不为空，然后以该单元格为中心再计算其他单元格的值

下面的宏是假设C2单元格的值不为空，根据你的需要修改一下，粘贴到你相关的工作表中

Private Sub Worksheet_SelectionChange(ByVal Target As Range)

'假设第二行为胸围的数据行

'使用这个宏的话，还没填写数据前，从B2到H2的值分别为-4  0   4   8   12  16  20

'任意输入个值后按回车，即实现自动填充

[b2] = [c2] - 4

[c2] = [b2] + 4

[d2] = [b2] + 8

[e2] = [b2] + 12

[f2] = [b2] + 16

[g2] = [b2] + 20

[h2] = [b2] + 24

End Sub

[此贴子已经被作者于2005-7-19 11:20:39编辑过]

淼漫

试试

BABU

斑竹，谢谢你的指导，但与我问的问题相左，6不是初始值，是6个数字，是这样，我是做外贸的，一个样衣他有很多条码：                      条码        40     42     44     46     48     50     52     54                             胸围       114  118   122   126   130    134   138   142   我要输入的就是胸围这一列，一般定单就给一个条码的胸围，其实你就可以推算出其他条码的胸围，我就想能不能我输入其中一个条码的胸围，其他的就能计算出来了，不需要先选择区域，我感觉要编个程序。祝大家身体健康，工作顺利~~                          [em08][em08][em07]

晓月清风

输入的数字六是做为初始值，还是其中一个？如果是初始值的话，先选取要填空的单元格，如下图所示：



然后，选择“编辑”-“填充”-“序列”，在对话框中设置如下：



最后按"确定"即可