Macro para crear contador en cualquier celda

12/12/2008 - 16:37 por Peter | Informe spam
Tengo otra pregunta:
Es posible modificar la macro para crear el mismo efecto en cualquier celda
que yo ubique al lado izquierdo de la columna donde tengo la lista de filas
utilizadas?
Es decir no solo en la columna "A" y "B".
Saludos.
Peter

"Cacho" wrote:



Sub NumeraDesdeUno()

Cells(ActiveCell.Row, 1) = 1

Range(Cells(ActiveCell.Row,1),Range("B65536").End(xlUp).Offset(,-1)).DataSeries

End Sub


 

Leer las respuestas

#1 Juan M
12/12/2008 - 18:12 | Informe spam
"Peter" escribió
Tengo otra pregunta:
Es posible modificar la macro para crear el mismo efecto en cualquier
celda
que yo ubique al lado izquierdo de la columna donde tengo la lista de
filas
utilizadas?
Es decir no solo en la columna "A" y "B".
Saludos.
Peter

"Cacho" wrote:


Sub NumeraDesdeUno()

Cells(ActiveCell.Row, 1) = 1

Range(Cells(ActiveCell.Row,1),Range("B65536").End(xlUp).Offset(,-1)).DataSeries

End Sub








Hola Peter,

Debes cambiar la referencia de la columna.
La sintaxis de Cells es Cells(fila, columna), en el código se indica que la
columna es la 1 que corresponde a la columna A, Prueba a cambiarlo por la
que a ti te interese.

Un saludo,
Juan

Preguntas similares