Question

我正在建立一个以列号作为输入的函数来返回列中的最高值。

我需要处理带有列索引号的整个列。以下代码有效但我需要一个索引号而不是使用＆＃34; B：B＆＃34;引用该列。

Set rng = Range("B:B")

当我使用以下代码时，一切似乎都崩溃了。即使最高的数字是44，它总是返回0.你能看出我做错了吗？当我使用＆＃34; B：B＆＃34;作为一个范围。

Set rng = Range(Columns(2),Columns(2))

它似乎无法识别范围内的任何内容。任何帮助都会很棒！

Answer 1

试试这个

Sub Sample()
    Dim Rng As Range

    '~~> This will let you work with Col B
    Set Rng = Columns(2)
    '~~> This will give you the Max in that column
    MsgBox Application.WorksheetFunction.Max(Rng)
End Sub

Answer 2

这是我前一段时间找到的解决方案：

-keepclassmembers class ** {
    @android.webkit.JavascriptInterface <methods>;
}

来源：http://www.mrexcel.com/forum/excel-questions/114025-visual-basic-applications-select-multiple-columns-using-column-number.html

使用索引号将范围设置为整个列

2 个答案: