请问excel如何实现当D列为非零时,F列的值等于A,D列为零时F列等于对应的C列的值在C列相同的A值的的汇集。

[复制链接]
查看11 | 回复4 | 2013-1-2 13:11:15 | 显示全部楼层 |阅读模式
Sub 在区域内重复查找()Dim arr(), brr(), crr, i%Dim rng As RangeDim Myg As StringApplication.DisplayAlerts = FalseOn Error Resume NextR = ActiveSheet.[D65536].End(xlUp).RowFor j = 1 To RIf Cells(j, 4)0 ThenIf Cells(j, 6)"" Then GoTo ACells(j, 6) = Cells(j, 1): GoTo AEnd IfSet rng = Range("D1:D" & R).Find(C...
回复

使用道具 举报

千问 | 2013-1-2 13:11:15 | 显示全部楼层
应该很简单,但是不明白你的“D列为零时F列等于对应的C列的值在C列相同的A值的的汇集。”是什么意思。...
回复

使用道具 举报

千问 | 2013-1-2 13:11:15 | 显示全部楼层
用筛选啦,先筛选出所有C列值为1的,然后写一个函数,以此类推啦...
回复

使用道具 举报

千问 | 2013-1-2 13:11:15 | 显示全部楼层
请问F14的值是怎么来的?是不是16行下面还有数字呢?试试下面的方法:ALT+F11——插入——模块——将下面的代码粘贴进去——运行(F5)键即可。Sub test()
Dim ar, br(1 To 10000), cr(1 To 10000, 1 To 1)
Dim i As Long, j As Long
ar...
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

主题

0

回帖

4882万

积分

论坛元老

Rank: 8Rank: 8

积分
48824836
热门排行