Gruppe
UDF
Problem
Der Text aus Zelle A1 soll in eine Formel und die Formel aus A2 soll in Text umgewandelt werden.
StandardModule: basMain
Function Text2Formula(sTxt As String)
sTxt = Application.Substitute(sTxt, ",", ".")
Text2Formula = Evaluate(sTxt)
End Function
Function Formula2Text(rng As Object)
Formula2Text = rng.Formula
End Function