
excel
楼主你好啊!你这个问题其实可以用
excel里的合并计算功能先整出个唯一项列表,然后再用个IF加SUMPRODUCT函数判断一下最大值啥的,就能搞定了。不过说实话,我觉得这法子不是最高效的。如果你愿意的话,我可以帮你写个小程序专门处理这问题。你只要给我一份真实数据样例就行。你可以用
百度HI我,发我个样本,我直接给你整一个360问答专用的
excel程序!回答人:lxlzmh2002 - 中位魔导师 12级 2009-9-27 18:41 ==================================================================== 再补一下,我这边写了个
VBA代码,贴出来你参考下:
VBASub consoli()Dim i, j, k, rs,
JS, ks As LongDim r1, r2 As DoubleSheets(3).Select.Consolidate Sources:=Array(Sheet1!R1C1:R60000C2, Sheet2!R1C1:R60000C2), Function:=xlSum, TopRow:=True, LeftColumn:=True, CreateLinks:=Falseks = Sheets(1).Range(A65536).End(xlUp).Row
JS = Sheets(2).Range(A65536).End(xlUp).Rowrs = Sheets(3).Range(A65536).End(xlUp).RowRange(B2:B65536).ClearContentsFor i = 2 To rs r1 = 0 For k = 2 To ks If Sheets(1).Cells(k, 1) = Cells(i, 1) Then r1 = Sheets(1).Cells(k, 2) Next r2 = 0 For j = 2 To
JS If Sheets(2).Cells(j, 1) = Cells(i, 1) Then r2 = Sheets(2).Cells(j, 2) Next Debug.Print r1, r2 Cells(i, 2) = WorksheetFunction.Max(r1, r2)NextEnd Sub
========================================== 这个代码咋用?按步骤来:1. 按ALT+F112. 然后按ALT+I(注意是英文的I)3. 再按M键4. 把上面那段代码复制粘贴到右边的窗口里运行的话,就点工具栏上那个右三角的图标运行宏就行了。搞定!