Saltar al contenido

fatima_saru

Miembros
  • Contador de contenido

    1
  • Unido

  • Última visita

Sobre fatima_saru

  • Rango
    Novato

Configuraciones

  • Campo que utilizas como separador de argumentos Array

Visitantes recientes del perfil

El bloque de últimos visitantes está desactivado y no se puede mostrar a otros usuarios.

  1. Buenas tardes a todos! Tengo una base de datos de la cual necesito que mi macro busque una palabra y la reemplaza por otra, mi codigo lo hace pero el proble es que si es una palabra compuesta no modifica tod el texto es decir si tengo en mi tabla lo siguiente: 1.-velo 2.-velo 1 3.-velo 2 4.-Velo 5.-VeLo y lo quiero cambiar por la palabra VELO solo se modifican la 1,4 y 5 les envio mi codigo espero puedan orientarme Sub Reemplazar() Dim Tex As Variant, Car As Variant, Lar As Integer Application.ScreenUpdating = False On Error Resume Next Set a = Sheets("Hoja1") uf = Range("E" & Rows.Count).End(xlUp).Row For i = 1 To uf a.Range("A" & i) = Replace(a.Range("E" & i), "*", vNullString) Next i Application.ScreenUpdating = True End Sub
×
×
  • Crear nuevo...

Información importante

Echa un vistazo a nuestra política de cookies para ayudarte a tener una mejor experiencia de navegación. Puedes ajustar aquí la configuración. Pulsa el botón Aceptar, si estás de acuerdo.