Supportnet Computer
Planet of Tech

Supportnet / Forum / Datenbanken

word datei in access





Frage

liebe experten wie kann ih eine einzelne word datei in access so ins formular einfügen das ich sie mittels befehlsschaltfäche öffen und auch bearbeten kann? ich schaffe es als anfänger nur word einzfügen nicht aber eine einzelne datei lieben dank

Antwort 1 von lorf55

Hallo Magdalena,
wenn ich dich richtig verstanden habe, hast du einen Word-Button angelegt. Von dem kannst du mit Rechtsklick Eigenschaften
Ereignis - Beim Klicken - 3Punkte Linksklick das Unterprogramm anzeigen, dass beim Klicken auf den Button ausgeführt wird. Da steht denn zum Beispiel:
Private Sub Befehl16_Click()
 <irgendwas>    
End Sub


Für <irgendwas> setzt du ein:
    Dim App As Object, Doc As Object 
    Dim strFilePath As String
    
      On Error Resume Next    ' Läuft Word ?
      Set App = GetObject(, "Word.Application")
      If Err.Number <> 0 Then    ' Word läuft nicht
        Err.Clear              ' Err zurücksetzen.
        Set App = CreateObject("Word.Application")
      Else
        App.Activate
      End If
      
      On Error GoTo Err_DateiÖffnen

      ' Datei öffnen
      strFilePath = "E:\Dokumente\Kategorie.doc"
      Set Doc = App.Documents.Open(strFilePath, , 1)

      App.Application.Visible = True
      
Exit_DateiÖffnen:
    Exit Sub

Err_DateiÖffnen:
    MsgBox Err.Description
    Resume Exit_DateiÖffnen


Hinter strFilePath = muss dein Verzeichnis und Dateinamen stehen.

Gruß
lorf

Antwort 2 von magdalena

danke lorf!!

hat geklappt

ganz liebe grüße


M.