暗淡？我？作為什麽？整數，？s？作為什麽？字符串，？c？作為什麽？整數
暗淡？斯雷斯。作為什麽？線
為了什麽？我？=?1?去哪？鏡頭（sRng）
s？=?mid（sRng，我，？1)
如果？s？比如？"#"?然後呢？新聞報道？=?新聞報道？& amp？S
如果？s？=?"."？然後呢。c？=?0?然後
新聞報道？=?新聞報道？& amp？s:？c？=?c？+?1
結束？如果
然後
GetNum？=?瓦爾新聞
結束？功能
功能？calc max（DteStart？作為什麽？字符串，？泰德恩。作為什麽？字符串）
暗淡？噓？作為什麽？工作表，？啊，啊？總計（8）
暗淡？s？作為什麽？日期？r？作為什麽？整數，？c？作為什麽？整數
設置？噓？=?此工作簿。張（1）？//指定為sheet1，並進行替換和調整。
Arr？=?先令範圍（“A2:H“？& amp？先令【A65536】。結束（xlUp）。排）
如果？CDate（DteStart）？& gt？CDate（DteEnd）？然後呢？退出？功能
為了什麽？r？=?1?去哪？欠額
s？=?CDate（Arr（R，1))
如果？s？& gt=?CDate（DteStart）？然後呢。s？& lt=?CDate（DteEnd）？然後
為了什麽？c？=?2?去哪？八
arr（R，c）？=?GetNum（Arr（R，c））
總計（C）？=?arr（R，c）？+?總計（C）
然後
結束？如果
然後
CalcMax？=?工作表功能。最大值（總計）
設置？噓？=?沒有任何東西
結束？這裏有壹個現成的函數，該函數與您想要的相似，但人們匯總指定區域並找到最大值“列”，即提取並匯總指定日期的數據，然後找到具有最大值的列！或者妳可以上傳壹張圖片，看看誰知道妳的意思會幫助妳。祝妳好運！