Durch Private Sub keine Funktion Rückgängig mehr
09.04.2006 22:58:14
Chactory
Kürzlich erhielt ich den einen sehr nützlichen Tipp. Excel erzeugt leider bei Zellen, die einen Zeilenumbruch (Alt+Enter) enthalten, nach dem Bearbeiten eine Formatierung mit Ausrichtung/Teststeuerung/Zeilenumbruch. Dadurch verrutscht der Arbeitsbereich jedesmal, was bei etlichen Hundert Zellen einigermaßen nervt. ;-) Das folgende VBA-Applet verhindert dies effektiv:
Private Sub Worksheet_Change(ByVal Target As Range)
With Target
.WrapText = False
End With
End Sub
Ein unerwünschter Nebeneffekt dieses VBA-Applet ist aber, daß die Funktion Rückgängig machen aufgehoben wird. Probiert es selbst!
1. Warum tut es das wohl?
2. Wie kann ich das tolle VBA-Programm verändern, um damit weiterarbeiten zu können?
Vielen Dank, Chactory