Escritura de instrucciones ejecutables

Una instrucción ejecutable inicia la acción. Puede ejecutar un método o función, y puede recorrer bloques de código o desviarse a través ellos. Las instrucciones ejecutables contienen a menudo operadores condicionales o matemáticos.

En el ejemplo siguiente se usa un elemento For Each... Siguiente instrucción para recorrer en iteración cada celda de un rango denominado MyRange en Sheet1 de un libro de Microsoft Excel activo. La variable c es una celda de la colección de celdas contenidas en MyRange.

Sub ApplyFormat() 
Const limit As Integer = 33 
For Each c In Worksheets("Sheet1").Range("MyRange").Cells 
    If c.Value > limit Then 
        With c.Font 
            .Bold = True 
            .Italic = True 
        End With 
    End If 
Next c 
MsgBox "All done!" 
End Sub

La instrucción If...Then...Else del ejemplo comprueba el valor de la celda. Si el valor es mayor que 33, la instrucción With establece las propiedades Bold e Italic del objeto Font para esa celda. Las instrucciones If...Then...Else terminan con End If. Puede que no sea necesaria la especificación de la instrucción With puesto que las instrucciones que contiene se ejecutan automáticamente en el objeto que sigue a la palabra clave With.

La instrucción Next llama a la siguiente celda de la colección de celdas que se encuentra en MyRange.

La función MsgBox (que muestra un cuadro de diálogo de Visual Basic integrado) muestra un mensaje que indica que el procedimiento Sub ha acabado de ejecutarse.

Consulte también

Soporte técnico y comentarios

¿Tiene preguntas o comentarios sobre VBA para Office o esta documentación? Vea Soporte técnico y comentarios sobre VBA para Office para obtener ayuda sobre las formas en las que puede recibir soporte técnico y enviar comentarios.