ich habs schon mal gefragt aber ich kriegs nicht hin
also ich will dass in einer zelle eine rechnung steht 5+6*7/2 zb und in der anderen das ergebnis
wie geht denn das?
Private Sub Worksheet_Change(ByVal Target As Range)
If Cells(Target.Row, 1) <> "" Then
Cells(Target.Row, 2) = "=" & Cells(Target.Row, 1)
End If
End Sub
Function TextAlsWert(Zelle)
TextAlsWert = Application.Evaluate(Zelle.Formula)
End Function