用excel vba编程排监考

759432901

要求：1. 从D列开始到M列，从每列的第36行到89行中除去单元格底色为红色和单元格数值为红色的值以外的单元格数值作为排这一列第6行到最后一个非灰底色单元格为止的选择数据，比如D列从36行到89行里，选择43行到89行里除76行的数据，以这些老师中随机选择20个老师，排到D列第6行到第27行；再比如，F列，从36行到89行里，随机选择红字和红色底色以外的单元格数据，排到该列第6到第20行，排多少个单元格参考每列的第33行，它就是该列要排的单元格数。但是这张工作表排出来后要满足D6:M28区域里的老师监考场次满足平均场次左右，比如平均3.326场的话，每一位教师最少3场，最多4场，可以相等。同时满足每位老师的监考总时长尽可能接近或相等，比如张三3场监考总共5.5个小时，李四4场监考总共5小时，王五监考3场共5小时等。每一场考试的时间在每一列第4行和第5行。本人数组和字典这方便不是太精通，请大侠指点。