VBA para bucle: bucle a través de un rango de celdas: ejemplos de código VBA

En VBA, puede recorrer un rango de celdas, aplicando acciones a cada celda en el rango.

Si desea probar una condición para cada celda en un rango usando VBA, la mejor manera es recorrer el rango, probando cada celda. Aquí hay dos ejemplos de código para demostrar cómo recorrer un rango. Puede reemplazar el valor de rango para cualquier rango que necesite recorrer.

Bucle a través del rango de celdas

Este ejemplo recorrerá un rango de celdas. La instrucción if prueba la condición si la celda contiene el texto "FindMe" y muestra un cuadro de mensaje con la ubicación del texto si se encuentra.

1234567891011

Public Sub LoopCells ()Dim c como rangoPara cada c dentro del rango ("A1: A10")Si c.Value = "FindMe" EntoncesMsgBox "FindMe encontrado en" & c. DirecciónTerminara siSiguiente cEnd Sub

Bucle a través de toda la columna

Este ejemplo recorre todo el rango de la columna A.

1234567891011

Public Sub LoopColumn ()Dim c como rangoPara cada c en rango ("A: A")Si c.Value = "FindMe" EntoncesMsgBox "FindMe encontrado en" & c. DirecciónTerminara siSiguiente cEnd Sub

Recorrer toda la fila

El siguiente ejemplo recorre la fila 1 considerando que toda la fila es un rango.

1234567891011

Sub LoopRow público ()Dim c como rangoPara cada c en rango ("1: 1")Si c.Value = "FindMe" EntoncesMsgBox "FindMe encontrado en" & c. DirecciónTerminara siSiguiente cEnd Sub