[已解决]请帮忙写个函数

皮皮2 · 发表于 2014-4-21 10:20

本帖最后由皮皮2 于 2014-4-21 14:49 编辑

请帮忙写个函数，把数据区的数据放到结果区。结果区现在看到的是做好的结果
具体见附件

求助.rar (16.8 KB, 下载次数: 30)

baksy · 发表于 2014-4-21 10:49

A2=IF(MOD(ROW()-1,51)=0,"/",INDEX(数据区!A:A,MOD(ROW()-1,51)+1))
B2=IF(MOD(ROW()-1,51)=0,"",INDEX(数据区!B:B,MOD(ROW()-1,51)+1))
C2=IF(MOD(ROW()-1,51)=0,"",OFFSET(数据区!$C$1,MOD(ROW()-1,51),INT((ROW()-1)/51)))
D2=IF(MOD(ROW()-1,51)=0,"","A"&INT((ROW()-1)/51)+1)

复制公式下拉。

皮皮2 · 发表于 2014-4-21 11:25

baksy 发表于 2014-4-21 10:49
A2=IF(MOD(ROW()-1,51)=0,"/",INDEX(数据区!A:A,MOD(ROW()-1,51)+1))
B2=IF(MOD(ROW()-1,51)=0,"",INDEX(数 ...

大神能在改进下吗，因为我的数据可能有10个，也可能有一万个。而且ID可能是含有字母、汉字和数字的混合文本。

ghostjiao · 发表于 2014-4-21 11:34

皮皮2 发表于 2014-4-21 11:25
大神能在改进下吗，因为我的数据可能有10个，也可能有一万个。而且ID可能是含有字母、汉字和数字的混合文 ...

VBA 吧

baksy · 发表于 2014-4-21 11:41

皮皮2 发表于 2014-4-21 11:25
大神能在改进下吗，因为我的数据可能有10个，也可能有一万个。而且ID可能是含有字母、汉字和数字的混合文 ...

公式中的51改成需要的数量。

baksy · 发表于 2014-4-21 11:51

本帖最后由 baksy 于 2014-4-21 11:53 编辑

皮皮2 发表于 2014-4-21 11:25
大神能在改进下吗，因为我的数据可能有10个，也可能有一万个。而且ID可能是含有字母、汉字和数字的混合文 ...

或者用以下公式替代51；
COUNT(数据区!C:C)

A2=IF(MOD(ROW()-1,COUNT(数据区!C:C))=0,"/",INDEX(数据区!A:A,MOD(ROW()-1,COUNT(数据区!C:C))+1))
B2=IF(MOD(ROW()-1,COUNT(数据区!C:C))=0,"",INDEX(数据区!B:B,MOD(ROW()-1,COUNT(数据区!C:C))+1))
C2=IF(MOD(ROW()-1,COUNT(数据区!C:C))=0,"",OFFSET(数据区!$C$1,MOD(ROW()-1,COUNT(数据区!C:C)),INT((ROW()-1)/COUNT(数据区!C:C))))
D2=IF(MOD(ROW()-1,COUNT(数据区!C:C))=0,"","A"&INT((ROW()-1)/COUNT(数据区!C:C))+1)

FnG · 发表于 2014-4-21 12:25

本帖最后由 FnG 于 2014-4-21 12:40 编辑

一定要用“/”隔开吗？
这个没用“/”隔开，数量随着你的行和列的增加自动变化
A、B两列公式通用：

=IF(ROW(A1)>COUNT(数据区!$A:$A)*(COUNT(数据区!$2:$2)-2),"",INDEX(数据区!A:A,MOD(ROW()-2,COUNT(数据区!$A:$A))+2))

复制代码

C列公式：

=IF(A2="","",OFFSET(数据区!C$1,MOD(ROW()-2,COUNT(数据区!$A:$A))+1,INT((ROW()-2)/COUNT(数据区!$A:$A))))

复制代码

备注公式：

=IF(A2="","","A"&INT((ROW()-2)/COUNT(数据区!A:A))+1)

复制代码

一万多数据迟早要换VBA做

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

[已解决]请帮忙写个函数

点评