title image


Smiley Re: ACCESS Daten in WORD-Vorlage beamen
Das geht z.B. so:Private Sub Word_Click()Dim WordObj As Object, Tmp On Error Resume Next Set WordObj = GetObject(, "Word.Application ") If Err.Number 0 Then Set WordObj = CreateObject("Word.Application") On Error GoTo 0 With WordObj .Application.Visible = True .Documents.Add "I:\Samples\vorlage.dot" Tmp = "Herrn " & Me!Vorname & " " & Me!Nachname & _ vbCrLf & Me!Strasse & vbCrLf & Me!PLZ & " " & Me!Ort With .Selection .Goto What:=wdGoToBookmark, Name:="Adresse" .Find.ClearFormatting .TypeText Text:=Tmp End With End WithEnd SubReinhard


Gruß aus dem Norden
Reinhard


Bitte immer die Access-Version angeben!
DB-Wiki


Wie man Fragen richtig stellt

YaccessAccess-FAQUnd ansonsten: Wikipedia




geschrieben von

Login

E-Mail:
  

Passwort:
  

Beitrag anfügen

Symbol:
 
 
 
 
 
 
 
 
 
 
 
 
 

Überschrift: