用ironpython在单词中插入图像

时间:2014-03-25 13:48:29

标签: image ms-word ironpython

我正在寻找一种方法将图像插入到ironpython中的word文件中。 我想通过调用clr模块并添加引用microsoft.office.interop.word来替换文本,但是我无法将图像写入word文档。 我在做什么:

import sys
import clr
import System
from System import DateTime
clr.AddReference("Microsoft.Office.Interop.Word")
import Microsoft.Office.Interop.Word as Word

def doc_replace_text(source_filename, tokens, values, destination_filename):

   missing = System.Type.Missing
   replaceAll = Word.WdReplace.wdReplaceAll

   word_application = Word.ApplicationClass()
   word_application.visible = False

   document = word_application.Documents.Open(source_filename)

   for i in range(len(tokens)):
    for r in document.StoryRanges:
        print "i = %d, tokens[i] = %s, values[i] = %s" % (i, tokens[i], values[i])
        r.Find.Text = tokens[i]
        r.Find.Replacement.Text = values[i]
        r.Find.Wrap = Word.WdFindWrap.wdFindContinue
        r.Find.Execute(missing, missing, missing, missing, missing, missing, missing, missing, missing, missing, replaceAll, missing, missing, missing, missing)

   document.SaveAs(destination_filename)
   document.Close()
   document = None

   word_application.Quit()
   word_application = None

我很感激任何帮助

2 个答案:

答案 0 :(得分:1)

我以某种方式想出来......

    clr.AddReference("Microsoft.Office.Interop.Word")
    from Microsoft.Office.Interop.Word import ApplicationClass
    word=ApplicationClass()
    word.Visible=False
    docPublic=word.Documents.Add()
    mod=docPublic.InlineShapes.AddPicture(path+name+".jpg", False, True,  docPublic.Paragraphs[1].Range)
    mod.Height=200
    mod.Width=300
    docPublic.SaveAs(tpath+name+"_Simulation_Report_Public.docx")
    docPublic.Close()
    docPublic=None
    word.Quit()
    word=None
然而,现在我需要把图片放到其他位置。我认为这可以通过使用形状的东西来完成......

任何帮助都会很棒

编辑:似乎我不知道我在做什么...... 来自msdn.microsoft.com的AddPicture方法接受以下值: FileName,LinkToFile,SaveWithDocument,Left,Top,Width,Height,Anchor

答案 1 :(得分:0)

我参加聚会很晚,但是我可以通过在Item中定义书签名称,然后在AddPicture中定义书签的位置,将图像放置在已定义的书签上。

loc = doc.Bookmarks.Item("BookMarkName").Range
pic = doc.Bookmarks.Item("BookMarkName").Range.InLineShapes.AddPicture(path+name+".jpg",False,True,loc)