Calcula de abajo hacia arriba

Solo consultas sobre macros y código VBA Excel.

Reglas del Foro
1. Antes de hacer tu pregunta intenta con el buscador de este foro (muchas preguntas ya fueron respondidas antes!)
2. Si haces una nueva pregunta, es muy recomendable que adjuntes el ejemplo Excel para poder comprenderla mejor!
3. Realiza tu pregunta de forma clara, explicando bien cada paso de lo que haces y tendrás más probabilidad de respuesta!
Compartir en:
     

Calcula de abajo hacia arriba

Notapor Luis Morales » 12 Ene 2012 20:11

Buenas tardes en el foro, me pueden ayudar a que esta macro corra teniendo un rango variable, dado que los reportes van cambiando cada vez que se bajan del sistema, la macro que dejo, la realice con el grabador de macros y me da los rangos fijos y corre arriba hacia abajo, por lo que yo lo que quiero es que busque el ultimo dato de la columna I, una vez que lo encuentra que empiece hacer los calculos de abajo hacia arriba hasta terminar el la fila I2.
No tiene los permisos requeridos para ver los archivos adjuntos a este mensaje.
* Te recomendamos estos productos Excel: Manual de Macros | Manual de Funciones | Nuevas Funciones | ddTraDa
Luis Morales
Miembro Nuevo
Miembro Nuevo
 
Registrado: 12 Ene 2012 17:38

Re: Calcula de abajo hacia arriba

Notapor jfmart » 17 Ene 2012 10:57

Hola.
Para hallar la última fila con datos de la columna "I" podrías utilizar:
Código: Seleccionar todo
Dim UltimaFila As Long

UltimaFila = Range("I" & CStr(Cells.Rows.Count)).End(xlUp).Row

Para recorrer la hoja podrías utilizar un bucle For:
Código: Seleccionar todo
Public Sub Ejemplo()

    Dim UltimaFila As Long
    Dim Contador As Long
   
    UltimaFila = Range("I" & CStr(Cells.Rows.Count)).End(xlUp).Row
   
    For Contador = UltimaFila To 2 Step -1
      Cells(Contador, 2).Value = Len(Cells(Contador, 1))
    Next Contador
   
End Sub

Cambia el contenido del For por las sentencias que necesites. Busca en la ayuda más información sobre Cells(fila, columna).
Por favor, antes de aplicar la macro haz una copia de seguridad de los datos.
Saludos cordiales.
* Te recomendamos estos productos Excel: Manual de Macros | Manual de Funciones | Nuevas Funciones | ddTraDa
jfmart
Miembro Frecuente
Miembro Frecuente
 
Registrado: 16 Ene 2012 09:28
Ubicación: Sevilla (España)


Compartir en:
     

  • Anuncio
Manual Excel avanzado

Volver a Macros

¿Quién está conectado?

Usuarios navegando por este Foro: elirico01 y 7 invitados