it-swarm-ja.com

Microsoft Wordに(カスタム)ドキュメントプロパティを入力するように求める

myproperty "」というカスタムドキュメントプロパティを使用してテンプレートを作成しました。 DOCPROPERTY "myproperty"コマンドのフィールドを使用してこれにアクセスできます。 Word Promptをユーザーに値として設定し、それをmypropertyの値として設定したいと思います。 FILLINコマンドを使用してプロンプトを表示できることはわかっていますが、値をmypropertyに渡す方法がわかりません。 SETコマンドはブックマークでのみ機能するようです。

これを達成する方法はありますか?

よろしく、naroslife

3
naroslife

私はこのスケルトンコードを使用して目標を達成することができました:

Private Sub Document_New()
Dim strValue As String
strValue = InputBox("Enter a value for 'myproperty':", "myproperty", " ")

' the value will be an empty string, "", if the user cancels
' or deletes the default space; fix that
If strValue = "" Then strValue = " "

ActiveDocument.CustomDocumentProperties("myproperty").Value = strValue

ActiveDocument.Fields.Update
End Sub
2
naroslife