1
lanzamiento Microsoft Excel , haga clic en la pestaña de " desarrolladores" y haga clic en Visual Basic para iniciar la ventana del editor de VBA. Haga clic en el menú "Insertar" y haga clic en " módulos" para añadir un nuevo módulo de código . Agregue el código siguiente para crear un nuevo procedimiento sub y dos variables "entero" :
highlightRows Private Sub ( ) guía
Dim x As Integer
Y Dim As Integer
Página 2
Rellenar las diez primeras filas de la columna A1 con IDs "entero" con un "Porque ... Loop : "
Para X = 1 a 10
Range ("A" y X). Seleccione
Range (" A" y X). Valor = X
Siguiente X
3
Resalte cada otra identificación con la siguiente " For ... Loop : "
para y = 1 Para 10
filas ( y & " :" & y). Seleccione
Con Selection.Interior
. patrón = xlSolid
. PatternColorIndex = xlAutomatic
. color = 65535
. TintAndShade = 0
. PatternTintAndShade = 0
extremo con
y = y + 1
Siguiente Ÿ
4
tipo "End Sub" para poner fin a su procedimiento y haga clic en "F5 " para ejecutarlo. Cambie a Microsoft Excel para ver los resultados .