Anzeige
Archiv - Navigation
340to344
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
340to344
340to344
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Prüfen, ob Exceldatei geöffnet ist???

Prüfen, ob Exceldatei geöffnet ist???
20.11.2003 15:15:46
Jens
Hallo,

kann mir jemand helfen diesen Code richtig zum Laufen zu bekommen? Es ist eine Abfrage die prüft, ob eine bestimmte Exceldatei schon geöffnet ist. Ist das der Fall, soll ein Makro in dieser Mappe aufgerufen werden. Das klappt soweit auch ganz gut, aber leider nur wenn die Mappe geschlossen ist. Ist sie geöffnet, öffnet er die Mappe erneut und arbeitet nicht mit der bereits geöffneten Mappe weiter.



on error resume next
set oXL = GetObject("Excel.Application")


if oXL = nothing then
Set oXL = CreateObject("Excel.Application")
End if
if not oXl.Application.Workbooks.isOpen("C:\Mappe1_.xls") then
set wbk = oXL.Application.Workbooks.Open("C:\Mappe1_.xls")
else
wbk = oXl.Application.Workbooks("C:\Mappe1_.xls").Activate

end if
oxl.Visible = true
oxl.Run "Main"


Bin dankbar für jede Hilfe
Gruß Jens


3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
doppelt oT
20.11.2003 15:18:28
.
.
Vielen Dank
20.11.2003 15:41:51
Jens
AW: Vielen Dank
20.11.2003 21:07:44
Klaus
Hallo Jens
Die ähnliche Frage hatte ich am 18.11.03, 12:36:13 Uhr gestellt. Schau Dir bitte die Antwort von WernerB an.
Grüße
Klaus
Anzeige

300 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige