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

Datei öffnen bzw. Fenster wechseln

Forumthread: Datei öffnen bzw. Fenster wechseln

Datei öffnen bzw. Fenster wechseln
04.01.2004 10:30:08
Stephan
Einen schönen Sonntag.

Ich möchte eine bereits angelegte Datei per Makro öffnen.
Wenn diese Datei aber bereits geöffnet ist, dann soll halt nur das
Fenster gewechselt werden. Wie kann ich die Abfrage machen, welcher
Ausdruck gehört zwischen If und Then?

If Windows("Archiv.xls") = geöffnet Then
Windows("Archiv.xls").Activate
Else
Workbooks.Open FileName:="C:\Eigenorganisation\Archiv.xls"
End If

Vielen Dank für Eure Hilfe
Stephan
Anzeige

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Datei öffnen bzw. Fenster wechseln
04.01.2004 10:35:14
Hajo_Zi
Hallo Stephan

auf Select, Activate usw. kann in VBA zu 99% verzichtet werden

Sub Test()
Dim BoOffen As Boolean
BoOffen = False
For Each x In Workbooks
If x.Name = "Auftragsplanung Übersicht.XLS" Then
Workbooks("Auftragsplanung Übersicht.XLS").Save
BoOffen = True
Exit For
End If
Next
If BoOffen = False Then Workbooks.Open Filename:=StNetz & "Auftragsplanung Übersicht.XLS"
End Sub


Bitte keine Mail, Probleme sollten im Forum gelöst werden.

Microsoft MVP für Excel

Das Forum lebt auch von den Rückmeldungen.
Betriebssystem XP Pro und Excel Version XP Pro


Anzeige
AW: Datei öffnen bzw. Fenster wechseln
04.01.2004 11:04:14
Stephan
Vielen Dank Hajo_Zi,

hat mir sehr geholfen.

Stephan
;

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