[已解决]在vba中使用INDEX随机取值的问题

海昌蓝

Sub 从指定区域内随机取一个单元格()
Sheet3.Cells(35, 2).Value = Application.WorksheetFunction.Index([a32:e33], RANDBETWEEN(1,2),RANDBETWEEN(1,5))
End Sub

结果运行后告诉我子程序或函数未定义，是哪里出问题了呢？

最佳答案

月排行榜 / 总排行榜

csmctjg

2013-6-3 19:03

Sub 从指定区域内随机取一个单元格()
Sheet3.Cells(35, 2).Value = Application.Index([a32:e33], Application.RandBetween(1, 2), Application.RandBetween(1, 5))
End Sub

跳转到最佳答案楼层

hwc2ycy

如果用的工作表函数，那要加worksheetfunction.前缀。

海昌蓝

我的函数里前面不是加了那个前缀了吗？？？

csmctjg

Sub 从指定区域内随机取一个单元格()
Sheet3.Cells(35, 2).Value = Application.Index([a32:e33], Application.RandBetween(1, 2), Application.RandBetween(1, 5))
End Sub