python win32com excel边框格式

时间:2013-09-30 13:35:04

标签: python excel border win32com

我在这里有一段代码,实际上是使用python win32com来格式化excel中的边框。我担心的是格式化边界所需的时间。我试图在excel中记录一个宏来找出所需的信息,以便在我的脚本中转置它,但它没有用。

所以我能做的最好的事情就是在一个for range循环中运行,我总是从第3行开始直到一个名为shn [1]的行计数器,增量为1,从第1列到第10行增量为1。从那里我使用“BorderAround()”,它工作正常,但太慢。这是我的代码:

for shn in [("Beam-Beam", bb_row, bb_col), ("Beam-Col", bc_row, bc_col)]:
sheet = book.Worksheets(shn[0])
sheet.Range( "J3:DW3" ).Copy()
if shn[0] == "Beam-Col":
    sheet.Range( "J3:AA3" ).Copy()
sheet.Range( sheet.Cells( 4, 10 ), sheet.Cells( shn[1]-1, 10 )  ).PasteSpecial()
for mrow in xrange(3,shn[1],1):
    for mcol in xrange(1,10,1):
        sheet.Cells(mrow, mcol).BorderAround()#.Border(1)

我可以做些什么来设置边框的格式,例如==> sheet.Range(sheet.Cells(3,1),sheet.Cells(shn [1],10))?我试过“.Borders(11)”和“.Borders(12)”加上“.BorderAround()”,但只有“.BorderAround()”有效。

提前致谢。

1 个答案:

答案 0 :(得分:4)

嗯,你用的是什么擅长?

这应该有效:

for shn in [("Beam-Beam", bb_row, bb_col), ("Beam-Col", bc_row, bc_col)]:
sheet = book.Worksheets(shn[0])
sheet.Range( "J3:DW3" ).Copy()
if shn[0] == "Beam-Col":
    sheet.Range( "J3:AA3" ).Copy()
## Set a variable named rng to the range
rng = sheet.Range( sheet.Cells( 4, 10 ), sheet.Cells( shn[1]-1, 10 )  )
rng.PasteSpecial()
## Using this range, we can now set its borders linestyle and weight
##  -> where 7 through 13 correspond to borders for xlEdgeTop,xlEdgeBottom,
##     xlEdgeRight, xlEdgeLeft, xlInsideHorizontal, and xlInsideVertical
##  -> LineStyle of 1 = xlContinous
##  -> Weight of 2 = xlThin
for border_id in xrange(7,13):
    rng.Borders(border_id).LineStyle=1
    rng.Borders(border_id).Weight=2
## And to finish just call
book.Close(True) # To close book and save
excel_app.Quit() # or some variable name established for the com instance

让我知道这对你有用。

如果将Excel应用程序Visible设置为False或关闭screenupdating可能会更快:

excel_app.Visible = False # This will not physically open the book
excel_app.ScreenUpdating = False # This will not update the screen on an open book
##
# Do Stuff...
##
# Just make sure when using the ScreenUpdating feature that you reenable it before closing
excel_app.ScreenUpdating = True

这样,excel不会为每次通话更新屏幕。