Das Clever-Excel-Forum.de - Treffen
findet vom 15. - 17. September 2017 in Friedrichroda /
Thüringen / Region Großer Inselsberg statt. Hotelbuchung ab sofort möglich.

Prüfen ob bestimmte Anwendung bereits offen
#1
Hallo Excelianer,

gibt es eine Möglichkeit, beim Öffnen der Anwendung "AAA.xls" zu prüfen, ob bereits die Anwendung "XXX.xls" geöffnet ist?

Wenn nein - dann möchte ich die Anwendung "AAA.xls" ganz normal öffnen (ohne Hinweis).

Wenn ja - dann möchte ich einen Hinweis in irgendeiner Form (z.B. "Anwendung XXX.xls ist bereits geöffnet - bitte später versuchen" und die Beendigung des Öffnungsprozess von "AAA.xls".

Wer kann mir da bitte weiterhelfen?

Viele Grüße
Günther

(Excel2003 im Einsatz)
Viele Grüße
Günther

(MS Office 2013)
to top
#2
Hallo,

hilft dir das weiter?

http://www.online-excel.de/excel/singsel_vba.php?f=54

http://www.office-loesung.de/ftopic118311_0_0_asc.php
Gruß
Peter
to top
#3
Hallo Peter,

nicht so richtig.

Ich habe versucht, folgenden Code mal zu testen, aber er meckert mir "IsWorkbookOpen" als Fehler an (Fehler beim Kompilieren - SUB oder Function nicht definiert).

Gibt es diesen Befehl bei Excel2003 noch nicht oder was könnte der Grund sein?

-------------------

Sub test()
If IsWorkbookOpen("XXX.xls") Then
MsgBox "OFFEN"
Else
MsgBox "Nicht offen"
End If
End Sub

Servus
Günther
Viele Grüße
Günther

(MS Office 2013)
to top
#4
Hallo Peter,

Kommando zurück - habe Function "IsWorkBookOpen" vergessen zu definieren.
Jetzt funktioniert es. Danke für den Hinweis.

Servus Günther
Viele Grüße
Günther

(MS Office 2013)
to top


Gehe zu:


Benutzer, die gerade dieses Thema anschauen: 1 Gast/Gäste