Aquí les dejo este documento para que puedan estudiar para su examen, que tengan bonito fin de semana.
Macros en Excel
sábado, 12 de noviembre de 2011
viernes, 11 de noviembre de 2011
Código Macro Fibonacci
Sub fibonacci()
Cells(1, 2) = Int(Rnd() * 10)
Cells(2, 2) = Int(Rnd() * 10)
i = 1
Do While i < 21
Cells(i + 2, 2) = Hoja1.Cells(i, 2) + Cells(i + 1, 2)
i = i + 1
Cells(i + 1, 2).Select
Loop
End Sub
Cells(1, 2) = Int(Rnd() * 10)
Cells(2, 2) = Int(Rnd() * 10)
i = 1
Do While i < 21
Cells(i + 2, 2) = Hoja1.Cells(i, 2) + Cells(i + 1, 2)
i = i + 1
Cells(i + 1, 2).Select
Loop
End Sub
jueves, 10 de noviembre de 2011
miércoles, 9 de noviembre de 2011
Suscribirse a:
Entradas (Atom)