為了美觀，設計了簡單的格式，小組從五行開始。
暗淡？startLine？作為？整數
startLine？=?五
給sheet1壹個別名，用於編碼。
暗淡？sT？作為？工作表
設置？sT？=?紙張(“紙張1”)
讀入人數和組數。
暗淡？團隊？人？作為？整數
團隊？=?聖細胞(1，2).價值
人？=?聖細胞(2，2).價值
為了什麽？我？=?startLine？去哪？startLine？+?團隊？-?1
寫下團隊的名字
聖細胞(我，1).價值？=?“團隊？”？& amp？Str(我？-?startLine？+?1)
下壹個？我
Flag用來生成壹個蛇形，從上到下等於壹；等於負壹，反之亦然。
暗淡？旗幟？作為？整數
旗幟？=?1
這是控制條的參數。
暗淡？currentCol？作為？整數
currentCol？=?2
這是人事編號。在Do循環中，壹次添加壹個。
暗淡？currentPerson？作為？整數
currentPerson？=?1
這是每次填充數字時for循環的開始和結束值。
暗淡？s，？e？作為？整數
做
如果？旗幟？=?1?然後
s？=?1
e？=?組
其他
s？=?組
e？=?1
結束？如果
開始填寫數字
為了什麽？j？=?s？去哪？e？壹步？旗
聖細胞(startLine？+?j？-?1,?currentCol)。價值？=?當前人員
currentPerson？=?currentPerson？+?1
下壹個？j
填寫完壹列後，調整變量值。
currentCol？=?currentCol？+?1
旗幟？=?(-1)?*?旗
如果？currentPerson？& gt？人？然後呢？退出？潛水艇
環
結束？潛水艇