Live-Forum - Die aktuellen Beiträge
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Kontrolle ob Datei offen ist

Forumthread: Kontrolle ob Datei offen ist

Kontrolle ob Datei offen ist
07.08.2003 08:33:25
Dani
Hallo Leute
Hab da eine kleine Frage an die Profis,
Wie kann ich via VBA kontrollieren ob eine gewisse Datei offen ist.
Wenn ja das folgnender Befehl ausgefürht wird -->Windows("Dateiname").Activate
Wenn nein das dieser Befehl ausgeführt wird --> Workbooks.Open FileName:= _
"\\Dateiname" _
, UpdateLinks:=3
Danke für eure Hilfe
Daniel B.
Anzeige

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Kontrolle ob Datei offen ist
07.08.2003 08:44:30
WernerB.
Hallo Dani,
dazu kann ich Dir dieses Makro (mit zugehöriger Funktion) empfehlen:

Function MappeOffen(MappeName As String) As Boolean
Dim StName As String
On Error GoTo Nonexistent
stName = Workbooks(MappeName).Name
MappeOffen = True
Exit Function
Nonexistent:
MappeOffen = False
End Function


Sub DateiZustand()
Dim DatNam As String
DatNam = "MappeA.xls"
If MappeOffen(DatNam) = True Then
MsgBox "Datei ist geöffnet !"
Else
MsgBox "Datei ist nicht geöffnet !"
End If
End Sub

Viel Erfolg wünscht
WernerB.

Anzeige
;

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige