作者JieJuen (David)
看板Visual_Basic
标题[VBA ] 二维阵列中取出一维(一栏、一列)
时间Sat Dec 6 17:31:39 2008
各位好，
想请问VBA自己有没有什麽写法，
可取出二维阵列中的一维?
以下是用工作表函数完成的
在k第一栏中找第2小的数
Sub test()
Dim k(5, 5)
k(1, 1) = 3
k(2, 2) = 4
k(0, 0) = 2.5
k(1, 0) = 3.5
n = Application.Small(Application.Index(k, 0, 1), 2) '第1栏中取small
Debug.Print "n = " & n
End Sub
结果为
n = 3.5
(题外话,VBA也无SMALL函数..?)
--
※ 发信站: 批踢踢实业坊(ptt.cc)
◆ From: 218.164.49.208
※ 编辑: JieJuen 来自: 218.164.49.208 (12/06 17:32)