Excel sehr langsam
Chris
folgendes Makro bewirkt, dass in dem angegebenem Range jeweils der erste Buchstabe groß geschrieben wird bzw, alle Buchstaben groß. Funktioniert soweit wunderbar. Problem ist nur, dass Excel sehr langsam ist. Es braucht ca. 4 Sekunden bevor es nach Tastendruck reagiert. Erst wenn ich das Makro deaktiviere läuft es in Sachen Reaktion nach Tastendruck ganz normal Hat jmd. eine Idee, wie man Excel dazu zu überreden kann, trotzdem normal zu reagieren? Vielen Dank schonmal.
Dim Zelle As Range
Dim Zelle2 As Range
For Each Zelle In Range("E5:E54").Cells
Zelle = UCase(Zelle)
Next Zelle
Application.ScreenUpdating = False
For Each Zelle2 In Range("B5:C54")
Zelle2 = UCase(Mid(Zelle2, 1, 1)) + LCase(Mid(Zelle2, 2, Len(Zelle2)))
Next Zelle2
Application.ScreenUpdating = False