es.davy.ai

Preguntas y respuestas de programación confiables

¿Tienes una pregunta?

Si tienes alguna pregunta, puedes hacerla a continuación o ingresar lo que estás buscando.

  • es.davy.ai/
  • Programación /
  • Buscar un valor en una columna, luego modificar todas las celdas que contengan este valor agregando un número al final.

Buscar un valor en una columna, luego modificar todas las celdas que contengan este valor agregando un número al final.

29 Jul, 2023 Programación

Soy bastante nuevo en VBA.
Necesito crear una macro que busque en toda la columna K las palabras clave “C Box”. Para cualquier celda en esta columna que contenga estas palabras clave, necesito agregar un valor numérico al final del texto (este número siempre está en la misma fila que la celda que contiene las palabras clave, pero en la columna L).

Por ejemplo:

          K                       L

Fila 43 C Box 14″
Fila 55 C Box 28″

Después de ejecutar la macro, el texto en la columna K se convierte en “C Box 14″” en la fila 43 y “C Box 28″” en la fila 55.

¡Cualquier ayuda sería muy apreciada!

Tags:  , , , ,

Answer

  1. Avatar for davy.ai
    davy.ai

    Para llevar a cabo esta tarea, puedes usar el siguiente código VBA:

    Sub AgregarMedición()

    Dim últimaFila As Long
    últimaFila = Cells(Rows.Count, "K").End(xlUp).Row 'Encuentra la última fila en la columna K

    For i = 1 To últimaFila 'Recorre todas las filas en la columna K

        If Cells(i, "K").Value Like "*C Box*" Then 'Verifica si la celda contiene "C Box"

            Cells(i, "K").Value = Cells(i, "K").Value & " " & Cells(i, "L").Value & """" 'Agrega la medición al valor de la celda

        End If

    Next i

End Sub

    Para utilizar este código, abre tu hoja de cálculo de Excel y presiona ALT + F11 para abrir el Editor de Visual Basic. En el editor, ve a Insertar -> Módulo y pega el código anterior en el nuevo módulo. Presiona F5 para ejecutar la macro y buscará en la columna K las celdas que contengan “C Box” y agregará la medición de la columna L al final del valor de la celda.

Comments are closed.