Python操作Execl 实现自动化填表详解编程语言

任务简述：

表1是一个简单的数据表，共有110行，25列。第1行是表头，例如“负责人”、“事项”、“期限”等。 第2行——第110行是对应的数据，如“张三”、“搬砖头”、“3天”。

想要做的表(表2)是110个表格(就像个人简历一样，放在了一个excel文件中)，每个表格共9行，都有固定的格式，如“姓名”“事项”“期限”等，数据与表1一样，但格式与顺序不同，是按个人分类的。

目前的任务就是从表1复制出相应的数据，填到表2里面。如果手工复制粘贴，共计110 25=2750个数据，简直累哭。

所以使用Python写了一段程序，借助xlrd模块（用来读取表1） xlwt模块（用来生成表2）来完成此项工作。

因为涉及行数判断（1-9行是第一个表，10-18行是第二个表，19-27行是第三个表……），按说用switch-case语句是最合适不过 的，但是Python里面没有这个控制语句，用字典(dict)也可以完成这种流程控制，但不很熟悉。为了迅速完成任务，就直接用了if-else语句来 操作了（导致的结果就是多达8个的if-else的嵌套…）

所以贴上此段匆匆写出的粗陋代码，如果有好的取代switch-case语句的方法，还望诸位不吝赐教。

# -*- coding: cp936 -*- 

import xlrd 

import xlwt 

xls1=xlrd.open_workbook("d://xls//1.xls") 

mysheet1=xls1.sheet_by_name("Sheet1")#找到名为Sheet1的工作表。区分大小写 

print("表1共有 %d 行， %d 列。"%(mysheet1.nrows,mysheet1.ncols)) 

xls2=xlwt.Workbook() 

mysheet2= xls2.add_sheet(SheetB)#建立2号xls，并往sheetB里面写入数据 

#获取表1的表头 

titlelist=mysheet1.row_values(0) 


for x in range(0,110):#表1 共有110行数据 

 titlelist1=mysheet1.row_values(x+1)#每一次循环都得到第x+1行数据。 

 x=x*9 

 print x 

 for row in range(x+1,x+9):#每9行为一组 所以上一行的x乘以了9。 

 if row==x+1:#如果是 每组 的第一行 

 for i in range(0,3):#【此处填写第 x+1行(也就是每组的第一行) 的实际列数】 

 mysheet2.write(row,i*2,titlelist[i])#偶数列写入表头数据 

 mysheet2.write(row,i*2+1,titlelist1[i])#奇数列写入表1的第x+1行的数据 

 else: 

 if row==x+2:#如果是 每组 的第二行 

 mysheet2.write(row,0,titlelist[3])#因为第二行只有两个格子，不用循环，只写第0列和第1列 

 mysheet2.write(row,1,titlelist1[3]) 

 else: 

 if row==x+3:#如果是 每组 的第三行 

 mysheet2.write(row,0,titlelist[4])#第三行也只有两个空，不用循环，只写第0列和第1列 

 mysheet2.write(row,1,titlelist1[4]) 

 else: 

 if row==x+4: 

 for i in range(0,4): 

 mysheet2.write(row,i*2,titlelist[i+5]) 

 mysheet2.write(row,i*2+1,titlelist1[i+5]) 

 else: 

 if row==x+5: 

 for i in range(0,4): 

 mysheet2.write(row,i*2,titlelist[i+9])#每写一次，列数向后推4。如5,9,13,17,21… 

 mysheet2.write(row,i*2+1,titlelist1[i+9])#因为“for i in range(0,4):”，一次写4个列 

 else: 

 if row==x+6: 

 for i in range(0,4): 

 mysheet2.write(row,i*2,titlelist[i+13]) 

 mysheet2.write(row,i*2+1,titlelist1[i+13]) 

 else: 

 if row==x+7: 

 for i in range(0,4): 

 mysheet2.write(row,i*2,titlelist[i+17]) 

 mysheet2.write(row,i*2+1,titlelist1[i+17]) 

 else: 

 if row==x+8: 

 for i in range(0,4):#如果是 每组 的第八行 

 mysheet2.write(row,i*2,titlelist[i+21])#每写一次，列数向后推4。如5,9,13,17,21… 

 mysheet2.write(row,i*2+1,titlelist1[i+21])