Hi, ich möchte etwas von Access an Word per bookmarks weitersenden.
Das Klappt auch soweit sehr gut.
Doch leider weiß ich nicht, wie ich mehrere Werte mit gleichem Feldnamen in ein Worddokument weitergebe.
Auf dem Bild sieht man, das Substanz X Noch 3 HSätze hat. Diese werden im Unterformular angezeigt. Und haben jeweils den gleichen Feldnamen "GanzerSatz"
https://i.imgur.com/XxiJQ2G.png
Es gibt eine Zuordnungstabelle:
https://i.imgur.com/h9DzhY8.png
In Word Schreibt er mir den Substanznamen als Überschrift wie ich es wollte, aber leider nur den ersten dazugehörigen Satz.
Würde gerne alle weiteren Sätze die für die Substanz hinterlegt sind, entweder untereinander oder nebeneinander dazu geschrieben haben..
Meine Idee ist, dass ich in der Zuordnungstabelle die Daten auslese und mit einer Schleife die Werte auslese, bis das Ende erreicht ist.
Wenn ich also die Substanz XXYY mkt der SubstanzID 3 im Formular auswähle, soll er aus der Zuordnungstabelle alle HSätze an Word weitergeben, die an die SubstanzID 3 geknüpft sind. in dem Fall wären es 6 Sätze die weitergeben werden sollen an Word und mit Komma oder Umbruch eingetragen werden
Ich hoffe ich konnte mein Vorhaben etweas verständlich erklären.
Liebe Grü0ße
Hier ist mein VBA Code der sich im Button zum ausführen befinden:
Private Sub Befehl4_Click()
Dim wdApp As Object, wdDoc As Object
Set wdApp = CreateObject("word.application")
With wdApp
.Visible = True
Set wdDoc = .Documents.Add("C:\Users\XYZs\Desktop\Klausur\VORLAGE.docx")
End With
With wdDoc
.Bookmarks("Bezeichnung").Range = Me!SubstanzName
.Bookmarks("Hsatz").Range = Me!GanzerSatz
End With
End Sub
|