Macro que enumere celdas de 1 a X segun condicion

[SebastianFelipe]

Saludos a todos, soy un miembro nuevo del foro y además un nuevo participante en todo esto del vba, por lo que les agradezco todo el labor que cumplen en este foro ayudando a los recién iniciados...

Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes iniciar sesión aquí

 

[SebastianFelipe]

he logrado encontrar un codigo que enumera, el problema que está en el eje Y ....
Podría adaptarse este código al eje X?

Sub Enumera()
Dim i As Integer
Dim n As Integer
Dim maxi As Integer
maxi =...

Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes iniciar sesión aquí

 

[SebastianFelipe]

Sub Enumera()
Dim i As Integer
Dim n As Integer
Dim maxi As Integer
maxi = 1
n = 1
maxi = Range("XFD3").End(xlUp).Column
For i = 1 To maxi
If Cells(2, i).Value > "" Then 'sigo enumerando
Cells(3...

Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes iniciar sesión aquí