title image


Smiley Symbolleisten ausblenden
Hi Leute

wie kann ich Symbolleisten, ScrollArea, usw. ausblenden.

Das ganze soll aber passieren wenn ich die Mappe öffne. Dann soll alles verschwinden was ich in den VBA-Code eingegeben habe. Der Code den ich habe da muß ich zuerst in eien Zelle klicken das der VBA-Code Aktiv wird. Wer kann mir helfen den Code so umzustellen das sich alles ändert sobald ich die Mappe Öffne???????



Gruß Jacky69



Hier der Code.



'Kein Scrollen möglich und diverse sachen beim Start ausgeblendet

Private Sub Worksheet_SelectionChange(ByVal Target As Excel.Range)

Worksheets("Tabelle4").ScrollArea = "a1:r36"

ActiveSheet.DisplayPageBreaks = True



With ActiveWindow

.DisplayHeadings = True 'Zeilen-und Spaltenköpfe

.DisplayGridlines = True 'Gitternetzlinien

.DisplayWorkbookTabs = True 'Tabreiter unten (tabelle1;tabelle2;...)

.DisplayHorizontalScrollBar = True 'Horizontale Bildlaufleiste

.DisplayVerticalScrollBar = True 'Vertikale Bildlaufleiste







End With



End Sub



geschrieben von

Login

E-Mail:
  

Passwort:
  

Beitrag anfügen

Symbol:
 
 
 
 
 
 
 
 
 
 
 
 
 

Überschrift: