Größe des Workbook biem Start



Excel-Version: 10.0 (Office XP)
nach unten

Betrifft: Größe des Workbook biem Start
von: Dieter
Geschrieben am: 18.05.2002 - 15:52:04

Hallo!
Ich möchte in "Workbook open" die Breite und Höhe der Anwendung festlegen und in "Workbook before close" wieder auf Vollbild schalten. Ich habe bis jetzt kein Beispiel finden können.
Es wäre nett, wenn mir jemand helfen könnte.
Gruß Dieter

nach oben   nach unten

Re: Größe des Workbook biem Start
von: GraFri
Geschrieben am: 19.05.2002 - 07:05:54

Hallo


Option Explicit
Dim Höhe    As Integer
Dim Breite  As Integer


Private Sub Workbook_Open()
    With Application
        Höhe = .Height
        Breite = .Width
        .Width = 800
        .Height = 600
    End With
End Sub

Private Sub Workbook_BeforeClose(Cancel As Boolean)
    With Application
        .Height = Höhe
        .Width = Breite
    End With
End Sub

mfg, GraFri


nach oben   nach unten

Re: Fuktioniert
von: Dieter
Geschrieben am: 19.05.2002 - 08:37:48

Vielen Dank für die Hilfe, fuktioniert prima!
Gruß Dieter

 nach oben

Beiträge aus den Excel-Beispielen zum Thema "Größe des Workbook biem Start"