wend - "While.. End While" no funciona en VBA?

while visual basic excel

Question

El código a continuación es VBA para Excel. Estoy usando el editor de Visual Basic que viene con Excel 2007.

Dim counter As Integer
counter = 1
While counter < 20
    counter = counter + 1
end while ''<- the compiler is complaining about this statement

El código no compila Sobre el código tengo solo declaraciones. Según MSDN esto debería funcionar, pero no es así. ¿Lo que ha sucedido?

Answer 1

VBA no es VB / VB.NET

La referencia correcta para usar es Do..Loop Statement (VBA) . Consulte también el artículo Excel VBA For, Do While y Do Until . Una forma de escribir esto es:

Do While counter < 20
    counter = counter + 1
Loop

(Pero un For..Next podría ser más apropiado aquí).

Feliz codificación.

Answer 2

While construcciones terminan no con un End While sino con un Wend .

While counter < 20
    counter = counter + 1
Wend

Tenga en cuenta que esta información está disponible en la documentación; solo presione F1 . La MSDN trata de Visual Basic .NET, no de VBA. Si bien (sin juego de palabras) existe cierto grado de superposición en la sintaxis entre VBA y VB.NET, no se puede simplemente asumir que la documentación de uno se puede aplicar directamente a la otra.

También en el archivo de ayuda de VBA:

Sugerencia La instrucción Do...Loop proporciona una forma más estructurada y flexible de realizar bucles.