[已解决]找出符合条件的最近日期

excelpub · 发表于 2012-9-2 21:25

与之前的题目相比，多了个前提条件，问题详见附件。

yanyongxia · 发表于 2012-9-2 21:37

i = 2
Do While Cells(i, 1) <> ""
If Range("c" & i) = "还款" Then
      Range("f5") = Range("a" & i)
      temp = Range("k2") - Range("a" & i)
      If temp > Range("f5") Then Range("f5") = temp
End If
i = i + 1
Loop

yanyongxia · 发表于 2012-9-2 21:38

为了不和你的值发生冲突，我把结果放到了F5单元格，你需要先将F5单元格设置为日期格式就行了。

yanyongxia · 发表于 2012-9-2 21:40

另外就是我对函数不是很了解，一般这样的问题我都是通过VBA完成的，我比较习惯于VBA，想达到什么目的就自己写一下就可以了。

lzclzch · 发表于 2012-9-2 21:40

这个最佳答案由 lzclzch 给出，感谢 lzclzch 的回答。

单击隐藏图章

本帖最后由 lzclzch 于 2012-9-2 21:41 编辑

=MAX(IF((C2:C13="还款")*(A2:A13<=K2),A2:A13))
数组公式

excelpub · 发表于 2012-9-2 23:15

yanyongxia 发表于 2012-9-2 21:40
另外就是我对函数不是很了解，一般这样的问题我都是通过VBA完成的，我比较习惯于VBA，想达到什么目的就自己 ...

我对VBA不熟，先收下，供以后学习，谢谢您热心指点！

286779240 · 发表于 2012-9-2 23:34

=MAX((C2:C13="还款")*(A2:A13<=K2)*A2:A13)

复制代码

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