Befehle in Makro sauber nacheinander Ablaufen lassen
#1
Hallo, folgendes läuft nicht so richtig sauber durch.

Ich habe bei 2 tabellen in den Eigenschaften Calculation auf false gesetzt. Bei allen anderen steht Berechnen auf Automatisch.

dann habe ich 2 makros für die Tabellen erstellt.

  Worksheets("Tagesplan Löwengruppe").EnableCalculation = True
    Worksheets("Tagesplan Löwengruppe").EnableCalculation = False

es kommt aber vor, dass bei den beiden Tabellen nach erneutem Öffnen der Datei Calculation wieder auf True steht.

Ist das makro falsch oder ändert dies Excel nach dem beenden von selber ?

Gruß Daniel
Top
#2
(10.10.2015, 12:06)Daniel Albert schrieb: Hallo, folgendes läuft nicht so richtig sauber durch.
Ist das makro falsch oder ändert dies Excel nach dem beenden von selber ?

Gruß Daniel

Hallo Daniel,

1. Ich sehe Deine Makros nicht und ich fürchte, den anderen geht es ebenso.
2. Wo steht der Code? Genauer: In welchen Modulen sind die Codes abgelegt?
Top
#3
Moin,

wie Peter schon geschrieben hat: Wir brauchen das komplette Modul. Am besten die ganze *.xls(m), die in diesem Fall auch ohne Daten sein darf.
Beste Grüße
  Günther

Excel-ist-sexy.de
  …schau doch mal rein!
Der Sicherheit meiner Daten wegen lade ich keine *.xlsm bzw. *.xlsb- Files mehr herunter! -> So geht's ohne!
Top
#4
Ok dann habe ich hier mal die bereinigte tabelle

es geht um die beiden Tabelle Tagesplan Tiger- und Löwengruppe. da möchte ich keine Automatische Berechnung haben


Angehängte Dateien
.xlsm   Berechnung abschalten.xlsm (Größe: 457,9 KB / Downloads: 8)
Top
#5
Moin,

"verschlungene Pfade ..." fällt mir dazu ein.

Versuche doch einfach einmal, jeweils in das Modul der betroffenen Tabelle diesen Code einzufügen:

Code:
Private Sub Worksheet_Activate()
  ActiveSheet.EnableCalculation = False
End Sub


das könnte den gewünschten Erfolg bringen. Was da sonst noch wodurch auch immer wieder umgestellt wird vermag ich nicht zu beurteilen, ich habe nicht die Zeit, alle einzelnen Module und die darin enthaltenen Prozeduren einzeln zu analysieren und dann in Sachen Priorität zu werten. Und Konstrukte wie:
Code:
   Worksheets("Tagesplan Tigergruppe").EnableCalculation = True
   Worksheets("Tagesplan Tigergruppe").EnableCalculation = False
irritieren doch etwas. Warum erst auf TRUE und dann auf FALSE?

Grundsätzlich würde ich aber immer noch eine Fehlerbehandlung einbauen und auch nach dem Verlassen des Worksheets die Kalkulationsfähigkeit für alle Tabellen wieder herstellen.
Beste Grüße
  Günther

Excel-ist-sexy.de
  …schau doch mal rein!
Der Sicherheit meiner Daten wegen lade ich keine *.xlsm bzw. *.xlsb- Files mehr herunter! -> So geht's ohne!
[-] Folgende(r) 1 Nutzer sagt Danke an GMG-CC für diesen Beitrag:
  • Daniel Albert
Top
#6
Hallo Günther,

wenn ich mich so richtig gut in Excel auskennen würde hätte ich nicht diese probleme. Mir jemand hier im Forum für die Eintragung der Daten in Tagesplan Tiger und Löwengruppe geholfen. Wenn ich die Berechnungen für alle tabellen auf Automatisch belasse werden die Daten in den Tagesplänen sofort neu berechnet wenn ich etwas in aktive Mitglieder verändere. Da diese Tabelle auf einen laptop im Verein läuft kann damit nicht mehr gearbeitet werden. Daher habe ich nach einer Lösung gesucht in im Internet den Punkt mit Calculation = False in Tabelleneigenschaften gefunden. Damit auch alle anderen inder Arbeit damit arbeiten können wollte ich einen Button hinterlegen der die Datenaktualisierung durchführt. Das funktioniert auch aber nur solange bis ich die Tabelle neu öffne.

Mit dem was du schreibst kann ich nichts anfangen. Ich habe keinen Plan was du meinst. Wäre super wenn du es mir genauer erklären kannst.

Gruß Daniel
Top
#7
Moin Daniel,

ja, das erklärt manches ...
Ich habe mal eben die Berechnung von Hand angeworfen. OK, das dauert ja wirklich eine kleine Ewigkeit, und ich habe nun wirklich keinen lahmen Rechner. Was meine beiden Module angeht: Die sind auch nur eine "Krücke". Aber wie du schon sagtest, Patchwork-Code ...

Mache im VBA-Editor einen Doppelklick (links) auf die Löwen- und die Tigergruppe. Füge jeweils den obigen Code ein (copy/paste) und probiere dann, ob alles wunschgemäß klappt. Und ich schreibe dir gleich noch eine e-Mail ...
Beste Grüße
  Günther

Excel-ist-sexy.de
  …schau doch mal rein!
Der Sicherheit meiner Daten wegen lade ich keine *.xlsm bzw. *.xlsb- Files mehr herunter! -> So geht's ohne!
[-] Folgende(r) 1 Nutzer sagt Danke an GMG-CC für diesen Beitrag:
  • Daniel Albert
Top
#8
(10.10.2015, 14:08)Daniel Albert schrieb: Hallo Günther,

Mit dem was du schreibst kann ich nichts anfangen. Ich habe keinen Plan was du meinst. Wäre super wenn du es mir genauer erklären kannst.

Gruß Daniel

Hallo Daniel,

... und ich kann Dir derzeit leider nicht weiterhelfen, weil ich momentan nur bis Excel2003 mithalten kann.
[-] Folgende(r) 1 Nutzer sagt Danke an Käpt'n Blaubär für diesen Beitrag:
  • Daniel Albert
Top
#9
@ Günter (Käpt'n Blaubär)

gewiss war ich gemeint (GMG-CC), der mit sich mit dem "h" schreibt :05:
Beste Grüße
  Günther

Excel-ist-sexy.de
  …schau doch mal rein!
Der Sicherheit meiner Daten wegen lade ich keine *.xlsm bzw. *.xlsb- Files mehr herunter! -> So geht's ohne!
[-] Folgende(r) 1 Nutzer sagt Danke an GMG-CC für diesen Beitrag:
  • Daniel Albert
Top
#10
Hallo Daniel,

Du hast in allen Blättern die Seitenumbruchvorschau aktiviert. Ändere das in die Ansicht Normal und Du wirst sehen, dass es um einiges flotter wird.

Gruß Uwe
[-] Folgende(r) 1 Nutzer sagt Danke an Kuwer für diesen Beitrag:
  • Daniel Albert
Top


Gehe zu:


Benutzer, die gerade dieses Thema anschauen: 1 Gast/Gäste