Excel 如何编写代码来显示需求最高的月份（第1列）（第5列）？

我正试图解决一个问题，即在哪个月需求量最高。需求为E列，月份为A列。 这是我目前的代码

Sub MaxDemandMonth()
    Dim wsData As Worksheet
    Dim Rng As Range
    Dim MaxVal As Long

    Set wsData = Worksheets("DATA")
    Set Rng = Range("E:E")
    MaxVal = WorksheetFunction.Max(Rng)
    Set Maxcell = Rng.Find(what:=MaxVal, LookIn:=xlValues)
    mDRow = Maxcell.Row

    MsgBox "Max Demand was Found in Month" & mDRow

End Sub

---

Maxcell.EntireRow.Cells（1）

是该行ColA中的单元格。我应该将该行放在代码中的什么位置？请包括从该代码中收到的任何错误代码或次优结果。还请包括一个。您可以从第一行循环到最后一行，声明变量以存储日期和值，对于第一个循环，您将它们存储到变量，下一个循环，您检查值是否比您的变量值更高，再次存储您的数据，在所有循环完成后，您已在特定日期获得最大值，然后，您可以在

单元格（mDRow，“A”）中提取月份。值

。在代码顶部添加

Option Explicit

，以确保提醒您将

mDRow声明为Long

。