Laufzeitfehler, Abstürze + andere Fehler
09.07.2021 23:38:15
Bernd
kann mir jemand helfen, wa´s an diesem Code falsch ist? Wenn in die Zell emit dem Namen "degC" eine Zahl eingegeben wird, soll sie mit der Formel umgerechnet werden undd in das Feld "degF" eingetragen werden.Zweite Formel genau umgekehrt. Der Code befindet sich in dem Blatt/Register.
Private Sub Worksheet_Change(ByVal Target As Range)
'Berechnung Grad Fahrenheit
If Target.Address = "$M$12" Then
Range("degF") = Range("degC") * 1.8 + 32
End If
'Berechnung Grad Celsius
If Target.Address = "$O$12" Then
Range("degC") = (Range("DegF") - 32) * 5 / 9
End If
End Sub