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

Forumthread: Datei öffnen und ausblenden (VBA)

Datei öffnen und ausblenden (VBA)
14.08.2008 14:55:00
David
Folgendes Makro soll einfach nur eine Datei öffnen, die für die aktuelle Tabelle (offen) gebraucht wird und anschließend ausblenden:

Sub auto_open()
Workbooks.Open Filename:= _
"X:\Finanz\GP\BV\LE 2008\Zahlen.xls"
ActiveWindow.Visible = False
End Sub


Komischerweise wird sowohl die hier geöffnete als auch die öffnende Datei ausgeblendet. Warum? Ich habe auch schon versucht, ActiveWindow irgendwie durch den Dateinamen zu ersetzen, hab aber bisher keine gültige Syntax gefunden.
Wäre für einen entsprechenden Tip dankbar.
Gruß
David

Anzeige

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

Betreff
Datum
Anwender
Anzeige
AW: Datei öffnen und ausblenden (VBA)
14.08.2008 15:12:00
Daniel
Hi
im Prinzip sollte Windows("Zahlen.xls").visible = false die Datei zuverlässig ausblenden.
alternativ kannst du die Datei auch mit GetObject("X:\Finanz\GP\BV\LE 2008\Zahlen.xls")öffnen.
beim Öffnen über GetObject wird die geöffnete Datei automatisch ausgeblendet.
Gruß, Daniel

Anzeige
AW: @Daniel
14.08.2008 15:31:00
Petra
Hi Daniel
und wie kann ich eine mit GETOBJECT geöffnete Datei sichtbar machen, bzw. schliessen?
lieben Gruß Petra

Windows("Dateiname.xls").Visible = True
14.08.2008 21:26:00
Andre´

erledigt
14.08.2008 15:18:44
David
hab's doch noch selbst hinbekommen.
Anscheinend merkt eine Datei sich den Zustand, wenn sie im ausgeblendeten Modus geschlossen wird, so dass sie beim erneuten Öffnen bereits ausgeblendet war.
Gruß
David
Anzeige
;

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Anzeige
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
Anzeige
Anzeige

Infobox / Tutorial

Datei öffnen und ausblenden mit VBA


Schritt-für-Schritt-Anleitung

  1. Öffne den Visual Basic for Applications (VBA) Editor:

    • Drücke ALT + F11, um den Editor zu öffnen.
  2. Erstelle ein neues Modul:

    • Klicke im Menü auf Einfügen > Modul.
  3. Füge den folgenden Code ein:

    Sub auto_open()
       Workbooks.Open Filename:= _
       "X:\Finanz\GP\BV\LE 2008\Zahlen.xls"
       ActiveWindow.Visible = False
    End Sub
  4. Speichere das Makro:

    • Speichere die Datei als .xlsm, um die Makros zu aktivieren.
  5. Führe das Makro aus:

    • Drücke F5 im VBA-Editor, um das Makro auszuführen.

Das Makro öffnet die Datei und blendet sie aus. Wenn du Probleme hast, dass auch die aktuelle Datei ausgeblendet wird, überprüfe die Sichtbarkeit der Fenster.


Häufige Fehler und Lösungen

  • Fehler: Beide Dateien werden ausgeblendet.

    • Lösung: Verwende Windows("Zahlen.xls").Visible = False, um nur die geöffnete Datei auszublenden.
  • Fehler: Das Makro funktioniert nicht.

    • Lösung: Stelle sicher, dass der Pfad zur .xls-Datei korrekt ist und die Datei nicht schreibgeschützt ist.

Alternative Methoden

Eine alternative Methode, um eine Excel-Datei zu öffnen und auszublenden, ist die Verwendung von GetObject. Hier ist der Code:

Sub openAndHide()
    Dim wb As Workbook
    Set wb = GetObject("X:\Finanz\GP\BV\LE 2008\Zahlen.xls")
    wb.Windows(1).Visible = False
End Sub

Diese Methode öffnet die Datei und blendet sie automatisch aus.


Praktische Beispiele

  1. Excel-Datei öffnen und ausblenden:

    • Nutze den oben genannten Code in deinem VBA-Modul, um eine .xls-Datei zu öffnen und sie sofort auszublenden.
  2. Datei sichtbar machen:

    • Um eine mit GetObject geöffnete Datei wieder sichtbar zu machen, verwende:
      wb.Windows(1).Visible = True

Tipps für Profis

  • Achte darauf, die Datei im richtigen Format zu speichern, um die Funktionalität von VBA zu gewährleisten.
  • Nutze Error Handling in deinem VBA-Code, um Fehler beim Öffnen von Dateien besser zu verwalten.
  • Wenn du häufig mit vielen .xls-Dateien arbeitest, erstelle eine Funktion, die die Sichtbarkeit mehrerer Dateien gleichzeitig steuert.

FAQ: Häufige Fragen

1. Wie kann ich eine ausgeblendete Excel-Datei wieder sichtbar machen?
Um eine ausgeblendete Excel-Datei sichtbar zu machen, verwende den Befehl Windows("Dateiname.xls").Visible = True.

2. Was passiert, wenn ich die Excel-Datei im ausgeblendeten Modus schließe?
Eine Excel-Datei merkt sich ihren Zustand. Wenn sie im ausgeblendeten Modus geschlossen wird, bleibt sie beim nächsten Öffnen ebenfalls ausgeblendet.

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