现有100个EXCEL。每个EXCEL的A1单元格中都有一个数值，现在要求出这一百个数值的最大值和最小值。求方法？ Excel中如何将出现相同次数的数值分别统计出来，比如在A1...
\u6709100\u4e2aEXCEL\u6587\u4ef6\uff0c\u73b0\u5728\u8981\u6839\u636e\u53e6\u4e00\u4e2a\u8868\u683c\u91cc\u9762\u7684A1-A100\u8fd9100\u4e2a\u5355\u5143\u683c\u7684\u5185\u5bb9\u5bf9\u90a3100\u4e2a\u6587\u4ef6\u91cd\u547d\u540d\u5199\u4e00\u4e2a\u5b8f\uff0c\u5bf9\u6307\u5b9a\u7684\u6587\u4ef6\u8fdb\u884c\u8bfb\u53d6\uff0c\u66f4\u6539\u90a3\u4e00\u767e\u4e2a\u6587\u6587\u4ef6\u540d\u3002
=SUM(--(L1=$A$1:$J$10))
Ctrl+Shift+\u56de\u8f66\u53ef\u4ee5\u83b7\u5f97\u51fa\u73b0\u9891\u6b21\u3002
\u81f3\u4e8e\u4f60\u8981\u7684\u6309\u9891\u6b21\u7f57\u5217\u5728\u6307\u5b9a\u4f4d\u7f6e\uff0c\u53ef\u4ee5\u7528\u6570\u636e\u900f\u89c6\u8868\u6216\u8005\u5176\u4ed6\u5e38\u7528\u529f\u80fd\u3002
引用其他文件单元格数值方法：
新建一个工作薄
A1='D:\文件\[001.xls]sheet1'$A$1
A2='D:\文件\[002.xls]sheet1'$A$1
……
引用格式：='路径\[文件名]表名'$列$行
如果你的工作簿和工作表命名是有规律的话
先引用这100个A1值，再用MAX,MIN函数取最大最小值
引用其他文件单元格数值方法：
新建一个工作薄
A1='D:\文件\[001.xls]sheet1'$A$1
A2='D:\文件\[002.xls]sheet1'$A$1
……
引用格式：='路径\[文件名]表名'$列$行 回答者： bjhengte | 五级 | 2011-8-29 09:59 | 检举
这个答案是可行的
先引用后再用 =MAX(A1:A100)
如果你这是一个工作簿的100个sheet的话。
容易。
首先插入第101个sheet
任一单元格输入
=max('*'!A1:A1)
这是求除了当前工作表外，其他100个表的A1中最大值，下面公式是最小值
=min('*'!A1:A1)
先建一个工作表，把100个数值导入
然后用MAX()和MIN()函数求值
是100个表，还是在100个文件上？
绛旓細闇瑕佸紩鐢ˋcrobat Sub BatchMergePDF()Dim s As Worksheet, start_index As Integer, index_end As Integer, strIn As String, temp_stname As Integer Dim pdfFolder As String, pdfName As String, PageNum As Long Dim sPDdoc As New Acrobat.AcroPDDoc, tPDdoc As New Acrobat.AcroPDDoc strI...
绛旓細Dim i As Integer Dim bk As Workbook Dim sht As Worksheet Set bk = ActiveWorkbook Set sht = bk.Worksheets.Add '鏂板缓涓涓伐浣滆〃瀛樻斁姹囨荤殑鏁版嵁 sht.Name = "姹囨"For i = 2 To bk.Worksheets.Count bk.Worksheets(i).Columns(colNo).Copy '鎷疯礉姣忎釜琛ㄤ腑鐗瑰畾鐨勯偅涓鍒 sht.Columns(...
绛旓細Dim CellAddress As String '閫夊畾鍖哄煙姣忎釜鍗曞厓鏍肩殑鍦板潃 Set RangA = Selection '鎻掑叆涓涓笌鐜版湁宸ヤ綔琛ㄤ竴鏍风殑宸ヤ綔琛 Sheets(1).Copy Before:=Sheets(1)'ActiveSheet.Name = "姹囨" 鍙互鏍规嵁闇瑕佸皢璇ュ伐浣滆〃鍛藉悕涓衡濇眹鎬烩滷or Each c In RangA '鍙栨瘡涓崟鍏冩牸鐨勭浉瀵瑰湴鍧 CellAddress = c.Address(Row...
绛旓細1銆侀夋嫨B1:B100鍗曞厓鏍硷紝杈撳叆=RAND() 鎸塁trl+Enter缁勫悎閿粨鏉燂紱2銆侀夋嫨A1:A100鍗曞厓鏍硷紝杈撳叆=800*B1/SUM($B$1:$B$100) 鎸塁trl+Enter缁勫悎閿粨鏉 鍦ˋ1:A100寰楀埌鎬诲拰涓800鐨100涓闅忔満鏁般
绛旓細=ROW(A1)*50-50 鎯充粠鍝釜鏁拌捣锛屽氨鎶夾1鏀规垚鍚庨潰鐨
绛旓細1銆佸亣璁100涓鏁版嵁鍦ˋ1锛欰100鍒楋紝鍦˙鍒楀姞鍏ヨ緟鍔╁垪锛屽湪B1杈撳叆鍏紡=CEILING(ROW()/10,1)锛屼笅鎷夈2銆佸湪C1鍒楄緭鍏ュ叕寮=SUMIF(B:B,ROW(),A:A),鍏紡涓嬫媺锛岃繖鏍峰氨OK浜嗐
绛旓細For fi = 1 To 100 Application.DisplayAlerts = False If 妯℃澘璺緞 = ".xls" Then ActiveWorkbook.SaveAs Filename:=鏂囦欢璺緞 & fi & 妯℃澘鎵╁睍鍚, FileFormat:=xlExcel8 Else ActiveWorkbook.SaveAs Filename:=鏂囦欢璺緞 & fi & 妯℃澘鎵╁睍鍚 End If Application.DisplayAlerts = True Next: fi ...
绛旓細excel濡備綍鎻愬彇鍚勪釜宸ヤ綔琛ㄧ浉鍚屼綅缃崟鍏冩牸鐨勫唴瀹癸紵澧炲姞涓涓眹鎬昏〃锛屽湪鍏朵腑鐨凙鍒楄緭鍏30涓〃鍚嶏紝11.1,11.2鈥︹11.30鐒跺悗鍦˙1鍗曞厓鏍艰緭鍏ヤ互涓嬪叕寮忥紝骞跺悜涓嬪～鍏呭叕寮=INDIRECT(A1&"!C8")寮鍚痚xcel妗ｆ锛岄噷闈鏈変竴鐧澶氫釜宸ヤ綔琛紝浠巗heet1鍒皊heet100杩欐牱锛屾暟妲愮幇鍦ㄩ渶瑕佹妸姣忎釜sheet閲岄潰鐨凙3璧勬枡鎻愬彇鍑烘潵锛岀粍鎴愭柊鐨...
绛旓細棣栧厛瑕佸湪G鍒楀皢E鍒楅噸澶嶅煎彧鍙栦竴涓 鍗矴1杈撳叆 =INDEX(e:e,SMALL(IF(MATCH(e$1:e$100,e$1:e$100,)=ROW($1:$100),ROW($1:$100),4^8),ROW(A1)))&""鏁扮粍鍏紡锛岃緭鍏ュ悗锛屼笉鑳芥寜鍥炶溅锛岄渶瑕佹寜涓媍trl+shift+鍥炶溅锛岀湅鍒板叕寮忓墠鍚庡嚭鐜皗}灏卞浜 涓嬫媺鍏紡濉厖锛屾敞鎰忕粨鏉熸柟寮忥紝娉ㄦ剰鍏紡涓殑100...
绛旓細1銆侀鍏堝皢浣1-12鏈堜腑鐨勫唴瀹归兘璐村湪涓寮犺〃鏍奸噷闈紝绔栧悜璐达紙涓嶇褰撴湀浣犳兂瑕佺粺璁＄殑鍛樺伐缂栧彿鏄惁鍑虹幇锛夛紝鑻ユ槸浣犱粎浠呮槸鎯宠缁熻鍛樺伐姣忎釜鏈堢殑鎬诲伐鏃讹紝閭ｄ箞鍙互浠呬粎璐粹滅紪鍙封濆拰鈥滃伐鏃垛濆瓧娈垫暟鎹嵆鍙紝鍙斁鍦ㄥ悓涓寮犺〃鏍肩殑绌虹櫧澶勶紝涔熷彲浠ユ斁鍦ㄥ叾浠栫┖鐧借〃鏍间腑锛2銆佸湪浣犻渶瑕佺粺璁＄殑琛ㄦ牸涓紝閫夋嫨浣犻渶瑕佺粺璁＄紪鍙蜂汉鍛樼殑...
