Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
1012to1016
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
Inhaltsverzeichnis

If Befehl bei Workbook open

If Befehl bei Workbook open
09.10.2008 22:54:54
Alex
Folgendes Problem:
Ich möchte ganz gerne, wenn die Arbeitsmappe geschlossen wird,
dass geprüft wird, on noch weitere Arbeitsmappen offen sind.
Wenn nein, soll der Befehl Application.DisplayFullScreen = False
ausgeführt werden.
Wenn nein, dann Application.DisplayFullScreen = True

Private Sub Workbook_BeforeClose(Cancel As Boolean)
Application.DisplayFullScreen = False
End Sub


vielen Dan kfür Deine Hilfe
Gruß
Alex

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: If Befehl bei Workbook open
10.10.2008 00:04:00
Tino
Hallo,
so geht’s, die Dateien müssen sich aber in der gleichen Applikation befinden.
Microsoft Excel Objekt DieseArbeitsmappe
Option Explicit 
 
Private Sub Workbook_BeforeClose(Cancel As Boolean) 
If Workbooks.Count = 1 Then 
 Application.DisplayFullScreen = False 
Else 
 Application.DisplayFullScreen = True 
End If 
End Sub 


Gruß Tino

www.VBA-Excel.de


Anzeige
AW: If Befehl bei Workbook open
10.10.2008 00:34:00
Alex
Hallo Tino,
vielen Dank für Deinen Support,
hat gut geklappt.
Gruß
Alex
AW: If Befehl bei Workbook open
10.10.2008 00:08:54
Erich
Hi Alex,
so:

Private Sub Workbook_BeforeClose(Cancel As Boolean)
Application.DisplayFullScreen = Workbooks.Count > 1
' oder
'  Application.DisplayFullScreen = Workbooks.Count = 1
End Sub

Brauchst du die erste oder die zweite Variante? Du hast 2 mal "Wenn nein" geschrieben...
Rückmeldung wäre nett! - Grüße von Erich aus Kamp-Lintfort

AW: If Befehl bei Workbook open
10.10.2008 00:35:31
Alex
Hallo Erich,
auch vielen Dank für Deinen Support,
deine Version hat auch gut geklappt.
Gruß
Alex
PS: Das erst mal war nein und beim zweiten mal ja gemeint.
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige