Bienvenido a la mayor comunidad de usuarios EXCEL

Regístrate gratis ahora para ver contenidos y descargas sin restricciones!

Regístrate gratis

Macro para reemplazar parte de una formula

GuadalupeH

Member
Registrado
30 Ago 2021
Mensajes
35
Hola, tengo el siguiente problema ocupo cambiar esta formula =T125*#¡REF! tengo varias celdas donde quiero quitar el *#¡REF! por vacio, ocupo una macro porque ya me he hecho este procedimiento...
Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes
iniciar sesión aquí
 
Última edición:
Solución
Guadalupe, este código funciona bien:
Código:
Sub CambiarFórmulas()
    Dim Celda As Range, Fórmula As String
    For Each Celda In ActiveSheet.UsedRange.SpecialCells(xlCellTypeFormulas)
        Fórmula = Celda.FormulaLocal
        If Right(Fórmula, 7) = "*#¡REF!" Then
            Fórmula = Replace(Fórmula, "*#¡REF!", "")
            Celda.FormulaLocal = Fórmula
        End If
    Next Celda
End Sub

Adjunto archivo corregido, un saludo, Fernando
No esta lleno de errores, si AT4 le quitas el error, te dejara usar el archivo y veras que cuando cambias la medida de la ventana el precio cambia. Por eso mi pregunta es macro para cambiar...
Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes
iniciar sesión aquí
 
Última edición:
Guadalupe, este código funciona bien:
Código:
Sub CambiarFórmulas()
    Dim Celda As Range, Fórmula As String
    For Each Celda In ActiveSheet.UsedRange.SpecialCells(xlCellTypeFormulas)...
Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes
iniciar sesión aquí
 

Adjuntos

Volver
Arriba