title image


Smiley Markierung verschieben!
Hi,



probiere es mal so:









Option Explicit



Sub workbook_open()

'Code kommt in DieseArbeitsmappe

Application.MoveAfterReturnDirection = xlDown

End Sub



Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)

'Code kommt in DieseArbeitsmappe

Application.MoveAfterReturnDirection = xlToRight

End Sub







Code eingefügt mit Syntaxhighlighter 4.0





geschrieben von

Login

E-Mail:
  

Passwort:
  

Beitrag anfügen

Symbol:
 
 
 
 
 
 
 
 
 
 
 
 
 

Überschrift: