EXCEL表中，我如何输入一个总数分成31份呢 如何在一个工作簿中建31份工作表
Excel\u8868\u683c\u4e2d\u5c06\u4e00\u4e2a\u6570\u968f\u673a\u5206\u914d\u62103\u4efd\uff0c\u5206\u914d\u7ed3\u679c\u5927\u4e8e1\u5c0f\u4e8e31\u3002\u539f\u6570\u636e\u5728A1
\u7ed3\u679c\u5728A2,A3,A4\u5355\u5143\u683c
A2=ROUND(MAX(A1-2*31,1)+(MIN(A1-2*1,31)-MAX(A1-2*31,1))*RAND(),0)
A3=ROUND(MAX(A1-A2-31,1)+(MIN(A1-A2-1,31)-MAX(A1-A2-31,1))*RAND(),0)
A4=A1-A2-A3
\u81ea\u5df1\u786e\u4fdd\u539f\u6570\u636e\u8303\u56f4\u4e3a3-93\uff0c\u516c\u5f0f\u6ca1\u52a0\u8fd9\u4e2a\u5224\u65ad
\u5176\u4e2d\u7684max\u51fd\u6570\u4e3a\u786e\u5b9a\u6570\u636e\u6700\u5c0f\u503c,min\u51fd\u6570\u786e\u5b9a\u6700\u5927\u503c\uff0c\u6700\u540e\u7528rand\u51fd\u6570\u6c42\u968f\u673a\u6570
\u5373\u7b2c\u4e00\u4e2a\u6570\u5206\u51fa\u6765\u540e\u8981\u786e\u4fdd\u5269\u4f59\u6570\u8303\u56f4\u4e3a2-62\uff0c\u7b2c2\u4e2a\u6570\u5206\u51fa\u540e\u786e\u4fdd\u57281-31
Sub shtadd() '\u6279\u91cf\u6dfb\u52a0\u5de5\u4f5c\u8868
Application.ScreenUpdating = False '\u5173\u95ed\u5c4f\u5e55\u5237\u65b0\u52a0\u5feb\u8fd0\u884c\u901f\u5ea6
dim i as integer '\u5b9a\u4e49\u53d8\u91cf
For i = 1 To 31 '\u5bf9\u53d8\u91cf\u8d4b\u503c\u4e3a1\u201431
Sheets.Add After:=Sheets(Sheets.Count) '\u5728\u5df2\u6709\u5de5\u4f5c\u8868\u540e\u6dfb\u52a0\u65b0sheet
ActiveSheet.Name = i '\u91cd\u547d\u540d\u5de5\u4f5c\u8868\u540d\u79f0
Next '\u5faa\u73af\u4ee5\u4e0a\u8fc7\u7a0b \u76f4\u81f3\u7b2c31\u4e2a\u5de5\u4f5c\u8868
Sheets(1).Activate '\u6fc0\u6d3b\u7b2c\u4e00\u4e2a\u5de5\u4f5c\u8868
Application.ScreenUpdating = True '\u5f00\u542f\u5c4f\u5e55\u5237\u65b0\u663e\u793a\u8fd0\u884c\u7ed3\u679c
End Sub
\u5c06\u4ee5\u4e0a\u4ee3\u7801\u590d\u5236\u540e
03\u7248 alt+f11 \u5728\u5de5\u7a0b\u8d44\u6e90\u7ba1\u7406\u5668\uff08\u5982\u679c\u6ca1\u6709 \u89c6\u56fe\u2014\u5de5\u7a0b\u8d44\u6e90\u7ba1\u7406\u5668\u52fe\u9009\uff09 \u91cc\u53f3\u952e\u2014\u63d2\u5165\u6a21\u5757
\u7c98\u8d34\u4ee5\u4e0a\u4ee3\u7801\u540e F5\u8fd0\u884c\u770b\u770b
1.先输入这么几个数，具体位置不要变
2.在f列输入1到31，起始单元格跟图上要一样
3.然后
G7输入=RANDBETWEEN($D$5/$D$6-$D$7,$D$5/$D$6+$D$7)
G8输入=RANDBETWEEN(($D$5-$G$7)/($D$6+1-$F8)-$D$7,($D$5-$G$7)/($D$6+1-$F8)+$D$7)
G9输入=RANDBETWEEN(($D$5-SUM($G$7:INDIRECT("F"&(F9+5))))/($D$6+1-$F9)-$D$7,($D$5-SUM($G$7:INDIRECT("F"&(F9+5))))/($D$6+1-$F9)+$D$7)
G10到G36由G9下拉
G37输入=$D$5-SUM(G7:G36)
说个原理吧。50000/31=1612.9
以1613为基数，取15个在正300范围内的随机数
再取15个在负300范围内的随机数
最后一个数字用50000去减获得。
sample
A1中输入50000
B1中输入=1613+(RAND()*300) C1中输入=1613-(RAND()*300)
。。。拖拽15行
第31个数字是50000-这30个随机数的和。
把语言再组织一遍，到底想干嘛
这个一定是要用VBA完成的
绛旓細1銆佺數鑴戞墦寮Excel琛ㄦ牸銆2銆佸湪绗竴涓崟鍏冩牸杈撳叆1锛岀劧鍚庨紶鏍囩偣鍑诲崟鍏冩牸鍙充笅瑙掔殑鐐癸紝鐩存帴寰涓嬫媺銆3銆佷笅鎷変箣鍚庯紝濡傛灉閮芥槸1锛岀偣鍑诲彸涓嬭鐨勫浘鏍囥4銆侀夋嫨濉厖搴忓垪銆5銆侀夋嫨濉厖搴忓垪涔嬪悗锛屽嵆鍙彉鎴123456銆
绛旓細1. 鎵撳紑Excel搴旂敤绋嬪簭锛屾柊寤轰竴涓┖鐧藉伐浣滅翱鎴栨墦寮涓涓幇鏈夌殑宸ヤ綔绨裤2. 鍗曞嚮瑕佽緭鍏ュ厗甯曠鍙风殑鍗曞厓鏍笺3. 杈撳叆澶у啓瀛楁瘝鈥淢鈥濆拰鈥淧a鈥濄備箣闂翠繚鐣欎竴涓┖鏍笺備緥濡傦細鈥淢 Pa鈥濄4. 鐜板湪锛屾垜浠渶瑕佸皢澶у啓瀛楁瘝鈥淢鈥濆拰鈥淧a鈥濈粍鍚堟垚涓涓鍙枫傜偣鍑烩滃紑濮嬧濋夐」鍗★紝鐒跺悗閫夋嫨鈥滃瓧浣撯濆伐鍏风粍涓殑鈥滃甫鍦堝瓧绗︹...
绛旓細1銆佸綋鎴戜滑鍦鐢靛瓙琛ㄦ牸鐨勫崟鍏冩牸涓杈撳叆浠绘剰鏁板瓧锛岀偣鍑诲洖杞﹀悗鍙樻垚鏃ユ湡鏃讹紝鎴戜滑鍙互閫変腑璇ュ崟鍏冩牸锛岀劧鍚庣偣鍑婚紶鏍囧彸閿紱2銆佸脊鍑鸿彍鍗曞悗鐐瑰嚮鑿滃崟涓殑鈥濊缃崟鍏冩牸鏍煎紡 3銆佽繖鏃舵垜鏍峰彲浠ョ湅鍒板脊鍑虹殑瀵硅瘽妗嗕腑鏁板瓧涓鏍忎腑锛屽師鏈夋嫨鐨勬槸鈥濇棩鏈熲滐紝鐜板湪灏卞皢瀹冩敼閫変负鈥濇枃鏈滐紝鐒跺悗鐐瑰嚮纭畾锛4銆佸崟鍏冩牸涓殑鏁板瓧灏卞彉鍥炰簡绾...
绛旓細閫変腑闇瑕褰曞叆鐨勫崟鍏冩牸銆傚湪鍏紡妗涓緭鍏“=today()”锛堜笉鍚紩鍙凤級銆傛寜涓嬪洖杞﹂敭锛孍xcel浼氳嚜鍔ㄦ樉绀哄綋鍓嶆棩鏈熴傚綋鍓嶆棩鏈熺殑鏍煎紡涓“YYYY/MM/DD”锛屾垜浠渶瑕佺敤鍑芥暟灏嗗叾杞崲涓哄綋鍓嶆湀浠姐傚湪鍙涓涓鍗曞厓鏍间腑杈撳叆“=text(today(),\"mm\")”锛堜笉鍚紩鍙凤級銆傛寜涓嬪洖杞﹂敭锛孍xcel浼...
绛旓細瀹炵幇杈撳叆涓涓鍏紡瀹炵幇锛屼竴鏁村垪鏁版嵁闄や互鍙︿竴鍒楁暣鍒楃殑鍏蜂綋姝ラ濡備笅锛1銆侀鍏堟墦寮Excel琛ㄦ牸锛杩涘叆鍒扮紪杈戦〉闈腑銆2銆佺劧鍚庣偣鍑籆2鍗曞厓鏍硷紝鍦ㄥ悕绉版爮涓緭鍏モ淐2锛欳15鈥濓紝鍥炶溅纭畾銆3銆佺劧鍚庡崟鍑诲悗闈㈢殑缂栬緫妗嗚緭鍏モ=A2/B2鈥濄4銆佺劧鍚庢寜涓嬮敭鐩樹笂鐨勨淐trl+enter鈥濄5銆佺劧鍚庡氨瀹屾垚浜嗐
绛旓細棣栧厛锛屾墦寮浣犵殑鐢佃剳骞跺惎鍔Excel绋嬪簭锛屾柊寤烘垨鎵撳紑涓涓伐浣滅翱銆傚湪A1鍗曞厓鏍间腑锛岄殢鎰忚緭鍏ヤ换浣曟暟瀛楁垨鏂囨湰銆傛帴涓嬫潵锛屼负浜嗗疄鐜版潯浠舵у～鍏咃紝浣犻渶瑕佸湪绗簩涓崟鍏冩牸涓杈撳叆涓涓鍏紡銆備緥濡傦紝鍙互浣跨敤"IF"鍑芥暟鏉ユ鏌1鍗曞厓鏍兼槸鍚︿负绌恒傝緭鍏ュ叕寮 "=IF(A1>",",A1,"")"銆傝繖涓叕寮忕殑鎰忔濇槸锛屽鏋淎1鍗曞厓鏍肩殑鍐呭涓嶄负...
绛旓細1銆佹墦寮闇瑕佹搷浣滅殑EXCEL琛ㄦ牸锛鍦ㄧ涓涓鍗曞厓鏍艰緭鍏モ1鈥2銆佸厜鏍囧仠鍦ㄥ崟鍏冩牸鍙充笅瑙掞紝缂栫▼鈥+鈥濇椂锛岀偣鍑婚紶鏍囧乏閿笉鏀撅紝涓嬫媺鎷栧姩榧犳爣锛屽嚭鐜颁竴涓櫄绾胯竟妗嗐3銆佹澗寮榧犳爣鍗冲～鍏呯浉搴斿崟鍏冩牸锛岀劧鍚庣偣鍑诲彸涓嬭鐨勫掍笁瑙掓寜閽紝閫夋嫨鈥滃～鍏呭簭鍒椻濆嵆鍙4銆佽繑鍥濫XCEL琛ㄦ牸锛屽彂鐜板湪Excel宸ヤ綔琛ㄤ腑蹇褰曞叆1銆2銆3銆4銆5...
绛旓細excel鎬庝箞杈撳叆鍒嗘暟1/2鎵撳紑excel琛ㄦ牸,鐐瑰嚮浠绘剰涓涓琛ㄦ牸,鐒跺悗閫夋嫨寮濮嬩腑鐨勫崟鍏冩牸鏍煎紡閫夐」,鍐嶇劧鍚庨夋嫨鈥滃垎鏁扳濈被鍨嬮夋嫨鍒嗘瘝涓轰竴浣嶆暟(1/2)鐐瑰嚮纭畾,鍐嶇劧鍚庡湪琛ㄦ牸涓緭鍏1/2,鐐瑰嚮enter灏卞彲浠ヤ簡銆備笅闈㈡垜
绛旓細1銆佹墦寮excel琛ㄦ牸锛寤虹珛涓涓鏂扮殑excel鏂囦欢銆傚涓嬪浘鎵绀猴細2銆佸湪闇瑕佺殑鍗曚綅鏍涓緭鍏鏁板瓧1锛屽涓嬪浘鎵绀猴細3銆佹妸榧犳爣绉诲姩鍒板崟鍏冩牸鐨勫彸涓嬭锛岀煡閬撳嚭鐜板崄瀛楀浘鍍忋4銆佸皢榧犳爣寰涓嬬Щ鍔99涓綅缃紝鍑虹幇浠ヤ笅缁撴灉銆5銆佺偣鍑讳笅鏂圭殑濉厖搴忓垪銆傚涓嬪浘鎵绀猴細6銆佽繖鏍峰氨鍙互蹇熷～鍏1鑷100浜嗐傚涓嬪浘鎵绀猴細...
绛旓細閫変腑瑕杈撳叆鏁版嵁鐨勫崟鍏冩牸锛=VLOOKUP(H3,$A$3:$F$19,5,FALSE)濡傚浘 鍙傛暟瑙ｉ噴锛欻3涓烘垜浠兂鏌ユ壘鐨勫瀷鍙凤紝鍗砳phone5銆備负浠涔堣鍐橦3锛岃屼笉鏄洿鎺ュ啓iphone5锛屽洜涓烘柟渚垮叕寮忚繘琛屾嫋鎷藉～鍏咃紝浠ュ強淇濊瘉鍑嗙‘鎬с傚弬鏁拌В閲婏細$A$3:$F$19涓烘垜浠渶瑕佸湪姝よ寖鍥村唴鍋氭煡鎵撅紝涓轰粈涔堣鍔犱笂缁濆寮曠敤鍛紝鍥犱负涓嬮潰鐨刬p4鍜屽墿浣欑殑...
