0

MS Word ドキュメントのテキスト フィールドにデータを転送するフォームを作成する必要があります。

Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
    Dim MyApp1 As Object
    Dim MyDoc1 As Object
    MyApp1 = CreateObject("Word.Application")
    MyDoc1 = MyApp1.Documents.Open(C:\DSU.docx")
    MyDoc1.Field("w_VardasPavarde").Range = VardasPavarde.Text
    MyDoc1.Fields.Update()
    MyDoc1.Fields.Unlink()
    MyApp1.Visible = True
End Sub

Word 文書を開く上記のコードですが、フィールドは空のままです。アドバイスを探しています。

4

1 に答える 1