Application.Calculation = xlCalculationManual

Question

Hallo,

ich habe zu Beginn eines Codes mit
Application.Calculation = xlCalculationManual
die Zellaktualisierung ausgeschaltet. Dennoch wird während der Prozedur eine Zelle aktualisiert, bevor ich wieder auf automatic umgestellt habe.
die Aktualisierung erfolgt nach einem copy..paste Befehl:

Range("B" & lngLetzteR & ":E" & lngLetzteR).Copy

HIS.Range("G" & HIS.Cells(Rows.Count, 7).End(xlUp).Row + 1).PasteSpecial Paste:=xlValues

Woran kann das liegen? Bin ratlos...
Danke für jeden Tipp!!
Gruß Andreas

Answer 1

Hallo,

kann sein, dass ich zusätzlich noch eine Befehlszeile

MTG.EnableCalculation = False

brauche? Kann mir jemand den Bezug beider Befehle erklären? Danke.
A.

Answer 2

hi Andreas ^^

es gibt einige arten eine Berechnung anzuschubsen

gruss nighty

schaltet das cellereigniss aus bzw an

zum anfang des codes
Application.EnableEvents = false

zum ende des codes
Application.EnableEvents = true

Answer 3

hi Andreas ^^

ich nutze immer wieder gern diese beiden module

in einem makro mit call EventsOff bzw call EventsOn aufrufbar

gruss nighty

Public Sub EventsOff()
With Application
.ScreenUpdating = False
.EnableEvents = False
.Calculation = xlCalculationManual
End With
End Sub

Public Sub EventsOn()
With Application
.ScreenUpdating = True
.EnableEvents = True
.Calculation = xlCalculationAutomatic
End With
End Sub

Answer 4

Hallo nighty,

ok, vielen Dank!
Gruß Andreas