给vba插上翅膀，---在VBA中使用RUBY

figfig · 发表于 2010-5-8 23:40

Sub ruby2()
Set x = CreateObject("scriptcontrol")
x.Language = "rubyscript"
x.eval "a = [1,2,3,4,5]"

y = x.eval("a.select{|x| x>=4 }")
MsgBox Join(y, ",")

End Sub

figfig · 发表于 2010-5-8 23:59

Sub ruby2()
Set x = CreateObject("scriptcontrol")
x.Language = "rubyscript"
x.eval "a= [[1,15], [2,25], [3,35]]"

y = x.eval("a.rassoc(25)")
MsgBox Join(y, ",")

End Sub

ZDYCTD · 发表于 2010-5-9 12:28

占位学习！！

aidixiao · 发表于 2010-5-9 23:15

感谢大师的精彩讲座，要慢慢地消化吸收。

gxuan2008 · 发表于 2010-5-9 23:55

只光贴代码？
楼主还是来点语法解释吧。

HHAAMM · 发表于 2010-5-10 00:38

哦，是一种脚本语言

不知这种语言前景如何

Vacant001 · 发表于 2010-5-10 09:06

太多语言了，难活

lgcmeli · 发表于 2010-5-10 09:16

语言日新月异。

高玉甫 · 发表于 2010-5-10 10:16

下载了，学习了，谢谢了。

蓝桥玄霜 · 发表于 2010-5-10 12:03

谢谢figfig老师。收藏学习了。

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

给vba插上翅膀，---在VBA中使用RUBY

根据条件抽取数组一部分

搜索2维数组(相当于excel搜索任意一个单元格,返回整行数据)

回复 1楼 figfig 的帖子