Live-Forum - Die aktuellen Beiträge
Datum
Titel
25.04.2024 23:47:55
Datum ausweisen, wenn definierte Summe erreicht ist
25.04.2024 21:40:53
Excel Datenquelle aus dem Web mit Anmeldung?
25.04.2024 21:21:16
Zellkommentar in UserForm anzeigen und bearbeiten
25.04.2024 21:13:13
Kalenderwochen addieren
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1088to1092
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1088to1092
1088to1092
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Automatische Berechnung ausschalten

Automatische Berechnung ausschalten
P.Mackes
Hallo,
ich habe mein Problem bereits hier gepostet: http://www.office-loesung.de/ftopic323793_0_0_asc.php
Leider habe ich keine zufriedenstellende Antwort erhalten.
Ich möchte die automatische Berechnung in Excel automatisch abschalten lassen.
Das funktuioniert mit folgendem Code nur, sofern ich Excel über das Startmenü oder ähnlichers öffne.
Der Code befindet sich in dem ThisWorkbook Module der PERSONAL.XLS. 
Private Sub workbook_open()
Application.Calculation = xlManual
End Sub
öffne ich Excel über eine Datei (irgendein gespeichertes workbook), dann scheitert der Code mit der Nachricht, dass die Method Calculation für das Object Calculation failed.
Ich habe sowohl workbook_open als auch auto_open, private und public subs, application event code, xlManual als auch xlCalculationManual und andere Sachen versucht.
Leider bekomme ich das Problem nicht in den Griff.
Hat jemand eine Idee wie das Problem zu lösen ist?
Gruß Peter

5
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Benutzer
Anzeige
AW: Automatische Berechnung ausschalten
20.07.2009 09:35:14
Hajo_Zi
Hallo Peter,
zum ausführen von Code aus der Personl.xls in jeder Datei stand vor kurzm folgendes im Forum.
Open jede Datei
https://www.herber.de/forum/archiv/1084to1088/t1085044.htm
füge den folgenden Code in deine PERSONL.xls ein:
in ein Klassenmodul: clsEvents 

Option Explicit
Public WithEvents app As Excel.Application
Private Sub app_WorkbookOpen(ByVal Wb As Workbook)
MsgBox "Sie haben das Workbook " & Wb.Name & " geöffnet!"
End Sub
' in allgemeines Modul: Modul1
Option Explicit
Public clsObject As New clsEvents
' in das Modul: DieseArbeitsmappe
Option Explicit
Private Sub Workbook_Open()
Set clsObject.app = Excel.Application
End Sub

Von Kawensmann

Anzeige
AW: Automatische Berechnung ausschalten
20.07.2009 10:30:04
P.Mackes
Hllo Hajo,
ich habe den Code soweit umgesetzt.
Im Class Module clsEvents habe ich die Message Box durch
With app
.Calculation = xlManual
.CalculateBeforeSave = False
End With
ausgetauscht.
Leider erhalte ich beim öffnen einer beliebigen *.xls nach wie vor denselben Fehler.
Kannst du mir noch etwas auf die Sprünge helfen?
Gruß
AW: Automatische Berechnung ausschalten
20.07.2009 10:37:55
Hajo_Zi
Hallo Peter,
ich sehe Deinen Code nicht. Darum sagt mir app auch nichts. ich hätte da WB geschrieben.
Der Code war nicht von mir darum kann ich da auch wenig helfen.
Gruß Hajo
Anzeige
AW: Automatische Berechnung ausschalten
20.07.2009 10:50:07
P.Mackes
Okay.
Ich habe das mal mit dem Code von Cardexperte kombiniert.
Ich verstehe es zwar nicht wirklich...aber es funktioniert...^^
mein ClassModule clsEvents sieht jetzt wie folgt aus
Public WithEvents app As Excel.Application
Private Sub app_WorkbookOpen(ByVal Wb As Workbook)
On Error Resume Next
If errorlevel  0 Then Exit Sub
With Application
.Calculation = xlManual
.CalculateBeforeSave = False
End With
End Sub
(ohne das Option Explicit)
auf jeden Danke an euch beide
AW: Automatische Berechnung ausschalten
20.07.2009 09:41:37
Cardexperte
Hallo,
hast du schon einmal versucht eine Fehlerroutine einzubauen, da ja die autoberechnung ausgeschaltet ist kommt bei erneuter Ausschaltung der Fehler:

