□ 陸英浩 張 耘（上海大學(xué) 上海 200444）

Excel VBA在網(wǎng)球賽事編排記錄中運(yùn)用的研究

□ 陸英浩 張 耘（上海大學(xué) 上海 200444）

網(wǎng)球賽事尤其是業(yè)余網(wǎng)球賽事的記錄編排工作是一件繁瑣、費(fèi)時(shí)的工作，但又是一項(xiàng)賽事成功與否的重要決定因素。其工作過程中會(huì)使用到大量的表格，Excel強(qiáng)大的表格編輯功能，數(shù)據(jù)關(guān)聯(lián)功能，函數(shù)運(yùn)算功能能夠十分高效的完成這些表格。

Excel VBA是office軟件集成了Vision Basic高級(jí)編程語言的開發(fā)工具。在網(wǎng)球賽事的抽簽，比賽順序表的安排，比賽結(jié)果的錄入和獲勝方晉級(jí)中存在著大量繁瑣、重復(fù)的工作。通過運(yùn)用VAB編寫的程序能夠高效、準(zhǔn)確的完成這些工作。

Excel VBA 網(wǎng)球賽事 編排記錄

前言

近年來隨著網(wǎng)球運(yùn)動(dòng)的蓬勃發(fā)展，無論是專業(yè)運(yùn)動(dòng)員參加的職業(yè)賽事，還是業(yè)余選手參加的業(yè)余比賽，網(wǎng)球賽事的數(shù)量急劇增加。中國職業(yè)網(wǎng)球賽事的數(shù)量逐年遞增，賽事的級(jí)別也越來越高，這極大的刺激了網(wǎng)球文化的推廣和網(wǎng)球人口的增加。巨大的網(wǎng)球人口使業(yè)余網(wǎng)球賽事不斷增多，賽事規(guī)模越來越大。以全國大學(xué)生網(wǎng)球賽為例，在全國大學(xué)生網(wǎng)球協(xié)會(huì)成立之初只有寥寥幾所大學(xué)是會(huì)員單位，第一屆全國大學(xué)生網(wǎng)球比賽也只有十幾所高校參加?？傻?014年該協(xié)會(huì)已有近200所高校會(huì)員單位。近幾年的全國大學(xué)生網(wǎng)球比賽參賽人數(shù)都近千人，比賽場(chǎng)次總數(shù)都超過了千場(chǎng)。如此大規(guī)模的網(wǎng)球賽事可謂嘆為觀止。這么多場(chǎng)次的比賽，無疑對(duì)賽事的組織者來說是一個(gè)巨大的挑戰(zhàn)。參賽運(yùn)動(dòng)員的報(bào)名；各個(gè)比賽項(xiàng)目的抽簽；每天賽程的安排；比賽結(jié)果的統(tǒng)計(jì)；賽事信息的發(fā)布，所有這些都形成了巨量的工作需要在短時(shí)間內(nèi)完成。而一個(gè)網(wǎng)球賽事的成功與否，這些環(huán)節(jié)起著至關(guān)重要的作用。從實(shí)際工作中，我們發(fā)現(xiàn)這些繁瑣的工作有很多都是簡(jiǎn)單的重復(fù)，這就意味著我們可以借助計(jì)算機(jī)系統(tǒng)去完成那些按照固定程序、簡(jiǎn)單重復(fù)的工作。甚至一些復(fù)雜的，但具有很強(qiáng)邏輯關(guān)系的工作也可以借助計(jì)算機(jī)來實(shí)現(xiàn)。由于計(jì)算機(jī)的高速的運(yùn)算能力，可以使這些繁復(fù)的工作變得高效、快速并且具有更高的準(zhǔn)確率。本研究就是通過運(yùn)用Excel VBA的函數(shù)及編程功能，設(shè)計(jì)制作了一套用于網(wǎng)球賽事的計(jì)算機(jī)編排記錄系統(tǒng)，以實(shí)現(xiàn)不斷提高我網(wǎng)球賽事競(jìng)賽工作的效率。

1、問題的提出與解決方法

1.1、Excel表單的結(jié)構(gòu)設(shè)計(jì)

