09 Abr 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:
TUTORIALSalvo 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.聽