Das Clever-Excel-Forum.de - Treffen
findet vom 15. - 17. September 2017 in 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


Möglicherweise verwandte Themen...
Thema Verfasser Antworten Ansichten Letzter Beitrag
  Mit If mehr als vier Argumente prüfen ??? soldblub 21 247 23.02.2017, 09:37
Letzter Beitrag: atilla
  Filtern oder prüfen von Liste Spike87 3 60 15.02.2017, 10:09
Letzter Beitrag: Spike87
  Trotz ungleicher Formatierung Spalten auf gleiches prüfen Excel_Tabellen 14 238 12.01.2017, 14:18
Letzter Beitrag: atilla
  Bedingte Formatierung offen / erledigt cuba 9 229 02.12.2016, 14:40
Letzter Beitrag: cuba
  Frage zur Anwendung SVERWEIS und FINDEN MikeMax 11 409 01.12.2016, 18:57
Letzter Beitrag: shift-del
  VBA: Wenn Datei offen dann schließen mit Speicherabfrage Kash 1 176 15.11.2016, 23:24
Letzter Beitrag: AlterDresdner
  Zellen prüfen und dann addieren h76469 1 121 05.11.2016, 08:53
Letzter Beitrag: WillWissen
  Exceltabelle auf bestimmte Wörter prüfen Frederik 1 128 03.11.2016, 18:55
Letzter Beitrag: steve1da
  Anwendung eines Filters Kobiii 13 799 23.08.2016, 10:45
Letzter Beitrag: Kobiii
  Prüfen ob eine Applikation geöffnet ist oder nicht jovicic 14 940 06.07.2016, 14:42
Letzter Beitrag: RPP63

Gehe zu:


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