Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1812to1816
1812to1816
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Exel Fenster in bestimmter grösse öffnen

Forumthread: Exel Fenster in bestimmter grösse öffnen

Exel Fenster in bestimmter grösse öffnen
25.02.2021 19:38:50
Patrik
Hallo Miteinander
Ich benötige wieder mal Eure Hilfe.
Ich möchte ein Excel Fenster in einer bestimmten Grösse und ohne Menüband, Registerkarte usw öffnen.
Ich habe da zwei VBA Codes gefunden die einzeln funktionieren.
Wie bringe ich diese zwei VBA Cods in einen?
Bin dankbar um jede Hilfe.
freundliche Grüsse Patrik
Private Sub Workbook_Open()
With ThisWorkbook
'Menüband ausblenden
Application.DisplayFullScreen = True
'Spalten und Zeilenbezeichnung ausblenden
ActiveWindow.DisplayHeadings = False
'Blattregister unten ausblenden
ActiveWindow.DisplayWorkbookTabs = False
End With
End Sub

Private Sub Workbook_Open()
ActiveWindow.WindowState = xlNormal
With ActiveWindow
.Top = 30
.Left = 10
.Width = 600
.Height = 350
End With
End Sub

Anzeige

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Exel Fenster in bestimmter grösse öffnen
26.02.2021 08:43:22
Yal
Hallo Patrick,
jedes Kind hätte einfach ... probiert (fallen, wieder aufstehen, nochmal probieren).
Manchmal denkt man zu viel.
Private Sub Workbook_Open()
With ThisWorkbook
'Menüband ausblenden
Application.DisplayFullScreen = True
'Spalten und Zeilenbezeichnung ausblenden
ActiveWindow.DisplayHeadings = False
'Blattregister unten ausblenden
ActiveWindow.DisplayWorkbookTabs = False
End With
'End Sub
'Private Sub Workbook_Open()
ActiveWindow.WindowState = xlNormal
With ActiveWindow
.Top = 30
.Left = 10
.Width = 600
.Height = 350
End With
End Sub

Kaum sichtbar, daher erklärt: End Sub und Private Sub in der Mitte sind auskommentiert. Man könnte diese Zeilen auch löschen.
VG
Yal
Anzeige
AW: Exel Fenster in bestimmter grösse öffnen
26.02.2021 16:06:51
Patrik
Hallo Yal
Ich hatte es schon versucht.
Da ich aber keine Ahnung von VBA habe, habe ich es aufgegeben.
Trotzdem recht herzlichen Dank für Deine Hilfe.
Gruss, Patrik
Vielen Dank für die Rückmeldung.
26.02.2021 16:27:14
Yal
Hallo Patrick,
es gibt nur einen Weg: wieder aufstehen, nochmal probieren. ;-)
Schönes WE
VG
Yal
Anzeige
Anzeige
Anzeige

Infobox / Tutorial

Excel Fenster in bestimmter Größe öffnen

Schritt-für-Schritt-Anleitung

Um die Excel Fenstergröße beim Öffnen festzulegen und das Menüband sowie andere Elemente auszublenden, kannst du die folgenden Schritte ausführen:

  1. Öffne Excel und drücke ALT + F11, um den VBA-Editor zu öffnen.

  2. Im Projektfenster wählst du dein Workbook aus (z.B. "VBAProject (DeineDatei.xlsm)").

  3. Doppelklicke auf "DieseArbeitsmappe" oder "ThisWorkbook".

  4. Füge den folgenden Code in das Code-Fenster ein:

    Private Sub Workbook_Open()
   With ThisWorkbook
       'Menüband ausblenden
       Application.DisplayFullScreen = True
       'Spalten und Zeilenbezeichnung ausblenden
       ActiveWindow.DisplayHeadings = False
       'Blattregister unten ausblenden
       ActiveWindow.DisplayWorkbookTabs = False
   End With

   ' Fenstergröße festlegen
   ActiveWindow.WindowState = xlNormal
   With ActiveWindow
       .Top = 30
       .Left = 10
       .Width = 600
       .Height = 350
   End With
End Sub

  5. Speichere deine Arbeitsmappe als Makro-fähige Datei (*.xlsm).

  6. Schließe den VBA-Editor und starte die Arbeitsmappe neu, um die Einstellungen zu testen.

Häufige Fehler und Lösungen

  • Fehler: Das Menüband wird nicht ausgeblendet.

    • Lösung: Stelle sicher, dass die Zeile Application.DisplayFullScreen = True im Code enthalten ist.

  • Fehler: Die Fenstergröße wird nicht wie gewünscht angepasst.

    • Lösung: Überprüfe die Werte für .Top, .Left, .Width und .Height, um sicherzustellen, dass sie deinen Anforderungen entsprechen.

  • Fehler: Fehler beim Ausführen des Makros.

    • Lösung: Vergewissere dich, dass du Makros in Excel aktiviert hast (Datei > Optionen > Sicherheitscenter > Einstellungen für das Sicherheitscenter).

Alternative Methoden

Wenn du die Fenstergröße in Excel nicht über VBA einstellen möchtest, kannst du auch die folgenden Methoden ausprobieren:

  • Manuelles Anpassen: Öffne das Excel-Fenster und ziehe die Ecken, um die Größe anzupassen.

  • HTML-Links: Wenn du ein HTML-Dokument hast, kannst du die HTML Fenstergröße festlegen mit etwas JavaScript:

    <a href="deinlink.html" onclick="window.open('deinlink.html', 'neuesFenster', 'width=600,height=350')">Link in neuem Fenster</a>

Praktische Beispiele

Hier ein konkretes Beispiel, wie das VBA-Skript in einer realen Anwendung aussehen kann:

  1. Du möchtest ein Excel-Dokument erstellen, das beim Öffnen automatisch die Fenstergröße auf 600x350 Pixel anpasst und das Menüband ausblendet.
  2. Füge den oben genannten Code in die ThisWorkbook-Sektion ein.
  3. Speichere die Datei und öffne sie. Du solltest nun das resultierende Fenster ohne Menüband und in der voreingestellten Größe sehen.

Tipps für Profis

  • Wiedervorlage: Du kannst den VBA-Code anpassen und ihn in anderen Arbeitsmappen wiederverwenden, indem du ihn als Vorlage speicherst.
  • Fehlerbehandlung: Implementiere Fehlerbehandlungsroutinen, um unerwartete Probleme im Code zu lösen.
  • Benutzerdefinierte Einstellungen: Erstelle ein benutzerdefiniertes Makro, um verschiedene Fenstergrößen je nach Bedarf einfach zu wechseln.

FAQ: Häufige Fragen

1. Wie kann ich das Menüband wieder einblenden? Du kannst die Zeile Application.DisplayFullScreen = True in deinem VBA-Code entfernen oder auf False setzen.

2. Funktioniert das auch in Excel Online? Nein, VBA-Skripte sind in Excel Online nicht verfügbar. Der Code funktioniert nur in der Desktop-Version von Excel, die Makros unterstützt.

3. Was sollte ich tun, wenn der Code nicht funktioniert? Überprüfe, ob Makros in den Excel-Optionen aktiviert sind und ob du den Code in der richtigen Arbeitsmappe eingefügt hast.

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Anzeige