一個(gè)網(wǎng)球賽事需要很多表格記錄賽事的成績(jī)，比賽結(jié)果；公布賽事的進(jìn)行順序。一般包括了如下表格：賽事信息表，參賽選手（團(tuán)體隊(duì)伍）名單，抽簽完成后的簽位表，每一輪次的對(duì)陣表，每天的比賽順序表。這些表格在數(shù)據(jù)上都存在這一系列的關(guān)聯(lián)，而表格的格式有各有不同。Excel軟件在表格的設(shè)計(jì)；數(shù)據(jù)的關(guān)聯(lián)、相互引用；公式計(jì)算方面都具有十分強(qiáng)大的功能。利用Excel表格能夠羅列出有關(guān)賽事名稱、比賽時(shí)間、比賽地點(diǎn)、比賽項(xiàng)目、賽制的設(shè)置、裁判長(zhǎng)等主要賽事信息。在參賽名單的表格中能夠運(yùn)用Excel軟件的函數(shù)、排序等功能完成對(duì)數(shù)據(jù)的整理、歸納，為下一步的抽簽工作提供有效的數(shù)據(jù)。在手動(dòng)抽簽功能的實(shí)現(xiàn)中，運(yùn)用Excel的函數(shù)功能將之前參賽名單作為引用對(duì)象，輕松的實(shí)現(xiàn)包括選手名字、單位、種子的關(guān)聯(lián)。運(yùn)用Excel VBA編程功能可以“一鍵”實(shí)現(xiàn)抽簽，這將極大的簡(jiǎn)化抽簽的過程，節(jié)約時(shí)間、提高功效。抽簽工作完成后，通過數(shù)據(jù)的引用可以即時(shí)完成各個(gè)輪次的對(duì)陣表格，為下一步比賽順序的安排提供了極大的便利。對(duì)陣表格同時(shí)也是比賽結(jié)果的輸入的“容器”，在比賽結(jié)果輸入的同時(shí)，通過對(duì)數(shù)據(jù)的判斷完成簽表中進(jìn)位選手的自動(dòng)操作，實(shí)現(xiàn)進(jìn)位和比分記錄。比賽順序表的編排一直是一件費(fèi)時(shí)、費(fèi)力的工作，但利用Excel的引用和VBA的編程功能能夠高效快速的實(shí)現(xiàn)編排功能，即使在需要臨時(shí)改變比賽順序時(shí)也能快速地作出調(diào)整。

1.2、格式的設(shè)計(jì)

網(wǎng)球比賽淘汰賽和循環(huán)賽的表格格式遵循了體育賽事的一般規(guī)律。但，網(wǎng)球賽事每日的比賽場(chǎng)次較多，特別是在參賽人數(shù)眾多和項(xiàng)目設(shè)置復(fù)雜的業(yè)余賽事中，由于每場(chǎng)比賽時(shí)間的不可控因素，比賽順序的表格的設(shè)計(jì)又有一定特殊性。Excel軟件在表格的設(shè)置方面具有十分靈活的特性，所以能夠輕松地設(shè)計(jì)出各種格式。通過對(duì)Excel表格中單元格不同位置的邊框設(shè)置能夠完美的顯示出淘汰賽的格式。在循環(huán)賽的格式設(shè)計(jì)中，通過設(shè)置相同的單元格高度和寬度，能夠很好的實(shí)現(xiàn)循環(huán)賽表格的顯示。同時(shí)，通過單元格引用，能夠?qū)崿F(xiàn)參賽選手在“行”顯示和“列”顯示的同步。在每日比賽順序表的格式設(shè)計(jì)中，運(yùn)用Excel單元格邊框設(shè)置，將顯示每個(gè)比賽的比賽開始時(shí)間、比賽項(xiàng)目、對(duì)陣雙方、代表單位等信息羅列在一個(gè)邊框格之內(nèi)，并將一天的比賽制作成一張大的表格。這樣就能將一整天比賽順序的信息全部展現(xiàn)出來，無論是參賽的運(yùn)動(dòng)員、教練員，還是裁判人員多能對(duì)一天的賽事進(jìn)程有一個(gè)全面的了解。

1.3、模版的建立

