Hallo,
Vor langer Zeit habe ich eine Kundenliste in Access97 angelegt und mir dann einen Export-Button
für Word7 eingebaut. Wie ich das damsl gemacht habe, weiss ich nicht mehr. Jetzt habe ich noch Access97
aber Word2000. Und wenn ich jetzt die Adresse in Word2000 exportieren will, kommt immer eine
Laufzeit-Fehler-Meldung 438 (Objekt unterstützt diese Eigenschaft oder Methode nicht). Die letzte
Zeile (vor End Sub) ist dann gelb markiert. Kann man diesen Eintrag ändern, oder was muss ich
machen, damit es wieder klappt.
So sieht der Eintrag aus:
Sub Word_Export_Click()
Dim Adresse As String
Dim LF As String * 2
Dim Meldung As String
Dim WordObj As Object
LF = Chr$(13) & Chr$(10)
If Not IsNull(Me!Firma) Then
Adresse = Me!Firma & LF & Me!Kontaktperson & LF & Me!Strasse
Adresse = Adresse & LF & LF & Me!PLZ & " " & Me!Ort
End If
Set WordObj = GetObject("", „Word.Basic“)
WordObj.Einfügen Adresse
End Sub
Für Hilfe bedanke ich mich im voraus!
MfG
Klaus