配列の最小値を取得するには？

解決

---

お世話になります。
いま配列  data(y,x)  に数値(整数、小数含)を格納してあります。
この配列の  data(y,3)  (・・・yは10000個くらい) の中の最小値
を取得したいのですが、どうも良い方法が思いつきません。
ご教授の程、よろしくお願いいたします。

編集 削除

---

何も考えずに
    Dim n As Long, mind
    mind = data(LBound(data), 3)
    For n = LBound(data) To UBound(data)
        If data(n, 3) < mind Then mind = data(n, 3)
    Next n
でいいのでは

編集 削除

---

ねろさんありがとうございました。
うまくいきました。m(_ _)m

編集 削除

---

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文

←解決時は質問者本人がここをチェックしてください。