Access-o-Mania

Access-Forum (Deutsch/German) => Access Programmierung => Thema gestartet von: zorlayan am Mai 04, 2019, 19:31:57

Titel: Word Active-X Steuerelement Textfeld mit einem Wert aus Access ausfüllen
Beitrag von: zorlayan am Mai 04, 2019, 19:31:57
Hallo,

wie kann ich einen Wert aus Access Formular zu einem bestimmten Textfeld in Word-Datei zuweisen?
Mit den folgenden Code habe ich probiert aber es hat nicht geklappt. :-\

Sub Füllen_Click ()
Dim K1 As String
K1=Me.Anrede
    Dim objWord As Word.Application
    Set objWord = CreateObject("Word.Application")

With objWord
        .Visible = True
        .Documents.Open "C:\Inland.docm"       'das zu öffnende Worddokument
    'Ausfüllen des Dokuments

    .ActiveDocument.Bookmarks("KTitel").Select
    .Selection.InsertAfter (K1)
 
    End With
End Sub


Vielen Dank
Titel: Re: Word Active-X Steuerelement Textfeld mit einem Wert aus Access ausfüllen
Beitrag von: markusxy am Mai 05, 2019, 09:02:15
Bei einem Bookmark mache ich das so:

Document.Bookmarks.Item("Name").Range.Text = "mein Text"

Hab ich auch irgend wann kopiert, da ich mich mit Word nicht auskenne.
Ansonsten sind deine Fragen in einem Word Forum besser aufgehoben.
Titel: Re: Word Active-X Steuerelement Textfeld mit einem Wert aus Access ausfüllen
Beitrag von: DF6GL am Mai 05, 2019, 09:41:39
Hallo,

WAS hat nicht "geklappt"?  Gibt es eine Fehlermeldung?

Der Code an sich funktioniert.

Es kann sein, dass es keine Schreibrechte für das Root-Laufwerk (C:)  gibt.
Es kann sein, dass das "Dokument mit Makros" (".dotm") keine Ausführungsberechtigung besitzt (Sicherheitscenter).
Es kann sein, dass  "Me.Anrede" keinen Inhalt hat.
Es kann sein, dass mehrfache Wordinstanzen existieren.


Titel: Re: Word Active-X Steuerelement Textfeld mit einem Wert aus Access ausfüllen
Beitrag von: zorlayan am Mai 05, 2019, 12:11:47
Hallo,

vielen Dank für die schnellere Antwort.
Ich habe im Formular den alten Textfeld anstelle Active-X Textfeld genommen und funktioniert einwandfrei.

Grüße,
Zorlayan