(赠送金币贴)如何编写公式统计以6和7为开头的数字

anntony · 发表于 2008-3-12 14:40

学习

yuanxitqm · 发表于 2008-3-12 18:22

学学

vanezh · 发表于 2008-3-12 19:27

学习一下

cqzm · 发表于 2008-3-12 22:36

眼睛弄花了没弄出来,我看看别人的吧

lafei_13 · 发表于 2008-3-13 08:02

能统计出数字和字母混合的，不会统计纯数字的

allsion · 发表于 2008-3-13 15:07

学习来着!

YX63 · 发表于 2008-3-14 17:20

学习

forza4inter · 发表于 2008-3-16 04:37

来学习一下

HYY514 · 发表于 2008-3-16 13:10

Sub fx() Dim a, c, n%, m% a = ActiveSheet.UsedRange For Each c In a If Val(Left(c, 1)) = 6 Then n = n + 1 If Val(Left(c, 1)) = 7 Then m = m + 1 Next MsgBox "6:" & n & "个" & vbCrLf & _        "7:" & m & "个" End Sub

ravine · 发表于 2008-3-17 17:37

学习

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