Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちら をご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


62436 / 76732 ←次へ | 前へ→

【18903】Re:配列の最大値
発言  ichinose  - 04/10/15(金) 18:02 -

引用なし
パスワード
   ▼にゃんぎょ さん:
こんばんは。
>またまたお世話になりに伺いました。
>
>配列の中のデータの最大値を取得するにはどうしたらよいのでしょうか。
>過去ログに以下の例文がありました。
>
>Dim Max_Value As Integer
>Max_Value = WorksheetFunction.Max(Array(g, h, i, j, k, l, m, n))
>
>しかし今回の配列の添え字は可変です。
>
>Max_Value = WorksheetFunction.Max(Array())
>                   ↑ここをどうしたらよいかわからない。
>よろしくご指導お願いします。
'===================================================
Sub test()
  Dim a(1 To 10) As Long
  For i = 1 To 10
   a(i) = i
   Next
  '↑サンプル作成
  MsgBox WorksheetFunction.Max(a())
 
End Sub

とすればMaxは取得できますが、
配列を使用すると、添え字の上限がありますけどね
0 hits

【18896】配列の最大値 にゃんぎょ 04/10/15(金) 17:43 質問
【18897】Re:配列の最大値 IROC 04/10/15(金) 17:45 回答
【18899】Re:配列の最大値 にゃんぎょ 04/10/15(金) 17:51 質問
【18900】Re:配列の最大値 IROC 04/10/15(金) 17:58 回答
【18901】Re:配列の最大値 にゃんぎょ 04/10/15(金) 18:00 お礼
【18902】Re:配列の最大値 Asaki 04/10/15(金) 18:01 回答
【18903】Re:配列の最大値 ichinose 04/10/15(金) 18:02 発言
【18904】Re:配列の最大値 Asaki 04/10/15(金) 18:24 発言
【18907】Re:配列の最大値 ichinose 04/10/15(金) 18:42 発言
【18909】Re:配列の最大値 Asaki 04/10/15(金) 22:06 発言
【18915】Re:配列の最大値 ichinose 04/10/16(土) 9:14 発言
【18991】Re:配列の最大値 Jaka 04/10/19(火) 9:43 発言
【19036】Re:配列の最大値 ichinose 04/10/19(火) 23:31 発言
【18905】Re:配列の最大値 にゃんぎょ 04/10/15(金) 18:30 お礼

62436 / 76732 ←次へ | 前へ→
ページ:  ┃  記事番号:
2610219
(SS)C-BOARD v3.8 is Free