¿Cómo convertir una cadena de Excel a una fórmula?

Question

Desarrollé una hoja de cálculo con muchas fórmulas y se la envié a un colega cuya política de firewall prohíbe las fórmulas de Excel. (No preguntes). Entonces, usando buscar y reemplazar, antepuse todos los signos iguales con apóstrofes. Entonces eso =CCONCATENATE(A1,A2)se convirtió en '=CONCATENATE(A1, A2). Aunque el firewall dejó pasar el archivo, no nos resulta fácil revertir el proceso. La búsqueda no encuentra el apóstrofo inicial. Los intentos de escapar del apóstrofe o de utilizarlo CHAR(39)para eliminarlo han resultado infructuosos. ¡Gracias por cualquier ayuda!

Answer 1

Al ejecutar esta breve macro, se restaurarán todas sus fórmulas:

Sub RestoreFormulas()
    Dim r As Range

    For Each r In ActiveSheet.UsedRange
        If Left(r.Value, 1) = "=" Then r.Formula = r.Value
    Next r
End Sub