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
If... Entonces... La instrucción 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. La instrucción With puede guardar la escritura porque 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 integrado de Visual Basic) muestra un mensaje que indica que el procedimiento Sub ha terminado de ejecutarse.
Vea 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.