title image


Smiley Manuell berechnen bei Start der Arbeitsmappe setzten
Hi,



ich möchte beim öffnen einer Arbeitsmappe die automatischen berechnung der Zellen abschalten.



dazu verwende ich folgende SUB



Private Sub Workbook_Open()

ActiveWorkbook.Worksheets("Eingabeparameter").EnableSelection = xlUnlockedCells

ActiveWorkbook.Worksheets("Eingabeausdruck").EnableSelection = xlUnlockedCells

Application.MoveAfterReturnDirection = xlToRight

Application.Calculation = xlCalculationManual

End Sub



leider werden nur die beiden ersten Anweisungen ausgeführt, obwohl das ganze Macro durch läuft.



Vor dem Schließen der Datei will ich es wieder auf xlCalculationAutomatik setzten was auch funktioniert.

Mach irgend was falsch oder liegt das mal wieder an "meinem" Excel



Grüße Beach
--
e-mail: Thomas.Bachmaier@arcor.de

wer mir per mail antworten will muß unbedingt den Begriff Spotlight
im Betreff unterbringen, da die mail sonst ungesehen gelöscht wird.

geschrieben von

Login

E-Mail:
  

Passwort:
  

Beitrag anfügen

Symbol:
 
 
 
 
 
 
 
 
 
 
 
 
 

Überschrift: