列インデックス番号

Question

文字範囲の代わりにインデックス番号を使用できるように助けてもらえますか？

以下

を参照してくださいコード：

Function Integer 
    Dim value As Integer 

Answer 1

あなたがループ:)

する必要はありませんが、これは何をしたいですか？

Sub Sample() 
    Dim Rng As Range 

    Set Rng = Columns(2) 

    '~~> This will give you the row number of the max value 
    '~~> =MATCH(MAX(B:B),B:B,0) 
    MsgBox Evaluate("MATCH(MAX(" & Rng.Address & ")," & Rng.Address & ",0)") 

    '~~> OR 
    MyVariable = Evaluate("MATCH(MAX(" & Rng.Address & ")," & Rng.Address & ",0)") 
    MsgBox MyVariable 
End Sub