vb@rchiv
VB Classic
VB.NET
ADO.NET
VBA
C#
Blitzschnelles Erstellen von grafischen Diagrammen!  
 vb@rchiv Quick-Search: Suche startenErweiterte Suche starten   Impressum  | Datenschutz  | vb@rchiv CD Vol.6  | Shop Copyright ©2000-2025
 
zurück

 Sie sind aktuell nicht angemeldet.Funktionen: Einloggen  |  Neu registrieren  |  Suchen

Fortgeschrittene Programmierung
Worddatei aus Access heraus aufrufen 
Autor: Mark
Datum: 12.06.02 11:30

Hallo zusammen,

mein Problem ist wahrscheinlich eher "easy" für viele von Euch...... .
Also, ich möchte eine Worddatei aufrufen, zur Zeit sieht mein Prog so aus:
_________________________________________
Public Sub WordStarten()
Dim wdappl As Object
Dim strpfad As String

'Sucht den entsprechenden Pfad des Versuchsauftrags

strpfad = DLookup("Pfad", "TAB_Versuchsauftrag", "SapNr = txtAuftrag")

On Error GoTo errormsgword
Set wdappl = GetObject(, "Word.Application.8")

If wdappl Is Nothing Then

Set wdappl = CreateObject("Word.Application.8")

End If

'Öffnet den zugehörigen Versuchsauftrag als Word-Dokument

!!HIER!!wdappl.Documents.Open FileName:=strpfad !!Hier!!

'Word-Dokument anzeigen
With wdappl
.Application.Visible = True
.Application.Activate
End With

Set wdappl = Nothing

errormsgword:
MsgBox "Konnte keine Verbindung zu Word herstellen!", 16, "Problem"
Set wdappl = Nothing
Exit Sub

End Sub
____________________________

An der Stelle, welche mit !!HIER!! makiert ist springt er mit stets mit entsprechnder Fehlermeldanung nach errormsgword raus.
Was stimmt mit diesem Programm nicht?

Gruß Mark
alle Nachrichten anzeigenGesamtübersicht  |  Zum Thema  |  Suchen

 ThemaViews  AutorDatum
Worddatei aus Access heraus aufrufen41Mark12.06.02 11:30
Re: Worddatei aus Access heraus aufrufen31Oli12.06.02 13:14

Sie sind nicht angemeldet!
Um auf diesen Beitrag zu antworten oder neue Beiträge schreiben zu können, müssen Sie sich zunächst anmelden.

Einloggen  |  Neu registrieren

Funktionen:  Zum Thema  |  GesamtübersichtSuchen 

nach obenzurück
 
   

Copyright ©2000-2025 vb@rchiv Dieter Otter
Alle Rechte vorbehalten.
Microsoft, Windows und Visual Basic sind entweder eingetragene Marken oder Marken der Microsoft Corporation in den USA und/oder anderen Ländern. Weitere auf dieser Homepage aufgeführten Produkt- und Firmennamen können geschützte Marken ihrer jeweiligen Inhaber sein.

Diese Seiten wurden optimiert für eine Bildschirmauflösung von mind. 1280x1024 Pixel