在業(yè)余網(wǎng)球比賽中需要依據(jù)規(guī)程的要求和各項(xiàng)目參賽人數(shù)的多少設(shè)置淘汰賽的簽位數(shù)或循環(huán)賽的分組數(shù)和每組的人數(shù)。這就給賽事各表格的設(shè)置帶來了很大的麻煩。如果通過VAB代碼來完成這些表格的設(shè)計(jì)和繪制，由于參數(shù)的多樣性，各表格之間數(shù)據(jù)關(guān)聯(lián)和引用的復(fù)雜性，勢(shì)必使得代碼十分冗長(zhǎng)。程序的編寫也會(huì)十分復(fù)雜。生成的文件會(huì)十分龐大，在實(shí)際程序運(yùn)行中速度會(huì)變得十分緩慢。針對(duì)這些問題，本研究通過歸納各種淘汰賽簽位數(shù)及分組循環(huán)賽分組數(shù)和每組人數(shù)的各類情況，預(yù)先制作各個(gè)簽位數(shù)或分組情況的模版。在各個(gè)模版中設(shè)置各個(gè)表格的格式，建立數(shù)據(jù)的關(guān)聯(lián)和引用，編寫各自的VBA程序代碼。在比賽之前根據(jù)賽事的要求，通過Excel表單復(fù)制的功能復(fù)制模版中相應(yīng)的表單，建立符合各個(gè)項(xiàng)目需求的文件，這樣既能靈活的適應(yīng)不同賽事的要求，又能簡(jiǎn)化程序，提高運(yùn)行的效率。

1.4、種子與輪空位的設(shè)置

在網(wǎng)球比賽中，種子的簽位位置有著特殊要求，其原則是保護(hù)種子在比賽中獲得優(yōu)于非種子選手的晉級(jí)機(jī)會(huì)，同時(shí)使得種子選手之間盡可能的在較后的輪次中相遇。在業(yè)余網(wǎng)球比賽淘汰賽簽位數(shù)或循環(huán)賽的分組數(shù)必須是2的N次冪，而參賽人數(shù)往往會(huì)少于預(yù)設(shè)的數(shù)字，這時(shí)就會(huì)產(chǎn)生輪空位置。在淘汰賽中輪空位置的設(shè)置，首先應(yīng)該考慮的是種子依據(jù)排序的高低優(yōu)先享有輪空。當(dāng)輪空數(shù)多于種子時(shí)，應(yīng)隨機(jī)的發(fā)布到上下半?yún)^(qū)中。而循環(huán)賽中，則是種子所在的組優(yōu)先享有輪空。這些抽簽原則在本研究中，通過編寫VBA程序代碼由計(jì)算機(jī)自動(dòng)來完成，這樣使得本來十分繁瑣的工作，借助Excel強(qiáng)大的編程功能高效、快速的得以完成。

1.5、規(guī)避原則的實(shí)現(xiàn)

網(wǎng)球賽事中，參賽的選手有可能是來自同一地地域同一單位。為了使相同地域或相同單位的選手盡可能在較晚的輪次中相遇，在抽簽時(shí)必須要遵循規(guī)避的原則。在淘汰賽中，要依據(jù)同地域或同單位參賽者的數(shù)量將簽位分成不同的區(qū)域。在手工抽簽時(shí)，為了實(shí)現(xiàn)這些原則往往采用雙盲的抽簽方式或兩次抽簽的方式。無論是雙盲抽簽還是兩次抽簽，每一個(gè)參賽對(duì)象的抽簽工作都要通過二個(gè)步驟實(shí)現(xiàn)，抽簽過程復(fù)雜而耗時(shí)。然而，通過Excel VBA程序的判斷語句，可以對(duì)每次的抽簽結(jié)果進(jìn)行相同簽位區(qū)域內(nèi)同地域或同單位判斷，如有違反規(guī)避原則時(shí)，可以重新抽簽。這一步驟不斷重復(fù)進(jìn)行，直到規(guī)避原則得以實(shí)現(xiàn)。由于這個(gè)過程是由計(jì)算機(jī)完成的，所以整個(gè)過程會(huì)十分快速。這一功能的實(shí)現(xiàn)能極大的縮短抽簽的時(shí)間。

1.6、抽簽方式的確定

