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

Question

是否可以只使用文件名而不是在第 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), 无)

更新代码：

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()

Answer 1

是的，这是可能的。只需将您的 import os 行移动到文件顶部（在 win32com 导入之前或之后，没关系），然后放在下一行

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

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