Flackern des Mauszeigersymbols unterbinden
02.12.2004 15:13:08
Rudolf
ich habe folgenden Codeschnipsel geschrieben, um angehängte Leerzeichen in allen Zellen zu entfernen. Dies führt zu einem ziemlich nervösen Flackern des
Mauszeigers (ständiger Wechsel zwischen dickem Kreuz und Pfeil). Application.Screenupdating = False hilft dabei nicht. Ich meine mich erinnern zu können, dass es in früheren Excel-Versionen eine andere "Abschaltfunktion" gegeben hat, die besser geeignet war, kann aber nirgends mehr einen Hnweis darauf finden. Hat jemand einen Vorschlag für mich?
Vielen dank im Voraus,
Rudolf.
Sub Test()
' Makro5 Makro
' Makro am 02.12.2004 von Bodendorfer aufgezeichnet
Application.ScreenUpdating = False
'am Ende vorhandene Leerzeichen entfernen
Dim z As Range
For Each z In ActiveSheet.UsedRange
z.Value = Trim(z.Value)
Next z
Application.ScreenUpdating = False
End Sub