Office: Worddokument in Access öffnen

mwb · 27. September 2003

Hallo zusammen,

Bitte sagt mir den Code wie ich aus Access ein bestimmtes Worddokument öffnen kann. (Access 2000).

Es wäre wahnsinnig nett von Euch wenn ich wieder eine schnelle Antwort bekommen würde (wie eigendlich immer). Da ich etwas unter Druck stehe.

Viele Grüße an Alle

MWB[/b]

:)

KHS · 29. September 2003

'Damit kann man AFAIK alle registrierten Dateiarten öffnen/ausführen, oder auch Verzeichnisse öffnen:

'In einem Standartmodul:
Option Compare Database
Option Explicit

Public Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" (ByVal Hwnd As Long, ByVal Ipoperation As String, _
ByVal Ipfile As String, ByVal Ipparameters As String, ByVal Ipdirectory As String, ByVal nshowcmd As Long) As Long

'Dann im Formular z.B.:
Private Sub OpenFileBtn_Click()
On Error Resume Next
Dim DoOpenFile As Long, OpenFileVar As String

'Wenn Pfad und Datei in einem Formularfeld "Dateifld" stehen:
If Not IsNull(Me!Dateifld) Then
OpenFileVar = Me!Dateifld
DoOpenFile = ShellExecute(Me.Hwnd, vbNullString, OpenFileVar, vbNullString, vbNullString, 1)
Else
MsgBox "Es wurde keine Datei ausgewählt.", vbExclamation
End If

'bzw. gleich direkt:
OpenFileVar = "C:\BlaBla\DeineDatei.xyz" 'oder wie auch immer
DoOpenFile = ShellExecute(Me.Hwnd, vbNullString, OpenFileVar, vbNullString, vbNullString, 1)
'(Fenstermodus: 1=Normal, 2=Minimiert 3=Maximiert)

End Sub

Code eingefügt mit
Klicke in dieses Feld, um es in vollständiger Größe anzuzeigen.

MRR · 29. September 2003

Etwa so:
Code:

Dim WordApp As Word.Application
Dim myDoc As Word.Document
Set WordApp = CreateObject("Word.Application")
Set myDoc = WordApp.Documents.Open("C:\Daten\Test.Doc")
WordApp.Visible = True
WordApp.WindowState = wdWindowStateMaximize
Klicke in dieses Feld, um es in vollständiger Größe anzuzeigen.

Verweis auf die Word-Bibliothek noch erstellen.
Und auch generell: Mal die Hilfe im Forum bemühen, wird nämlich alle paar Tage wieder und wieder gefragt... :-)))

Slin · 6. Oktober 2003

Ja hab mal so ne dumme frage, ich find es aber über die suche gerade nciht, wer kann mir sagen wie ich die word verknüpfung einrichte, habs vergessen und nach der eltzten formatierung geht jetzt nix mehr

THX!!!!

MRR · 6. Oktober 2003

Hi Slin,
im VBA-Editor Extras/Verweise, Microsoft Word Objekt-Bibliothek suchen und auswählen.

Mike · 3. Februar 2004

\@ KHS

Alternativ zu FollowHyperlink: ShellExecute
Klicke in dieses Feld, um es in vollständiger Größe anzuzeigen.

Hallo Karl-Heinz,

ein sehr guter Vorschlag!

Funktioniert einwandfrei und ein paar unschöne Effekte sind vergessen.

Mike

User · 8. Juli 2004

Das ist ja alles super toll, aber wie kann ich einen Report direkt in Word öffnen, so dass ich ihn bearbeiten kann?

Muss ich da erst das Ding exportieren und dan Word mit dem Dateipfad als Argument aufrufen?

Aquarii · 8. Juli 2004

Hallo Gast,

wenn Du den Bericht in der Seitenvorschau öffnest, kannst Du das
Word-Symbol anklicken und ihn als Worddokument bearbeiten.

Auch eine Steuerung über VBA ist möglich:

Code:

Dim MeinWordFile As String, MeinBericht As String
MeinWordFile = "test" & ".doc"
MeinBericht = "DeinBericht"
DoCmd.OutputTo acOutputReport, MeinBericht, acFormatRTF, MeinWordFile, -1
Klicke in dieses Feld, um es in vollständiger Größe anzuzeigen.

Nouba · 8. Juli 2004

Wenn der Report im RTF-Format gespeichert vorliegt und Word das voreingestellte Programm für diese Dateiendung ist, kann die ShellExecute Funktion, wie vorher aufgezeigt, zum Öffnen der Datei mit Word verwendet werden. Ansonsten führt der Vorschlag von Matthias zum Erfolg.

Warum man jedoch einen Report bearbeiten muß, ist mir vollkommen schleierhaft. Das verfälscht doch die Daten - oder zu was wird die Bearbeitung benötigt?

User · 8. Juli 2004

Du hast wohl recht!

Es ist auch nur eine Übergangslösung, bis wir alle Daten in Access automatisch verarbeiten können. Im Moment haben wir eben noch einiges in Systemen, welche nicht verknüpft sind.

Danke, funktioniert echt super.

Office: Worddokument in Access öffnen

Worddokument in Access öffnen

Worddokument in Access öffnen

Worddokument in Access öffnen

Worddokument in Access öffnen

Worddokument in Access öffnen - Similar Threads - Worddokument Access öffnen

Worddokument mit verknüpfter Exceldatei verschieben

Worddokument original wieder herstellen

Über Access VBA ein Worddokument Datenquelle/Serienbrief erstellen

Worddokument in Access Datenbank erstellen und öffnen

Anzeige des leeren Worddokuments

Übernahme gewisser Daten aus einem Worddokument in ein anderes

Feststellen, ob Worddokument Serienbrief ist