Thema Datum  Von Nutzer Rating
Antwort
Rot Datei schließt komplett
 15.01.2025 13:13:36 Rüdiger
NotSolved
15.01.2025 17:55:16 Gast73922
NotSolved
15.01.2025 18:21:02 Gast73922
NotSolved

Ansicht des Beitrags:
Von:
Rüdiger		 Datum:
15.01.2025 13:13:36		 Views:
31		 Rating:
     
Antwort:
  Ja
Thema:
Datei schließt komplett

Hallo zusammen,

vielleicht seheh ich den Wald vor lauter Bäumen nicht aber ich habe folgende Herausforderung

Ich habe in einem Excel Dokument eine zweite Tabelle die ich per Button aus der Main list öffne und schließe. Die Tabelle öffnet dann in einem zweiten Fenster.
Solange diese aktiv ist und der Tab sichtbar ist auch alles gut.
Wenn ich diese 2. Fenster nun über das Kreuz schließe und der Tab noch eingeblendet ist, schließt Excel beim Betätigen des Button das Dokument komplett, es soll aber nur der Tab ausgeblendet werden.

Ich habe es schon nach dem 

ElseIf Sheets("Liste").Visible = True Then
    Sheets("Liste").Activate
    ActiveWindow.Close

mit folgendem probiert
Elseif 
Sheets("Liste").Visible = True and   Sheets("Liste").active = False Then
Sheets("Liste").Visible = False
..............

Aber auch das funktioniert nicht. Was übersehe ich denn hier?

Sub MListShow()
'******* Display parts list ******************
    Application.ScreenUpdating = False
    If Sheets("Liste").Visible = False Then
    Sheets("Liste").Visible = True
    ActiveWindow.NewWindow
    Sheets("Liste").Activate
    ActiveWindow.Zoom = 75
    Application.WindowState = xlNormal
    Application.Left = 163.75
    Application.Top = 47.5
    Application.Width = 1080
    Application.Height = 633
   ElseIf Sheets("Liste").Visible = True Then
    Sheets("Liste").Activate
    ActiveWindow.Close
    Sheets("Liste").Visible = False
    Application.DisplayAlerts = False
    Sheets("Main list").Select
    End If
    Application.ScreenUpdating = True
    Application.DisplayAlerts = True
End Sub

 

Ihre Antwort
  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen
Thema: Name: Email:



  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen

Thema Datum  Von Nutzer Rating
Antwort
Rot Datei schließt komplett
 15.01.2025 13:13:36 Rüdiger
NotSolved
15.01.2025 17:55:16 Gast73922
NotSolved
15.01.2025 18:21:02 Gast73922
NotSolved