Access-o-Mania

Access-Forum (Deutsch/German) => Access Programmierung => Thema gestartet von: Hippolytus am Oktober 21, 2014, 20:45:51

Titel: Word kommt nicht in den Vordergrund
Beitrag von: Hippolytus am Oktober 21, 2014, 20:45:51
Hallo liebes Forum,
ich bin gerade dabei eine Access-Word-Anwendung an neue Anforderungen des Anwenders anzupassen. Die Anwendung wurde mit Office XP unter Windows XP geschrieben und dort auch einwandfrei gelaufen. Das tut sie mit kleinen Einschränkungen unter Office 2007 und Windows 7 auch noch. Eine kleine Unsauberkeit allerdings ist lästig.
Ich öffne und schließe Word mit folgenden Funktionen:

Public Function WordÖffnen()

Set wdAnw = CreateObject("Word.Application")
   
    Set wdDok = wdAnw.Documents.Add(Template:="C:\Kundendatenbank-Kröger\Dokumente\Rechnung.dot")
  wdAnw.Visible = False
End Function



.visible = false Damit der Anwender das Füllen des Formulars nicht sieht.

geschlossen wird Word mit:

Public Function WordSchließen()

    wdAnw.ActiveDocument.Tables(1).Rows.Height = 18
    wdAnw.Visible = True
    wdAnw.WindowState = wdWindowStateMaximize
       
    Set wdDok = Nothing
    Set wdAnw = Nothing
    Set oTable = Nothing
   
End Function


Jetzt endlich zur Frage :):
Unter den Bedingungen Office XP und Windows XP wurde durch :
wdAnw.WindowState = wdWindowStateMaximize

Word in den Vordergrund gebracht und das Formular angezeigt. Mit Office 2007 unter Windows 7 klappt das nicht.

Weiß jemand warum und wie man Word in den Vordergrund bringt?

Schöne Grüße und schon mal Danke
Hippolytus