Hallo Zusammen,
hab hier diesen Code aber weis nicht genau was dieser bewirkt: Public Sub GMS(Optional ByVal Modus As Boolean = False) Static lngCalc As Long With Application .ScreenUpdating = Modus .EnableEvents = Modus .DisplayAlerts = Modus .EnableCancelKey = IIf(Modus, 1, 0) If Not Modus Then lngCalc = .Calculation If Modus And lngCalc = 0 Then lngCalc = -4105 .Calculation = IIf(Modus, lngCalc, -4135) .Cursor = IIf(Modus, -4143, 2) End With End Sub Das mit "Modus" als Boolean versteh ich ja noch aber was bewirken die -4105 ?
Woher stammen die Zahlen gibt es dazu eine Liste?
Kopfkratz Matze