. " Loop" La característica más poderosa de una computadora es su capacidad de automatizar, y que se basa en un concepto simple de programación llamado Si el idioma es Visual Basic , Ensamblador , Fortran , C o Java , la comodidad de la informática viene desde el bucle . Esencialmente , puede indicar a la computadora para repetir un determinado cientos de tareas , miles o incluso millones de veces. Es fácil programar un bucle simple en Visual Basic para cambiar varias celdas en Excel. Cosas que necesitará
MS Excel con VB
Ver Más instrucciones
escribir un programa simple con un Loop
1

Mantenga pulsada la tecla " Alt" y presione la tecla " F11 " en una nueva hoja de cálculo en Excel. Mira el Editor de Visual Basic, y si ves la hoja de cálculo en la pantalla en su lugar, seleccione " Herramientas ", seleccione "Macro ", luego seleccione " Editor de Visual Basic ".

2 Haga clic en " Insertar" y seleccione "Módulo ". Escriba el siguiente código cuando se ve el cursor debajo de la palabra " (General ) ": .

Sub SimpleLoop ()

Dim I Como IntegerWorksheets ( "Sheet1 ") ActivateRange ("A1 " ) Seleccione

' comentario: Aquí viene la de Loop

For I = 1 a 100ActiveCell.Value IActiveCell.Offset = ( 1 , 0 ) ActivateNext I Love

. ». comentario: extremos del lazo en la declaración anterior

End Sub
3

Revise su código cuidadosamente para errores - los dos personajes después de la palabra " SimpleLoop " están entre paréntesis. Asegúrese de que su código es exactamente igual que el código anterior
4

Ejecute el programa : . Seleccione "Ejecutar ", luego seleccione " Ejecutar Sub /UserForm. "
5

Confirmar los resultados del programa haciendo clic en la "X" verde en la parte superior izquierda de la pantalla . Tenga en cuenta que el programa ha escrito los números del 1 al 100 en los primeros 100 células en la pantalla.
Modificar el programa
6

Mantenga pulsada la tecla " Alt" y presione "F11 ". Cambiar el programa para hacer 100 cálculos rápidos y almacenar el resultado : Mueva el cursor a la línea que dice: " ActiveCell.Value = I". Cámbielo para que lea como sigue:

ActiveCell.Value = 1.05 ^ ( I)
7

Ejecute el programa. Haga clic en la "X" verde de nuevo y asegúrese de que el programa ha realizado 100 cálculos y los almacena en la hoja de cálculo . Calcular manualmente 1,05 elevado a la potencia 2 para entender el cálculo.
8

Borrar la pantalla manteniendo pulsada la tecla "Ctrl " y la tecla " A" Suelte ambas teclas y pulsar " Del. "
9

Cambie su programa para escribir un mensaje de 200 veces : Mantenga pulsada la tecla " Alt" y presione "F11 ". Mueva el cursor al número " 100 " y sustituirla por " 200 ". Mueve el cursor una línea hacia abajo y reemplazar " yo" con "Te quiero calcular ! " La línea de código debería tener este aspecto :

ActiveCell.Value = "¡ Me encanta computing"
10

Ejecute el programa de nuevo. Haga clic en la "X" verde de nuevo y asegúrese de que el programa se ha escrito " Me encanta la informática ! " 200 veces.