[算表] 有條件的隨機分配人員

看板Office作者 (原來我戀家)時間12年前 (2014/04/04 11:01), 編輯推噓0(0041)
留言41則, 2人參與, 最新討論串1/1
軟體:excel 版本:2007 十分感謝soyoso在前幾篇給我的幫忙 但現在產生一個新問題... 如果一個參賽組要分配給3個委員看 一個委員只能負責9-10個參賽組 總共130個參賽組 而43個委員分別又有要迴避的單位 要如何從評審迴避sheet隨機抓委員填入評審分配sheet的G:I裡 又能夠迴避掉他負責的單位呢? 感覺好像是不可能任務,還是只能用肉眼判別了 謝謝大家!!! 檔案: http://ppt.cc/5mNw -- ※ 發信站: 批踢踢實業坊(ptt.cc), 來自: 163.15.161.248 ※ 文章網址: http://www.ptt.cc/bbs/Office/M.1396580472.A.0D0.html

04/04 15:15, , 1F
http://goo.gl/jbi8fg 試試,用巨集
04/04 15:15, 1F

04/04 16:07, , 2F
成功了,謝謝s大;但想請問委員看的組數可能可以再平均點嗎?
04/04 16:07, 2F

04/04 16:07, , 3F
因為執行後發現某些委員只會被分配到3組,但其他人可能到10
04/04 16:07, 3F

04/05 01:02, , 4F
04/05 01:02, 4F

04/06 16:31, , 5F
十分大謝謝s大,感覺我好像提出很多無理要求(內疚)
04/06 16:31, 5F

04/06 16:35, , 6F
^^
04/06 16:35, 6F

04/07 09:41, , 7F
不曉得s大方不方便解釋,若以後每個評審負責的組數有變動
04/07 09:41, 7F

04/07 09:43, , 8F
vba程式要修改在哪? 因為不會VBA碼, 肉眼看以為是
04/07 09:43, 8F

04/07 09:44, , 9F
For i = 1 To w - ColCnt * 9 ← 改後面數字,但試過卻不是
04/07 09:44, 9F

04/07 09:44, , 10F
像憨人(我)想得那麼簡單....
04/07 09:44, 10F

04/07 09:48, , 11F
是要修改for i=0 to iif(....,9,8)這裡
04/07 09:48, 11F

04/07 09:49, , 12F
有二處
04/07 09:49, 12F

04/07 10:59, , 13F
謝謝~ 我會好好研究!!
04/07 10:59, 13F

04/07 19:28, , 14F
修改數字之後,出現"無法取得類似worksheetfunction的randbe
04/07 19:28, 14F

04/07 19:29, , 15F
的randbetween屬性,請問是什麼原因呢?
04/07 19:29, 15F

04/07 19:47, , 16F
執行的excel版本是?
04/07 19:47, 16F

04/07 19:49, , 17F
2007年版
04/07 19:49, 17F

04/07 19:50, , 18F
那貼一下,原po改的內容
04/07 19:50, 18F

04/07 19:55, , 19F
http://ppt.cc/qOnJ 修改的只有紅色數字部份
04/07 19:55, 19F

04/07 19:57, , 20F
請問這個版本的委員有幾位呢?
04/07 19:57, 20F

04/07 19:59, , 21F
48位
04/07 19:59, 21F

04/07 19:59, , 22F
專案編號是否是130筆呢?
04/07 19:59, 22F

04/07 20:01, , 23F
是的
04/07 20:01, 23F

04/07 20:03, , 24F
RndNum = WF.RandBetween(1, w - mCnt)←偵錯都在這行
04/07 20:03, 24F

04/07 20:13, , 25F
這是因為130*3=390個委員要導入
04/07 20:13, 25F

04/07 20:15, , 26F
而390/48=8.958,所以委員數要介在8,9之間
04/07 20:15, 26F

04/07 20:17, , 27F
先等一下我將這個部分也加到變數內
04/07 20:17, 27F

04/07 20:21, , 28F
http://goo.gl/PuLyOH 試試這個版本
04/07 20:21, 28F

04/07 20:25, , 29F
那請問若要修改組數或修改委員數要修改哪裡?
04/07 20:25, 29F

04/07 20:27, , 30F
修改在unum這個變數的地方
04/07 20:27, 30F

04/07 20:28, , 31F
這版本組數和委員數都已自行運算
04/07 20:28, 31F

04/07 20:33, , 32F
自行運算的意思是:若一樣130組,但每組若只需2個委員去評分
04/07 20:33, 32F

04/07 20:34, , 33F
一樣一個委員負責不超過10組,只要在評審迴避單位設好26位名
04/07 20:34, 33F

04/07 20:35, , 34F
單,他就會自動分配帶進去嗎?
04/07 20:35, 34F

04/07 20:36, , 35F
抱歉,這檔案還沒有寫的那麼有彈性^^
04/07 20:36, 35F

04/07 20:39, , 36F
那請問s大有推薦的vba書籍嗎?實在很想搞懂以備長官不時的變
04/07 20:39, 36F

04/07 20:39, , 37F
動條件
04/07 20:39, 37F

04/08 00:00, , 38F
上面v3的版本重下,有寫一個參數的工作表,可彈性一些
04/08 00:00, 38F

04/08 00:01, , 39F
抱歉,書籍方面再請版上先進推薦一下^^
04/08 00:01, 39F

04/08 21:33, , 40F
s大,請問亂數儲存格的功能是什麼呢?
04/08 21:33, 40F

04/08 23:01, , 41F
是"評審分配"工作表,委員1的起始儲存格
04/08 23:01, 41F
文章代碼(AID): #1JFY1u3G (Office)
文章代碼(AID): #1JFY1u3G (Office)