python调用vba宏

#coding=utf-8

import os
import win32com.client

xlApp = win32com.client.Dispatch('Excel.Application')
xlApp.visible = 1

for f,x in zip([u'冻胀数据处理.xls',u'含水量数据处理.xls',u'温度数据处理.xls'],['m','w','t']):
    fname = os.path.abspath(f)
    ff = open(x,'r')
    lines = ff.readlines()
    ff.close()
    xlBook = xlApp.Workbooks.Open(fname)

    for i in range(0,len(lines),2):
        s = lines[i].rstrip()
        m = lines[i+1].rstrip()
        sheet = xlBook.Sheets(s.decode('utf-8'))
        strPara = xlBook.Name + '!'+m.decode('utf-8')+'()'
        status = xlApp.ExecuteExcel4Macro(strPara)
    xlBook.Save()