If Target.Address
08.03.2004 20:19:02
Ernst Dunkel
Kann mir bitte jemand in VBA weiter helfen.
Bei Eingabe eines Wertes in E6 (Raumnummer) soll das Geschoss bestimmt werden bzw. in H7 eingesetzt werden.
Z.B. bei Eingabe von 101 in E6 wird in H7 1.OG eingesetzt.
Private Sub Worksheet_Change(ByVal Target As Excel.Range)
If Target.Address = ("$E$6") Then
Wenn E6 < 0 dann H7 = UG
Wenn E6 < 100 dann H7 = EG
Wenn E6 < 200 dann H7 = 1.OG
usw.
Mit freundlichen Grüßen
Ernst Dunkel