0

SharePoint ワークフローの一部として、"Link to Graphic As Text" という名前のカスタム ドキュメント プロパティに、ユーザーが提供したグラフィックへのリンクが入力されます。Word ドキュメント テンプレート内でマクロをコーディングして、ユーザーがマクロを実行するとドキュメントに画像が追加されるようにしようとしています。これが私がこれまでに持っているコードです:

Dim wdDoc As Document
Dim filePath As String

Set wdDoc = ActiveDocument

filePath = wdDoc.CustomDocumentProperties("Link to Graphics As Text").Value //receive error here

wdDoc.Shapes.AddPicture _
FileName:=filePath, _
LinkToFile:=msoTrue, _
SaveWithDocument:=msoTrue, _
Left:=-5, _
Top:=5
4

1 に答える 1

0

ですから、私の意見では、あなたが評価したいプロパティはありません。この方法でプロパティが存在するかどうかを確認します。すべてのプロパティを確認し、IDE のイミディエイト ウィンドウに書き込みます。

Sub Check_if_exists()

    Dim CDP As DocumentProperty
    For Each CDP In ActiveDocument.CustomDocumentProperties
        Debug.Print CDP.Name, CDP.Value
    Next
End Sub
于 2013-06-21T16:57:17.103 に答える