"Komisches" Verhalten von Excel

[Kapt.Ulrich]

Liebes Forum,
Mein Excel macht gerade für mich unverständliche Dinge.
Ich habe 2 Dateien die mit (fast) den gleichen Makros arbeiten.
Das Makro soll eine bestimmte Anzahl von Zellen in der Zeile mit „x“ füllen. Das funktioniert auch.
ABER
In der einen Datei werden die „x“ mit dem Starten des Makros gesetzt, das dauert keinen Augenblick, bei der anderen Datei wird alle 0,5sec ein x gesetzt und man kann in Ruhe „mitzählen“
Das ist das eine Komische, aber einen habe ich noch:
Wenn die langsame Datei geöffnet ist, dann wird auch die ehemals Schnelle ganz langsam solange die Langsame geöffnet ist.
Das verstehe ich nicht und frage mal höflich, ob das einen bekannten Grund hat.
Die beiden in Rede stehenden Dateien hänge ich mit an. Ich habe das auch auf einem anderen Rechner ausprobiert mit demselben Ergebnis.
Die Makros in den Dateien zählen nur Farben und setzen bzw. löschen „x“
Mein Excel ist übrigens Office 2013
Dank schon mal jetzt


Olaf Ulrich

[maninweb]

Hallo,

langsames Schreiben kommt daher, dass Du die Zellen (generell) einzeln beschreibst. Du kannst das etwas optimieren,
indem Du ScreenUpdating und die Berechnung abschaltest und nach dem Schreiben wieder einschaltest. Eine Schleife
ist allerdings nicht notwendig. Das geht auch z.B. wie folgt mit dem 6x ...

Code:

Sub mach6x()
 
  Application.ScreenUpdating = False
  Application.EnableEvents = False
  Application.Calculation = xlCalculationManual
 
  ActiveCell.Cells(1, 1).Resize(1, 24).Value = "x"
  ActiveCell.Offset(rowOffset:=0, columnOffset:=24).Activate
 
  Application.Calculation = xlCalculationAutomatic
  Application.EnableEvents = True
  Application.ScreenUpdating = True
 
End Sub

Warum aber jetzt die eine Datei schneller ist, erscheint mir so auf die Schnelle nicht ersichtlich.

Gruß

[Kapt.Ulrich]

Hammer...
woher kennst du nur all die tollen Funktionen (... rhetorische Frage)
Das funktioniert jetzt ja wie geschmiert! Danke.

Das andere Verhalten mit mal schnell, mal langsam, ist jetzt nebensächlich, bleibt aber (finde ich) "komisch".

Schönes Fest und NoCorona
Gruß
Kapt.Ulrich