Excel - enumeracion consecutiva con vb

Hola

alguien me podria ayudar a corregir una macro que me haga una enumeracion consecutiva

como ejemplo de lo que quiero hacer para que me entiendan

En la columna A columna B
1.................... 1
1.................... 2
1.................... 3
1.................... 4
1.................... 5
1.................... 6
1.................... 7
1.................... 8

pero en esta macro que agrego a contunuacion lo unico que hace es poner todos los numeros como uno.


Dim i As Integer

Dim strZona$, strMueble$

x = [e1]

strZona$ = [a1]
strMueble$ = [b1]

Hoja1.Select

For i = 1 To x
Range("b1").Select
ActiveCell.FormulaR1C1 = Range("b1").Value + 1

Hoja2.Select
[B65536].End(xlUp).Offset(1, 0) = strZona$
[B65536].End(xlUp).Offset(0, 1) = strMueble$

Hoja1.Select

Next i
end sub

Les agradesco su ayuda, espero y me entiendan de lo que deseo hacer

la verdad q no me queda demasiado claro qué queres hacer...
probá con lo siguiente
...
Range("b1").Offset(i - 1).Select
ActiveCell.Value = i
...

Saludos, desde Baires, JuanC

Disculpa por no explicarme, pero el trabajo que estoy haciendo es de unas hojas quese tienen que imprimir de forma consecutiva pero tambien relacionarmelas en otra hoja

Es decir:

En la celda "A1" pongo el numero de hojas que tengo que imprimir.

En las celdas "E1" y "E5" los numeros que tiene que colocar

por ejemplo:

En "A1" coloco 10
me hace la impresion de 10 hojas.

Pero "E5" es el numero que imprime de forma consecutiva por que en "E1" coloca el numero que yo le asigne.

Es decir
si coloco en "A1" 5
imprime 5 hojas
en "E1"........ el numero 1 (en las 5 hojas me deja 1)
y en "E5"
me imprime en la primera hoja el 1, en la segunda el 2, en la tercera el 3, asi consecutivamente

hasta hay sale todo bien
pero tambien pasa a la segunda hoja y me hace la relacion de las hojas que hace la impresion
es decir
en la celda "B1" coloca el numero de 1,
y en "C1" coloca el "0"; cuando tendria que colocarmela de manera consecutiva como la en las hijas impresiones, ó de la siguiente manera

columna B columna C
1........................... 1
1............................ 2
1............................ 3
1............................ 4
1............................ 5

del cual en la columna c me deja todos con valor cero

espero y me puedas ayudar a corregirla ó decirme como le tengo que hacer

te lo agradeceria

atte pedro garcia