傳統(tǒng)的抽簽方式是先將參賽者依據(jù)種子、同單位數(shù)量多少等原則進(jìn)行整理、排序。然后在簽表中依照簽位的順序抽取名單表格中的序號(hào)落位。抽簽的順序是：種子依據(jù)規(guī)則落如相應(yīng)位置；輪空位進(jìn)入種子對(duì)應(yīng)位置；多余的輪空隨機(jī)抽入上下半?yún)^(qū)；依次在空白簽位上抽入?yún)①愓?。這種抽簽方式通過雙盲抽簽或二次抽簽的方式實(shí)現(xiàn)同地域或同單位規(guī)避的原則。但在使用Excel VBA編程實(shí)現(xiàn)自動(dòng)抽簽時(shí)，由于采用判斷同區(qū)域是否有同地域或同單位參賽對(duì)象的方式實(shí)現(xiàn)規(guī)避原則，所以如果不優(yōu)先讓同地域或同單位數(shù)量多的參賽者入位的話，會(huì)造成規(guī)避原則無法實(shí)現(xiàn)?；谶@種情況的考慮，在運(yùn)用Excel VBA程序自動(dòng)抽簽時(shí)，在用傳統(tǒng)方式完成種子和輪空的入位后，采用依據(jù)參賽名單中同單位數(shù)量從多至少的順序抽簽。而且，抽簽的方式是隨機(jī)抽取空白簽位號(hào)，再讓相應(yīng)序號(hào)的參賽對(duì)象落入簽位。這種方式盡管與傳統(tǒng)手工抽簽方式不同，但能有效的實(shí)現(xiàn)同地域或同單位規(guī)避原則，使得抽簽的過程能夠用計(jì)算機(jī)編程語言有效地體現(xiàn)出來。

1.7、隨機(jī)數(shù)的產(chǎn)生

采用抽簽的方式確定比賽的對(duì)手，最為核心的目的就是對(duì)陣雙方的隨機(jī)性，這也體現(xiàn)了網(wǎng)球比賽的公平性。Excel VBA中的隨機(jī)函數(shù)能夠產(chǎn)生隨機(jī)數(shù)，通過與取整函數(shù)共同運(yùn)用，采用公式Int（Rnd（）*（B-A））+A就能產(chǎn)生介于A與B區(qū)間的自然數(shù)。這就完全契合了抽簽時(shí)的隨機(jī)性，為運(yùn)用計(jì)算機(jī)程序完成抽簽奠定了基礎(chǔ)。但對(duì)計(jì)算機(jī)產(chǎn)生隨機(jī)數(shù)的工作原理的進(jìn)一步了解，本研究發(fā)現(xiàn)：計(jì)算機(jī)隨機(jī)函數(shù)產(chǎn)生的隨機(jī)數(shù)其實(shí)是偽隨時(shí)數(shù)。具體來說，這些連續(xù)兩次產(chǎn)生的隨機(jī)數(shù)具有很高的重復(fù)率。為了解決這一問題，本研究采用了Randomize函數(shù)在產(chǎn)生隨機(jī)數(shù)之前重置了隨機(jī)種子。使用該函數(shù)后使得每次使用計(jì)算機(jī)程序抽簽是均能產(chǎn)生與前一次不同的抽簽結(jié)果，這使得計(jì)算機(jī)自動(dòng)抽簽的結(jié)果更具有公平性。

2、結(jié)論

2.1、網(wǎng)球賽事尤其是業(yè)余網(wǎng)球賽事的記錄編排工作是一件繁瑣、費(fèi)時(shí)的工作，但又是一項(xiàng)賽事成功與否的重要決定因素。其工作過程中會(huì)使用到大量的表格，Excel強(qiáng)大的表格編輯功能，數(shù)據(jù)關(guān)聯(lián)功能，函數(shù)運(yùn)算功能能夠十分高效的完成這些表格。

2.2、Excel VBA是office軟件集成了Vision Basic高級(jí)編程語言的開發(fā)工具。在網(wǎng)球賽事的抽簽，比賽順序表的安排，比賽結(jié)果的錄入和獲勝方晉級(jí)中存在著大量繁瑣、重復(fù)的工作。通過運(yùn)用VAB編寫的程序能夠高效、準(zhǔn)確的完成這些工作。

［1］《Excel2007 VBA 參考大全》，人民郵電出版社，2009年3月出版.

［2］《Excel VBA實(shí)戰(zhàn)技巧精粹》，人民郵電出版社，2008年7月出版.