wie kann man im Excel definieren, das Excel autom die Dokumente immer mit
125% Zoom öffnet, auch neue.
Im Netz gab es den Hinweis, dass man die Standard .xlt (mappe.xlt) Datei
anpassen muss. Die gibt es aber bei mir auf dem System gar nicht!
Weiß jemand wie man das unter Excel 2000 macht?
--
Gruß Udo
> Im Netz gab es den Hinweis, dass man die Standard .xlt (mappe.xlt) Datei
> anpassen muss. Die gibt es aber bei mir auf dem System gar nicht!
Starte Excel, geh auf Fenster -> Einblenden, w�hle die PERSONL.xls. Dann
Deine �nderungen vornehmen, Datei schlie�en und speichern. Anschlie�end
Excel neu starten.
--
Gr��e
Peter
Mit freundlichem Gru� aus der Rattenf�ngerstadt Hameln
Frank Arendt-Theilen
--
(ehem. MVP f�r Excel)
Website: www.xl-faq.de
Microsoft - Excel, Bedingte Formatierung, ISBN: 978-3-86645-806-2
der Punkt einblenden ist bei mir ausgegraut!
Danke!
> wie kann man im Excel definieren, das Excel autom die Dokumente immer mit
> 125% Zoom öffnet, auch neue.
Gar nicht, das ist nicht möglich.
> Im Netz gab es den Hinweis, dass man die Standard .xlt (mappe.xlt) Datei
> anpassen muss. Die gibt es aber bei mir auf dem System gar nicht!
Eine XLT-Datei ist im Prinzip eine XLS-Datei, nur mit dem Unterschied
das diese als Vorlage für eine XLS-Datei genutzt wird.
> Weiß jemand wie man das unter Excel 2000 macht?
Leider ist das nicht so einfach, weil zu allem Überfluß auch noch die
Zoom-Eigenschaften dem Fenster und nicht der Tabelle zugeordnet ist,
aber dennoch:
Es gäbe die Möglichkeit das alles mit Ereignis-Makro's zu machen,
welche dann sinnvoller Weise in der PERSONL.XLS platziert werden müssen.
Über diese könnte man beim Öffnen/neu Erstellen/Tabelle hinzufügen
einfach alle Tabellen/Fenster durchlaufen und diese auf 125% zoomen.
Als erstes brauchst Du eine PERSONL.XLS, wie's geht steht hier:
http://www.online-excel.de/excel/singsel_vba.php?f=113#s2
Der angehängte Code muss in das Codemodul "DieseArbeitsmappe" in der
PERSONL.XLS, wie's geht steht hier:
http://www.online-excel.de/excel/singsel_vba.php?f=44#s3
Außerdem musst Du in der Registerkarte Sicherheit unter
Extras\Makro\Sicherheit den Punkt Niedrig anklicken und Excel einmal
komplett schließen und wieder öffnen. Wenn Du alles richtig gemacht
hast geht's.
Andreas.
Option Explicit
Private WithEvents App As Excel.Application
Private Sub App_NewWorkbook(ByVal Wb As Workbook)
'Wenn eine neue Mappe erstellt wird
Dim Sh As Worksheet, ThisSheet As Worksheet
'Bildschirm/Ereignisse aus
Application.ScreenUpdating = False
Application.EnableEvents = False
'Aktuelles Blatt merken
Set ThisSheet = Wb.ActiveSheet
'Alle Blätter auf 125% zoomen
For Each Sh In Wb.Sheets
Sh.Activate
ActiveWindow.Zoom = 125
Next
'Zurück auf aktuelles Blatt
ThisSheet.Activate
'Bildschirm/Ereignisse an
Application.EnableEvents = True
Application.ScreenUpdating = True
End Sub
Private Sub App_WorkbookNewSheet(ByVal Wb As Workbook, _
ByVal Sh As Object)
'Wenn neue Tabelle hinzugefügt wird
ActiveWindow.Zoom = 125
End Sub
Private Sub App_WorkbookOpen(ByVal Wb As Workbook)
'Wenn eine Mappe geöffnet wird
App_NewWorkbook Wb
End Sub
Private Sub Workbook_Open()
'Wenn die PERSONL.XLS geöffnet wird
Set App = Excel.Application
End Sub
Nur als Idee, vielleicht hilft es ja:
stelle die Bildschirmdarstellung in Windows auf größere Schrift, dann wird
_alles_ größer dargestellt.
Klicke dazu rechts auf eine freie Stelle auf dem Windows-Desktop, im Kontextmenü
wähle Eigenschaften, dann die Registerkarte Einstellungen. Hier klicke auf den
Knopf "Erweitert" und stelle auf der Registerkarte "Allgemein" die
DPI-Einstellungen auf das gewünschte Maß.
Gruß
Bernhard Sander
Danke!