EXCEL VBA elimina el contenido especificado.

Se puede aplicar lo siguiente cuando C5 contiene varios contenidos para buscar, como C5=ACD/AD/EF/HG:

Sub? Eliminar()

¿Configuración? expresión regular? =?CreateObject("VBScript.Expresión regular")

regex. ¿patrón? =?"["?& amp? Reemplazar([c5],?"/",?"|")?& amp? "]"

¿Configuración? ¿Rng? =?[e9:z20]

arr? =?Rng. Valor

¿Para qué? ¿I? =?1?¿Adónde ir? Deuda

¿Para qué? j? =?1?¿Adónde ir? UBound(arr, 2)

¿Si? regex.test(arr(i,j)?luego?arr(i,j)?=?empty

luego

luego

Valor Rng.? =?llegar)

¿Fin? Submarino