mc_gulasch
Erfahrenes Mitglied
Moin zusammen,
endlich mal kühler heute, wegen dem Regen gestern....egal....zum Thema:
Wie schaffe ich es denn auf eine Zelle zuzugreifen die aufgrund falscher Formatierung (Bsp: =ae) zu einer ungültigen Formel unmgewandelt wird und dadurch den Zelleintrag #NAME? erzeugt? Normalerweise steht ja noch "=ae" in der Zelle, aber wie schaffe ich es beispielsweise auf eben diesen "=ae" zuzugreifen um daraus "Text(=ae,1)" oder ähnliches zu machen?
Danke sagt das Gulasch!
//edit:
Hab es hinbekommen:
endlich mal kühler heute, wegen dem Regen gestern....egal....zum Thema:
Wie schaffe ich es denn auf eine Zelle zuzugreifen die aufgrund falscher Formatierung (Bsp: =ae) zu einer ungültigen Formel unmgewandelt wird und dadurch den Zelleintrag #NAME? erzeugt? Normalerweise steht ja noch "=ae" in der Zelle, aber wie schaffe ich es beispielsweise auf eben diesen "=ae" zuzugreifen um daraus "Text(=ae,1)" oder ähnliches zu machen?
Danke sagt das Gulasch!
//edit:
Hab es hinbekommen:
Visual Basic:
Sub test()
Dim b As String
Dim a As String
Dim c As String
Dim d As Variant
For i = 1 To 1796
Range("A" & i).Select
b = ActiveCell.FormulaR1C1
If Not (InStr(1, b, "=", 0) = 0) Then
b = Replace(b, "=", "")
a = "=Text(" & Chr(34)
c = Chr(34) & ",1)"
d = a & b & c
ActiveCell.FormulaR1C1 = d
End If
Next
End Sub
Zuletzt bearbeitet: