Unidad 4. VBA. Más estructuras (I)

Sentencias repetitivas

SENTENCIA FOR … NEXT

Permite ejecutar un determinado número de veces el grupo de sentencias incluidos en el cuerpo del For … Next

Sintaxis

FOR VarIndice = ValInit TO ValFInal [ STEP Incr ]

[Sentencias]

Para ello requiere de una variable que funciona a modo de índice (VarIndice) el cual empieza en un primer valor (ValInit), por cada iteración que se realiza, se incrementa en una determinada cantidad (Incr), hasta llegar al extremo (ValFinal), después del cual, continua con la siguiente sentencia, debajo de Next. Si el incremento es la unidad, no se usa STEP Incr

Ejemplo 12

Se desea obtener la suma de los cuadrados de los 20 primeros números de 1 a 20.

Definiremos las siguientes variables:

I : Para la variable índice

Suma : Para contener la suma: Suma = Suma + I.^2

Sub Suma01()

Dim I As Variant

Dim Suma As Double

Suma = 0

For I = 1 To 20

Suma = Suma + I^2

MsgBox("La suma de los primeros 20 números es: " & Suma)

End Sub

Noviembre-2010

Pág. 4.1