Makro nur bei Zelländerung
04.02.2007 07:33:59
dreho
das untenstehende Makro wird scheinbar jedesmal ausgeführt, sobald am entsprechenden Tabellenblatt etwas geändert wird.
Ich möchte aber, dass der Befehl nur ausgeführt wird, wenn die Zelle (5,46) geändert wird.
Es erzeugt durch das Ein- und Ausblenden von Zeilen bei jeder Eingabe in einem beliebigen Feld ein kurzes Flackern.
Danke für Antwort und Gruss dreho
Private Sub Worksheet_Change(ByVal Target As Range)
If Cells(5, 46) = 1 Then bmjan
If Cells(5, 46) = 2 Then bmfeb
If Cells(5, 46) = 3 Then bmmrz
End Sub
Private Sub bmjan()
Application.Goto Reference:="bmjahr"
Selection.RowHeight = 0
Application.Goto Reference:="bmo01"
Selection.RowHeight = 16.5
End Sub
Anzeige