回复:重命名Excel电子表格

格雷格·林德斯特龙写道:
下面是几年前的一些代码,它将工作表添加到工作簿中,然后
重命名它们.
Sheets=[["SlsSource",None,1],
["SalesRep",无,1],
["Control",None,1]]
复制者=[]
对于Repkey中的k:
如果当前代表中的k:
Replist.append([k,reps[k]])
Sheets.append(['Rep-%s'%k,None,1])
定义工作簿设置(图纸):
#xl.Visible=1
Wbi=xl.Workbooks.Add()
Wbi.Activate()
Sheetcount=xl.Sheets.Count
索引=0
对于图纸中的名称、参考、下一行:
如果索引>=Sheetcount:
Wbi.Sheets.Add()
索引=索引+1
索引=0
对于图纸中的名称、参考、下一行:
Wbi.Sheets[索引].名称=名称
Sheets[index][1]=wbi.Sheets[index]
索引=索引+1
返回WBI
HTH,
埃米尔

标签: python

添加新评论