Hallo
Ich stehe gerade vor einem Problem. Ich möchte ein Worddokument aus Access aus einem Formular heraus per Buttonklick öffnen. Das geht ja noch. Aber jetzt möchte ich auch noch eine Adresse aus der Datenbank in dieses Wordformular automatisch eintragen . Geht das ??? wenn ja wie ?
Und die Krönung wäre, wenn es möglich ist, dieses Dokument nach der Bearbeitung in der Datenbank zu speichern ( als ole Objekt vielleicht)
Matthias
hallo Matthias,
schau mal auf meine HP, da findest Du unter ‚Mails‘ schon mal eine Möglichkeut, aus Access heraus Word zu öffnen. Es ist dann relativ einfach, in Word die verschiedensten Aktionen zu starten (in dem Beispiel geht es darum, die Fußzeile aus einem in ein anderes Dokument zu kopieren). Das Einfügen des aktuellen Datensatzes in Word dürfte eigentlich wenig Probleme bereiten.
mfg Günter
http://www.vba-home.de.cx
Das Einfügen des aktuellen
Datensatzes in Word dürfte eigentlich
wenig Probleme bereiten.
Hey Günter
ähmm, hast du auch einen konkreteren Tip fuer dieses Problem, da für mich das schon ein Problem darstellt. Ich habe keine Idee wie das geht.
Matthias
hallo Matthias,
finde Dich doch mal auf meiner HP ein, da ist auch ein Forum. Hier aber erst mal ein Beispiel:
Sub AdresseInWordEinfügen()
Dim Word97 As Object
Dim ret As Boolean
anrede$ = „Anrede“
vorname$ = „Vorname“
nachname$ = „Nachname“
Strasse$ = „Straße 00“
PLZ$ = „00000“
Ort$ = „Ort“
gruss$ = "Gruß "
zw$ = Chr$(13)
’ Word wird aktiviert
On Error Resume Next
Set Word97 = GetObject(, „Word.Application“)
If Err.Number = 432 Then
Set Word97 = CreateObject(„Word.Application“)
Err.Clear
End If
On Error GoTo 0
’ anzeigen, wenn gewünscht
Word97.Application.Visible = True
Word97.Application.WindowState = wdWindowStateMaximize
Word97.Documents.Add
With Word97.Selection
.TypeText Text:=anrede$ & zw$
.TypeText Text:=vorname$ & " " & nachname$ & zw$
.TypeText Text:=Strasse$ & zw$ & zw$
.TypeText Text:=PLZ$ & " " & Ort$ & _
zw$ & zw$ & zw$ & zw$ & zw$ & zw$
.TypeText Text:=gruss$ & nachname$ & _
„,“ & zw$ & zw$
End With
End Sub
mfg Günter
http://www.vba-home.de.cx