是否可以只使用文件名而不是写出整个路径?
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()
的完整路径,就像您在问题的下半部分显示的那样。
是否可以只使用文件名而不是在第 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()
的完整路径,就像您在问题的下半部分显示的那样。