在Python中Visible的时候看不见excel的add-ins的东西

[zhywdd]

Visible设为1的时候，在excel里面看不见add-ins的东西。
手动关了excel，再打开它就能看到。不知道能不能在打开的时候看到add-ins的东西。
python 3.0
Excel 2003
Windows

from win32com.client import constants, Dispatch
import win32com.client
class Case1():

def __init__(self, filename=None):

self.xlApp = win32com.client.Dispatch('Excel.Application')
self.xlApp.Visible = 1
if filename:
self.filename = filename
self.xlBook = self.xlApp.Workbooks.Open(filename)
else:
self.xlBook = self.xlApp.Workbooks.Add()
self.filename = ''

def setCell(self, sheet, row, col, value):
"set value of one cell"
sht = self.xlBook.Worksheets(sheet)
sht.Cells(row, col).Value = value

def save(self, newfilename=None):
if newfilename:
self.filename = newfilename
self.xlBook.SaveAs(newfilename)
else:
self.xlBook.Save()

if __name__ == '__main__':
case1 = Case1()
case1.setCell('Sheet1', 1, 1, '2004/001')
case1.save(r'c:\Case.xls')

[DarkChampion]

帮顶

[zhywdd]

我知道了，open/visible这种方式和鼠标打开文件不一样的。
save了以后要用os.popen打开就行了。
from win32com.client import constants, Dispatch
import win32com.client
class Case1():

def __init__(self, filename=None):

self.xlApp = win32com.client.Dispatch('Excel.Application')
if filename:
self.filename = filename
self.xlBook = self.xlApp.Workbooks.Open(filename)
else:
self.xlBook = self.xlApp.Workbooks.Add()
self.filename = ''

def setCell(self, sheet, row, col, value):
"set value of one cell"
sht = self.xlBook.Worksheets(sheet)
sht.Cells(row, col).Value = value

def save(self, newfilename=None):
if newfilename:
self.filename = newfilename
self.xlBook.SaveAs(newfilename)
else:
self.xlBook.Save()

def close(self):
self.xlBook.Close(SaveChanges=0)
del self.xlApp

if __name__ == '__main__':
try:
import os
import time
case1 = Case1()
case1.setCell('Sheet1', 1, 1, '2004/001')
case1.save(r'c:\Case.xls')
case1.close()
time.sleep(2)
os.popen(r'c:\Case.xls')
except Exception, e:
print e

[howardhewang]

...
....
.....
......

[zhywdd]

class Case1():
def __init__(self, fileName, addin):
self.xlApp = win32com.client.Dispatch('Excel.Application')
self.xlApp.Visible = True
if fileName:
self.fileName = fileName
self.xlBook = self.xlApp.Workbooks.Open(fileName)
else:
self.xlBook = self.xlApp.Workbooks.Add()
self.fileName = ''
self.xlApp.Workbooks.Open(addin).RunAutoMacros(1)
self.xlApp.Addins.Add(addin)

addin is r'c:\lsd.xla'