Ab wann ist Application.visible = True

Hallo zusammen,
ich hätte mal eine Frage bezüglich dem Applcation Object. Ich arbeite mit Dateien die ursprünglich mit Excel 2000 (oder früher) erstellt worden. Im Workbook_Open Ereignis wird abgefragt, ob Application.Visible = True ist, nur dann wird das eigentliche Programm gestartet. Diese Funktion wird genutzt, damit nicht die Gui des Programms geladen wird, wenn die Datei von aussen mit Application.Visible = False aufgerufen wird. Leider geht diese Eigenschaft irgendwann ohne erkennbaren Grund verloren oder anders ausgedrückt, die Eigenschaft Apllication.Visible ist erst dann wahr, wenn das Workbook_Open Ereignis abgearbeitet ist oder im Workbookopen Ereignis eine MessageBox aufgerufen wird (z.B. 2 mal: Msgbox application.visible). Bei ersten Aufruf False, beim Zweiten True. Ich habe schon mehrere Tests gemacht um den Fehler einzugrenzen, komme aber nicht wirklich weiter. Wenn ich eine neue leere Excel Mappe erstelle (2007 oder 2010) ist das Application Objekt im Workbook_Open Ereignis immer auf False. Wenn ich ein altes Dokument habe funktioniert es solange, bis in irgendeiner Zelle (Egal in welcher Tabelle) eine Formel eingegeben wird. Ganz egal was ich danach versucht habe, das Application Object bleibt im Workbook_Open Ereignis auf False (Bis z.B. eine Msgbox aufgerufen wurde). Ich habe leider kein Excel 2000 (oder früher) mehr um damit zu testen. Kann irgendjemand dieses Verhalten reprodzuzieren oder mir sagen warum es so ist?

Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

Private Sub Workbook_Open() Dim str As String ' 1. Aufruf If Application.Visible Then str = "True" Else str = "False" End If Debug.Print str MsgBox str '2. Aufruf If Application.Visible Then str = "True" Else str = "False" End If Debug.Print str MsgBox str End Sub

Hallo Hansueli,
es tut mir leid, dass ich mich augenscheinlich so schwer ausdrücke. Ich versuche es nochmal.
Als Erstes, mir ist klar, dass "Application" Excel ist.
Wir arbeiten hier mit Excel-Dokumenten (Mit GUI) um Daten aufzunehmen.
Normalerweise werden diese Dokumente vom Benutzer direkt oder aber über SAP aufgerufen. Im Workbook_Open Erignis wird abgefragt ob das Application Objekt sichtbar ist, nur dann wird die GUI des Dokuments (Die Formulare im Dokument)gestartet. Das hat folgenden Grund: Sobald alle Daten aufgenommen worden sind, wir das Dokument von SAP zurückgeladen. Dazu macht SAP folgende Schritte:
1. Dokument speichern
2. Dokument schliessen
3. Eine neue Instanz von Excel mit Visible=False erzeugen
4. Das zuvaor gespeicherte Dokument öffnen
5. Die Daten auslesen und speichern
6. Das Dokument schliessen
Ich weiss nicht warum das so im ABAP Code hinterlegt ist, habe jedoch auch nicht die Möglichkeit es zu ändern.
Damit nicht jedesmal wenn das Dokument von SAP mit Application.visible = False geöffnet wird, die GUI des Dokuments aufgeht und damit der ganze Programmcode startet, ist im Workbook_open Ereignis die Abfrage nach dem Application Objekt (Dadurch das eine neue Instanz erzeugt wird gibt es dann ja auch nur das besagte Dokument in dieser Instanz) hinterlegt. Das alles funktioniert auch einwandfrei. Es kann jedoch auch passieren, dass das Dokument direkt, also aus den Filesystem herraus (z.B. vom Desktop) geöffnet wird, dann soll natürlich die GUI starten, aber genau das passiert nicht, weil das Application Objekt (Die Excel Instanz in der die Arbeitsmappe geöffnet wird) die Eigenschaft Visible = False hat und ich mir nicht erklären kann woran das liegt.
Bei meinen bisherigen Nachforschungen habe ich folgende Erkenntnisse gesammelt:
- Wenn zuerst die Abfrage "Inhalt aktivieren" kommt startet die GUI
- Wenn ein anderes Excel Dokument geöffnet ist, startet die GUI
- Wenn ich zuerst Excel öffne und dann über den Datei öffnen Dialog das Dokument öffne, startet die GUI
Nur eben nicht wenn das Dokument direkt per Doppelklick geöffnet wird.

Private Sub Workbook_Open()
If Application.Visible Then
'Start GUI
End If
End Sub

Ich hoffe ich habe dieses Phänomen nun deutlich genug dargestellt. Ich selber versuche schon eine gefühlte Ewigkeit herauszufinden woran das liegen könnte, mir gehen jedoch die Ideen aus.
MfG
Andreas

Beliebteste Forumthreads (12 Monate)

Ab wann ist Application.visible = True

16
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

270 Forumthreads zu ähnlichen Themen

Links zu Excel-Dialogen

Beliebteste Forumthreads (12 Monate)

Beliebteste Forumthreads (12 Monate)

Ab wann ist Application.visible = True

16 Beiträge zum Forumthread Beiträge zu diesem Forumthread

270 Forumthreads zu ähnlichen Themen

Links zu Excel-Dialogen

Beliebteste Forumthreads (12 Monate)

Beliebteste Forumthreads (12 Monate)

16
Beiträge zum Forumthread

Beiträge zu diesem Forumthread