MACROS DE EXCEL

Reemplazar valores de una tabla con otra tabla de referencia

Reemplazar valores de una tabla con otra tabla de referencia

Nombre de la funci贸n: REPLACE

La siguiente macro nos permite reemplazar valores de una tabla en hoja1 con otra tabla de referencia en hoja2:

    Sub Replace()
    Dim Sh1 As Worksheet
    Dim Sh2 As Worksheet
    Dim FndList, x&
    Set Sh1 = Sheets(1)
    Set Sh2 = Sheets(2)
    FndList = Sh2.Cells(1, 1).CurrentRegion
    For x = 1 To UBound(FndList)
        Sh1.Cells.Replace What:=FndList(x, 1), Replacement:=FndList(x, 2), LookAt:=xlPart
    Next
    End Sub

 

Dentro de la hoja2 la columna A debe contener todos los valores originales que queremos reemplazar y la columna B debe contener todos los valores nuevos que queremos incluir en la tabla de la hoja1.

Te recomiendo ver el siguiente link con m谩s videos de Macros 煤tiles de Excel聽AQU脥.

驴No sab茅s como instalar esta macro? 隆No te preocupes!聽 Aqu铆 est谩 la soluci贸n:

Salvo aclaraci贸n, todas las f贸rmulas y macros de este sitio est谩n configuradas para aplicarse sobre la celda A1.聽Algunas f贸rmulas se encuentran encerradas entre llaves {} debido a que son f贸rmulas matriciales. Estas llaves no deben introducirse tecle谩ndolas, sino que se generan autom谩ticamente al aceptar la f贸rmula pulsando Control+Shift+Enter al mismo tiempo.聽Las f贸rmulas de este sitio son compatibles con versiones de Microsoft Excel庐 2010 o superiores.聽