# -*- coding: utf-8 -*-
"""
Created on Sun Nov 12 11:19:03 2017
@author: Li Ying
"""
#讀取第一列作為合并后表格的第一列
from pandas import read_csv
df = read_csv(r'E:\excel\vb\excel1.csv',header=None)
sample_name = df[0]
 
file="combine"
filedestination = "E://excel//"
import glob 
#from numpy import * 
filearray=[] 
for filename in glob.glob(r'E:\excel\*.xlsx'): 
 filearray.append(filename) 
#以上是從excel 文件夾下讀取所有excel表格，并將所有的名字存儲(chǔ)到列表filearray 
print("在默認(rèn)文件夾下有%d個(gè)文檔哦"%len(filearray)) 
ge=len(filearray) 
matrix = [None]*ge 
 
 
#實(shí)現(xiàn)讀寫(xiě)數(shù)據(jù) 
 
#下面是將所有文件讀數(shù)據(jù)到三維列表cell[][][]中（不包含表頭） 
import xlrd
for i in range(ge): 
 fname=filearray[i] 
 bk=xlrd.open_workbook(fname) 
 try: 
  sh=bk.sheet_by_name("Sheet1") 
 except: 
  print ("在文件%s中沒(méi)有找到sheet1，讀取文件數(shù)據(jù)失敗,要不你換換表格的名字？" %fname) 
 
 ncols=sh.ncols
 matrix[i] = [0]*(ncols-1)
 
 nrows=sh.nrows
 for m in range(ncols-1):
  matrix[i][m] = ["0"]*nrows
 
 for k in range(1,ncols):
  for j in range(0,nrows):
   matrix[i][k-1][j]=sh.cell(j,k).value
 
import xlwt 
filename=xlwt.Workbook() 
sheet=filename.add_sheet("hel") 
#下面是把第一列寫(xiě)上 
for i in range(0,len(sample_name)): 
 sheet.write(i,0,sample_name[i]) 
#求和前面的文件一共寫(xiě)了多少列 
zh=1 
for i in range(ge): 
 for j in range(len(matrix[i])): 
  for k in range(len(matrix[i][j])): 
   sheet.write(k,zh,matrix[i][j][k]) 
  zh=zh+1 
print("我已經(jīng)將%d個(gè)文件合并成1個(gè)文件，并命名為%s.xlsx."%(ge,file)) 
filename.save(filedestination+file+".xls")