Private Sub workbook_open()
on error resume next
if errorlevel  0 then exit sub
Application.Calculation = xlManual
End Sub

Anzeige

303 Forumthreads zu ähnlichen Themen

automatische Zellberechnung deaktivieren
Günther

Hallo zusammen,
ich habe das Problem, dass sich in einer EXCEL-Datei mit vielen benutzerdefinierten Funktionen die automatische Zellberechnung nicht unterdrücken lässt. Selbst wenn man diese Option auf 'Manuell' setzt (in Optionen oder per VB) löst immer noch jede! Änderung eines Zellwertes...
29.09.2009 09:49:10
Thread-ID: 1106135
3 Beiträge
Anzeige
Automatische Berechnung wirklich ausschalten?
herman_the_german

Hallo,
am Anfang eines jeden Monats, soll eine Datei archiviert werden, da in dieser Datei "live" Berechnung stattfinden, soll die Datei beispielsweise am 01.01.16 natürlich nicht mit den neu berechneten Werte exportiert werden, sondern den Stand von 31.12.2016 aufweisen. Demzufolge habe ic...
07.01.2016 07:39:27
Thread-ID: 1467531
6 Beiträge
Automatische Berechnung ausschalten geht nicht
Marko

Hallo liebe Leute,
ich versuche verzweifelt, die automatische Berechnung der Tabelle z.B. perPrivate Sub UserForm_Initialize()
Application.Calculation = xlCalculationManual
End Subabzuschalten, und sie nach drücken des Verlassenknopfes wieder anzuschalten. Leider bekomme ich immer d...
04.04.2003 10:15:50
Thread-ID: 240237
8 Beiträge
Anzeige
automatische Berechnung ausschalten
Richard

Hallo zusammen,
wie kann ich die automatische Berechnung eines EINZELNEN Tabellenblatts aus- und wieder einschalten?
Der Rest des Datei soll automatisch berechnet werden (z.Bsp. Autofilter-Werte).
Danke Richard
07.03.2005 11:20:44
Thread-ID: 581244
2 Beiträge
automatisch Berechnen funktioniert nicht
t4z

Hi Leute,
kann mir jmd folgendes Phänomen erklären?
Excel-Datei enthält Formeln, die auf andere Zellen innerhalb der Mappe referenzieren. Die Quelldaten ändern sich, jedoch die Formeln nicht. Unter Extras-Optionen-Berechnung ist "automatisch" aktiv. Ein Drücken auf F9 bringt keinen Erfo...
07.08.2008 17:13:07
Thread-ID: 1000040
3 Beiträge
automatische Zellberechnung deaktivieren
Günther

Hallo zusammen,
ich habe das Problem, dass sich in einer EXCEL-Datei mit vielen benutzerdefinierten Funktionen die automatische Zellberechnung nicht unterdrücken lässt. Selbst wenn man diese Option auf 'Manuell' setzt (in Optionen oder per VB) löst immer noch jede! Änderung eines Zellwertes...
29.09.2009 09:49:10
Thread-ID: 1106135
3 Beiträge
Formel automatisch berechnen Mappe nicht
Joni

Hi,
gibt es eine Möglichkeit die Mappe auf händisch berechnen zu stellen, 2 Zellen aber trotzdem automatisch berechnen zu lassen?
Danke für euer Hilfe.
Gruß Joni
26.09.2010 21:09:33
Thread-ID: 1179483
5 Beiträge
Automatische Berechnung wirklich ausschalten?
herman_the_german

Hallo,
am Anfang eines jeden Monats, soll eine Datei archiviert werden, da in dieser Datei "live" Berechnung stattfinden, soll die Datei beispielsweise am 01.01.16 natürlich nicht mit den neu berechneten Werte exportiert werden, sondern den Stand von 31.12.2016 aufweisen. Demzufolge habe ic...
07.01.2016 07:39:27
Thread-ID: 1467531
6 Beiträge
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige
Archiv - Verwandte Themen
Forumthread
Beiträge
2
3
5
7
2
1
2
2
4
5
7
2
1
3
1
1
8
1
2
4
2
3
3
7
6