是否可以只使用文件名而不是写出整个路径?

Is it possible to use only the name of the files instead of writing out the entire path?

是否可以只使用文件名而不是在第 4 行和第 5 行写出整个路径?

 [1] from win32com import client
 [2] excel = client.Dispatch("Excel.Application")
 [3] word = client.Dispatch("Word.Application")
 [4] doc = word.Documents.Open(r"C:\Users\crist\word_automation\Summary_template\Table1.docx")
 [5] book=excel.Workbooks.Open(r"C:\Users\crist\word_automation\Summary_template\Table1.xlsx")
    sheet = book.Worksheets(1)
    sheet.Range("A1:D5").Copy()    
    wdRange = doc.Content
    wdRange.Collapse(0)
    wdRange.PasteExcelTable(False, True, False) 
    
    import os
    os.remove('Table2.xlsx')
    
    book.SaveAs('Table2.xlsx')
    book.Close()
    excel.Quit()
    doc.SaveAs('TableOne.docx')
    doc.Close()
    word.Quit()

我试过这样做,但它给了我一个错误:

doc = word.Documents.Open('Table1.docx')
book = excel.Workbooks.Open('Table1.xlsx')

com_error: (-2147352567, 'Exception occurred.', (0, 'Microsoft Excel', "抱歉,我们找不到 Table1.xlsx。是否有可能它被移动了, 重命名或删除?", 'xlmain11.chm', 0, -2146827284), None)

更新代码:

from win32com import client
import os
os.chdir(r"C:\Users\crist\word_automation\Summary_template")

excel = client.Dispatch("Excel.Application")
word = client.Dispatch("Word.Application")
doc = word.Documents.Open('Table1.docx')
book = excel.Workbooks.Open('Table1.xlsx')
sheet = book.Worksheets(1)
sheet.Range("A1:D5").Copy()    
wdRange = doc.Content
wdRange.Collapse(0)
wdRange.PasteExcelTable(False, True, False) 

os.remove('Table2.xlsx')

book.SaveAs('Table2.xlsx')
book.Close()
excel.Quit()
doc.SaveAs('TableOne.docx')
doc.Close()
word.Quit()

是的,这是可能的。只需将 import os 行移动到文件的顶部(在 win32com 导入之前或之后,都没有关系),然后在下一行放置

os.chdir(r"C:\Users\crist\word_automation\Summary_template")

您现在可以省略发送到 word.Documents.open()excel.Workbooks.open() 的完整路径,就像您在问题的下半部分显示的那样。