Has =TEXT(. . .,0) been applied?

[Pete]

Is there a way to tell if a value in a cell has been treated with the
=TEXT formula, and then pasted back as values?

Pete

 

[joeu2004]

Is there a way to tell if a value in a cell has been
treated with the =TEXT formula, and then pasted back
as values?

Certainly not literally. You cannot know what was in the cell before
it was changed.

However, you can write a macro that determines if a cell contains a
formula or not.

Function cellHasFormula(r As Range) As Boolean
cellHasFormula = r.hasFormula
End Function

AFAIK, there is no way to accomplish the same thing using just Excel
functions.

 

[Claus Busch]

Hi Pete,

Am Wed, 1 Jun 2011 08:25:16 -0700 (PDT) schrieb Pete:

Is there a way to tell if a value in a cell has been treated with the
=TEXT formula, and then pasted back as values?

for TEXT formula in range("C1:C10"):
Sub TextFormula()
Dim rngCell As Range

For Each rngCell In Range("C1:C10")
With rngCell
If Left(.Formula, 5) = "=TEXT" Then
.Value = .Value
End If
End With
Next
End Sub


Regards
Claus Busch

 

[Pete]

Hi Pete,

Am Wed, 1 Jun 2011 08:25:16 -0700 (PDT) schrieb Pete:


for TEXT formula in range("C1:C10"):
Sub TextFormula()
Dim rngCell As Range

For Each rngCell In Range("C1:C10")
With rngCell
    If Left(.Formula, 5) = "=TEXT" Then
        .Value = .Value
    End If
End With
Next
End Sub

Regards
Claus Busch

Thank you both joeu2004 and Claus.

Pete