10/11/2010, 10:27
|
 | | | Fecha de Ingreso: diciembre-2003 Ubicación: A un click de distancia
Mensajes: 1.044
Antigüedad: 21 años Puntos: 11 | |
| Respuesta: Generar correlativo con While VBA - Excel
Hola tazzwt, proba con el siguiente codigo:
Sub correlativos()
Hoja1.Range("a1").Value = 1
Hoja1.Range("a2").Select
Do While ActiveCell.Offset(-1, 0).Value < 100
ActiveCell.Value = ActiveCell.Offset(-1, 0).Value + 1
ActiveCell.Offset(1, 0).Select
Loop
End Sub
Saludos
__________________ -- Nunca te des por vencido, aún vencido -- Web |