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:
Für <irgendwas> setzt du ein:
Hinter strFilePath = muss dein Verzeichnis und Dateinamen stehen.
Gruß
lorf
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ÖffnenHinter strFilePath = muss dein Verzeichnis und Dateinamen stehen.
Gruß
lorf
Antwort 2 von magdalena
danke lorf!!
hat geklappt
ganz liebe grüße
M.
hat geklappt
ganz liebe grüße
M.

