Consejo: Otros idiomas son traducidos por Google. Puedes visitar el English versión de este enlace.
Iniciar sesión
x
or
x
x
Suscríbete
x

or

¿Cómo encontrar y reemplazar valores superiores o inferiores a un valor específico en Excel?

Tal vez, hay múltiples datos en su hoja de trabajo, ahora, desea encontrar todas las celdas que contienen el valor mayor o menor que un número específico, y luego reemplazarlos con otro valor que necesita a la vez. La función de Buscar y Reemplazar normal no se aplica para resolver este problema, ¿tiene alguna otra sugerencia útil para hacer frente a esta tarea?

Buscar y reemplazar valores mayores que / menores que un valor específico con código VBA

Encontrar y reemplazar valores mayores que / menores que un valor específico con Kutools para Excel


Encuentre y seleccione celdas específicas y luego reemplácelas con otro valor:

Kutools for Excel, Seleccionar celdas específicas la característica puede ayudarlo a encontrar y seleccionar las celdas específicas, y luego puede reemplazarlas por otro valor o formatear las celdas seleccionadas que necesita. Descarga gratuita Kutools for Excel ahora.

doc replace mayor que 8-8

Kutools for Excel: con más de 200 útiles complementos de Excel, de prueba sin límite en días 60. Descargar y prueba gratis ahora!



Por ejemplo, encontraré todos los valores que sean mayores que 500 y los reemplazaré con 0.

reemplazar doc mayor que 1

El siguiente código de VBA puede ayudarlo a reemplazar los valores que sean mayores o menores que un valor específico a la vez, por favor haga lo siguiente:

1. Mantenga presionado el ALT + F11 llaves, y abre la Microsoft Visual Basic para aplicaciones ventana.

2. Hacer clic recuadro > Móduloy pegue el siguiente código en Módulo Ventana.

Código VBA: busca y reemplaza valores mayores o menores que un valor específico

Sub FindReplace()
'Update 20150423
Dim Rng As Range
Dim WorkRng As Range
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
For Each Rng In WorkRng
    If Rng.Value > 500 Then
        Rng.Value = 0
    End If
Next
End Sub

3. Entonces presione F5 clave para ejecutar este código, y seleccione los datos de rango que desea reemplazar desde el cuadro de solicitud, vea la captura de pantalla:

reemplazar doc mayor que 2

4. Y luego haz clic OK, y puede ver que todos los valores mayores que 500 han sido reemplazados con 0.

reemplazar doc mayor que 3

Nota: En el código anterior, puede cambiar las siguientes variables a su gusto.

  • Si Rng.Value > 500 Entonces
  • Rng.Value = 0

  • Si no está familiarizado con el código, puedo hablar de una herramienta útil- Kutools for Excel, Con su Seleccionar celdas específicas función, puede seleccionar rápidamente las celdas que necesita y luego reemplazarlas de una vez.

    Kutools for Excel : con más de 300 útiles complementos de Excel, de prueba sin límite en días 60.

    Después de instalar Kutools for Excel, haz los siguientes pasos:

    1. Seleccione el rango de datos que desea buscar y reemplazar.

    2. Hacer clic Kutools > Seleccionar > Seleccionar celdas específicas, mira la captura de pantalla:

    doc replace mayor que 4 4

    3. En la Seleccionar celdas específicas cuadro de diálogo, haga clic en Celda opción bajo Tipo de selección, y elige Más que del Tipo específico desplegable, e ingrese el valor que desea usar en el cuadro de texto además Más que, mira la captura de pantalla:

    reemplazar doc mayor que 5

    4. Luego haga clic OK botón, todas las celdas más grandes que 500 se han seleccionado inmediatamente, luego ingrese el valor que necesita reemplazar y presione Ctrl + Enter teclas juntas, todos los valores seleccionados han sido reemplazados al mismo tiempo. Ver capturas de pantalla:

    reemplazar doc mayor que 6  2 reemplazar doc mayor que 7

    Nota: En el Seleccionar celdas específicas cuadro de diálogo, puede usar otros criterios, como Menos que, Equivale, contiene, Y así sucesivamente.

    Haga clic para obtener más información sobre esta función Seleccionar celdas específicas de Kutools for Excel.

    Descargue y pruebe de forma gratuita Kutools for Excel Now!


    Kutools for Excel: con más de 200 útiles complementos de Excel, de prueba sin límite en días 60. Descargar y prueba gratis ahora!


    Artículos relacionados:

    ¿Cómo encontrar y reemplazar coincidencias exactas en Excel?

    ¿Cómo reemplazar el texto con las imágenes correspondientes en Excel?

    ¿Cómo encontrar y reemplazar el color de relleno en Excel?


    Kutools for Excel: la mejor herramienta de productividad de Office aumenta su productividad en un 80%

    • Super Formula Bar (edite fácilmente varias líneas de texto y fórmula); Diseño de lectura (lee y edita fácilmente un gran número de celdas); Pegar en rango filtrado...
    • Combinar celdas / filas / columnas y mantener datos; Contenido de celdas divididas; Combinar filas duplicadas y suma / promedio... Prevenir células duplicadas; Comparar rangos...
    • Seleccione Duplicado o Único Filas; Seleccionar filas en blanco (todas las celdas están vacías); Super Find y Fuzzy Find en muchos libros de trabajo; Selección aleatoria ...
    • Copia exacta Celdas múltiples sin cambiar la referencia de fórmula; Crear referencias automáticamente a múltiples hojas; Insertar viñetas, Casillas de verificación y más ...
    • Fórmulas favoritas e insertadas rápidamente, Gamas, cuadros y cuadros; Cifrar celdas con contraseña Crear una lista de correo y enviar correos electrónicos ...
    • Extracto del texto, Agregar texto, Eliminar por posición, Eliminar espacio; Crear e imprimir subtotales de paginación; Convertir entre contenido de celdas y comentarios...
    • Súper filtro (guardar y aplicar esquemas de filtro a otras hojas); Clasificación avanzada por mes / semana / día, frecuencia y más; Filtro especial por negrita, cursiva ...
    • Combinar libros de trabajo y hojas de trabajo; Combinar tablas basadas en columnas clave; Dividir datos en varias hojas; Conversión por lotes xls, xlsx y PDF...
    • Más de potentes funciones de 300. Funciona con Office 2007-2019 y 365. Soporta todos los idiomas. Fácil despliegue en compañía. Funciones completas de prueba gratuita de 60-day.
    pestaña kte 201905

    Office Tab lleva la interfaz con pestañas a Office y hace que su trabajo sea mucho más fácil

    • Habilitar la edición y lectura con pestañas en Word, Excel, PowerPoint, Editor, Acceso, Visio y Proyecto.
    • Abra y cree varios documentos en nuevas pestañas de la misma ventana, en lugar de en nuevas ventanas.
    • ¡Aumenta tu productividad en un 50% y reduce cientos de clics de ratón por ti todos los días!
    fondo officetab
    Say something here...
    symbols left.
    You are guest ( Sign Up? )
    or post as a guest, but your post won't be published automatically.
    Loading comment... The comment will be refreshed after 00:00.
    • To post as a guest, your comment is unpublished.
      Olesia · 2 months ago
      If only there was a way to do the same without losing formulas(
    • To post as a guest, your comment is unpublished.
      Shervin · 3 years ago
      It's really awesome!!! I love it!