![](http://oshiete.xgoo.jp/images/v2/pc/qa/question_title.png?5a7ff87)
No.1ベストアンサー
- 回答日時:
Sub Test2()
Dim Max_chi As Variant
Dim order As Variant
''A1:A5 でも、個々の値でも、同じです。Max, Match関数は、同じ扱いになります。
Max_chi = WorksheetFunction.Max(Range("A1:A5"))
order = WorksheetFunction.Match(Max_chi, Range("A1:A5"))
MsgBox "最大値: " & Max_chi & " 順序:" & order
End Sub
'関数を使わないなら、このようなスタイルになります。
Sub Testfind()
Dim kk(1 To 5)
Dim i As Long, j As Long, m As Long
Dim MaxVal As Variant
MaxVal = Empty '最初、Empty だから、本来は不要です。
kk(1) = Cells(1, 1).Value
kk(2) = Cells(2, 1).Value
kk(3) = Cells(3, 1).Value
kk(4) = Cells(4, 1).Value
kk(5) = Cells(5, 1).Value
For i = LBound(kk) To UBound(kk)
kk(i) = Cells(i, 1).Value
Next i
For j = LBound(kk) To UBound(kk)
If kk(j) > MaxVal Then
MaxVal = kk(j)
m = j
End If
Next j
MsgBox "最大値: " & MaxVal & " 順序:" & m
'念の為、配列の場合の検索をしてみました。
m = Application.Match(MaxVal, kk)
If IsNumeric(m) Then
MsgBox m
End If
End Sub
'ただし、全部の関数が、同じように配列か使えるとは限りません。使えても、1次元配列のものもあれば、2次元配列まで可能なものもあります。Match関数は、1次元のみのはずです。ちなみに、Transpose関数は、2次元は使えますが、リミットがありますから、VBAでは、思わぬ失敗を招く時があります。
この回答へのお礼
お礼日時:2018/06/21 12:59
早速有り難うございました。
また、いろいろなサンプルも作っていただき、
お手間をお掛けしました。
関数のmaxを使っているので、matchを使うのが最適ということにしました。
計算結果を配列に入れてmatchで上手く行きました。
お世話になりました。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- その他(プログラミング・Web制作) プログラミング言語について 2 2023/06/04 01:39
- Windows 95・98 Twitterでの書き込みで字化けします 2 2023/01/19 11:00
- 特撮 映画『ゴジラの逆襲』(1955年公開)もウクライナ侵攻とトルコシリア大地震に関した映画だったの? 1 2023/02/13 00:27
- 国産車 カーオーディオ取り付け 1 2022/04/25 22:22
- MySQL データベースの複製の仕方(mysql) 2 2023/05/30 18:24
- その他(Microsoft Office) Excelで時間計算(負) 8 2023/02/26 05:47
- 化学 助けてください! F4スターの水性ペンキのホルムアルデヒドの数値が4.56ppmで凄く高値でした 3 2023/03/09 02:06
- C言語・C++・C# C言語:数値の桁数指定についての質問です。 8 2022/05/26 23:53
- Excel(エクセル) エクセルでIF関数中にIFERROR関数を使いたいのですが???? 5 2022/04/08 13:24
- Excel(エクセル) Excelマクロの表示のExcel内をfindで検索 3 2022/06/15 20:07
関連するカテゴリからQ&Aを探す
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
C言語 配列の長さの上限
-
2次元配列を確保したいのですが、
-
char型配列をString型にしたい
-
先頭アドレスとは何ですか?
-
C++ vectorに配列をプッシュしたい
-
C++ 配列を返すには?
-
型宣言に現れる * [] () の構文...
-
c言語乱数について
-
配列で格納したものをmsgboxで...
-
Redimした動的配列はEraseする...
-
本日までの累計を表示させたい!
-
C# Listを使わずに2次元配列の...
-
VBでC言語のポインタみたい...
-
長い文字列を配列に入れるには?
-
数列の中を検索
-
VB.NET 構造体の配列の検索機能...
-
構造体から平均点を求める方法
-
VBプログラムの得意な方・・...
-
VB.NETでテキストボックスをコ...
-
RedHatLinux7jでアンダーバーが...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
C言語 配列の長さの上限
-
配列を使わずに、変数名を動的...
-
先頭アドレスとは何ですか?
-
配列で格納したものをmsgboxで...
-
C# Listを使わずに2次元配列の...
-
C# 配列の変数宣言について。
-
テキストファイルから文字列を...
-
配列の参照渡しで型が一致しま...
-
ExcelVBAで質問です。離れた二...
-
unsigned char配列への入力の仕方
-
VBで構造体の配列を関数に渡す...
-
C++ vectorに配列をプッシュしたい
-
C言語で特定列だけを抽出して配...
-
Excel、VBAのユーザーフォーム...
-
複数の選択範囲の行番号を個別...
-
配列をEraseしてもメモリが開放...
-
配列を含む構造体の初期値について
-
【速いブラインドタッチ】手を...
-
Redimした動的配列はEraseする...
-
C言語 配列の再初期化
おすすめ情報