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

Forumthread: 2 Arbeitsmappen öffen

2 Arbeitsmappen öffen
17.05.2017 07:55:52
olga
Guten Morgen,
ich öffene gleichzeitig 2 Dateien, wobei eine ausgeblendet wird.
Wenn ich nun die erste Datei schliesse wird auch die zweite Datei geschlossen.
Das ist alles richtig so. Excel wird nicht beendet.
Öffne ich nun erste Datei wieder, dann wird die zweite Datei nicht mehr geöffnet.
Was mache ich falsch?
Danke!
Gruß,Olga
https://www.herber.de/bbs/user/113630.xlsm
https://www.herber.de/bbs/user/113631.xlsm
Anzeige

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

Betreff
Datum
Anwender
Anzeige
AW: 2 Arbeitsmappen öffen
18.05.2017 10:21:22
fcs
Hallo Olga,
du hast in deinem Makro Aktionen stehen, die nach Schliesen der Datei "StartMappe.xlsm" stehen.
Diese werden nicht mehr ausgeführt.
Unter anderem werden die Ereignismakros nicht wieder aktiviert. Dadurch wird beim 2. Öffnen der Datei Ereignismakro "Workbook_Open" nicht ausgeführt.
Du musst das Makro wie folgt umbauen:
Sub Datei_schliessen()
With Application
.ScreenUpdating = False
.DisplayAlerts = False
.EnableEvents = False
End With
Application.Workbooks(sD).Close savechanges:=True 'Arbeitsmappe StartData schliesen
With Application
.ScreenUpdating = True
.DisplayAlerts = True
.EnableEvents = True
End With
Application.Workbooks(sF).Close savechanges:=True 'Arbeitsmappe Startmappe schliesen
End Sub
Im WorkBook_BeforeClose-Ereignismakro musst du die Zeile
   Cancel = False

weglassen.
Willst du das Schliesen über die Schaltfläche erzwingen, dann muss du es wie in dieser angepassten Datei machen. Im Schließen-Makro wird eine zusäzliche Variable (Public) aud True gesetzt und im Workbook_BeforeClose wird diese dann geprüft.
https://www.herber.de/bbs/user/113664.xlsm (StartMappe.xlsm)
Gruß
Franz
Anzeige
AW: 2 Arbeitsmappen öffen
18.05.2017 11:23:29
olga
Hallo Franz,
vielen Dank für Deine Hilfe.
Es funktioniert.
Danke!
Gruß
Olga
;

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Anzeige
Anzeige
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
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