bajar filas para ir pasando macro

Hash: SHA1

Esto te puede servir

' para saber la ultima fila de la hoja
ActiveSheet.Cells.SpecialCells(xlCellTypeLastCell).Activate
UltimaFilaHoja = ActiveCell.Row

For Fila = 3 To UltimaFilaHoja

If Cells(Fila, 1).Value = Cells(5, 3) Then 'la celda e3 es
la 5,3
MsgBox "encontrado" ' aqui lo que quieres hacer
End If

Next




"Jesús Román" <CRISONIA3(texto inactivo)@terra.es> escribió en el
mensaje news:1Q4gc.4565256$

Hola familia! Buen fin de semana a todos

me acabo de crear la siguiente macro, pero me gustaria que una vez
que me ha mirado la fila correspondiente a las celdas BB3 y E3, me
corriera el turno a las siguientes hacia abajo, es decir, me mire
bb4 y e4 y así sucesivamente hasta llegar a la celda vacia.

Sub minimo()
If Range("BB3").Value = Range("E3").Value Then
Range("AX3").Select
Macro13
With Selection
.ClearComments
.AddComment
.Comment.Visible = False
.Comment.text text:="Maximo 89 dias.-"
End With
End If
End Sub



gracias anticipadas.-

Hola fernando!

pero como llamo a mis celdas bb3 y e3?
tengo que renombrarlas en la macro o no?

para ver si te he entendido bien o no, o si tu me entendiste bien a mi o
no, te pego la macro que he conseguido hacer gracias a tus nuevos datos
y te confirmo de nuevo que lo que necesito hacer: es que la macro me compare
dos celdas de una misma fila (E y BB). Lo del FOR NEXT, lo he adaptado bien
y me funciona, es ahora la comparacion lo que me temo que no va bien.

por favor te ruego disculpes mi ignorancia
gracias.-



"fernando" escribió en el mensaje
news:O$VY%23$

Hash: SHA1

Esto te puede servir

' para saber la ultima fila de la hoja
ActiveSheet.Cells.SpecialCells(xlCellTypeLastCell).Activate
UltimaFilaHoja = ActiveCell.Row

For Fila = 3 To UltimaFilaHoja

If Cells(Fila, 1).Value = Cells(5, 3) Then 'la celda e3 es
la 5,3
MsgBox "encontrado" ' aqui lo que quieres hacer
End If

Next




"Jesús Román" <CRISONIA3(texto inactivo)@terra.es> escribió en el
mensaje news:1Q4gc.4565256$
> Hola familia! Buen fin de semana a todos
>
> me acabo de crear la siguiente macro, pero me gustaria que una vez
> que me ha mirado la fila correspondiente a las celdas BB3 y E3, me
> corriera el turno a las siguientes hacia abajo, es decir, me mire
> bb4 y e4 y así sucesivamente hasta llegar a la celda vacia.
>
> Sub minimo()
> If Range("BB3").Value = Range("E3").Value Then
> Range("AX3").Select
> Macro13
> With Selection
> .ClearComments
> .AddComment
> .Comment.Visible = False
> .Comment.text text:="Maximo 89 dias.-"
> End With
> End If
> End Sub
>
>
>
> gracias anticipadas.-
>
>

Hash: SHA1

Las celdas se poden nombrar con la notacion A1 o con la notacion
L1C1. Puedes pasar de una a otra en le menu Herramienstas-Opciones,
pestaña General opcion L1C1. Cuando selecciones esta opcion en lugar
de las letras idetificativas de las columnas te apareceran números y
ya podras averiguar qué número le corresponde a la columna BB.



ActiveSheet.Cells.SpecialCells(xlCellTypeLastCell).Activate
UltimaFilaHoja = ActiveCell.Row

For Fila = 3 To UltimaFilaHoja

If Cells(Fila, 2).Value = Cells(Fila, 5) Then 'la celda
e3 es la 3,5
MsgBox "encontrado" ' aqui lo que quieres hacer
End If

Next



"Jesús Román" <CRISONIA3(texto inactivo)@terra.es> escribió en el
mensaje news:TS5gc.4566018$

Hola fernando!

pero como llamo a mis celdas bb3 y e3?
tengo que renombrarlas en la macro o no?

para ver si te he entendido bien o no, o si tu me entendiste bien a
mi o no, te pego la macro que he conseguido hacer gracias a tus
nuevos datos y te confirmo de nuevo que lo que necesito hacer: es
que la macro me compare dos celdas de una misma fila (E y BB). Lo
del FOR NEXT, lo he adaptado bien y me funciona, es ahora la
comparacion lo que me temo que no va bien.

por favor te ruego disculpes mi ignorancia
gracias.-



"fernando" escribió en el mensaje
news:O$VY%23$
>
> Hash: SHA1
>
> Esto te puede servir
>
> ' para saber la ultima fila de la hoja
> ActiveSheet.Cells.SpecialCells(xlCellTypeLastCell).Activate
> UltimaFilaHoja = ActiveCell.Row
>
> For Fila = 3 To UltimaFilaHoja
>
> If Cells(Fila, 1).Value = Cells(5, 3) Then 'la celda e3 es
> la 5,3
> MsgBox "encontrado" ' aqui lo que quieres hacer
> End If
>
> Next
>
>
>
>
> "Jesús Román" <CRISONIA3(texto inactivo)@terra.es> escribió en el
> mensaje news:1Q4gc.4565256$
> > Hola familia! Buen fin de semana a todos
> >
> > me acabo de crear la siguiente macro, pero me gustaria que una vez
> > que me ha mirado la fila correspondiente a las celdas BB3 y E3, me
> > corriera el turno a las siguientes hacia abajo, es decir, me mire
> > bb4 y e4 y así sucesivamente hasta llegar a la celda vacia.
> >
> > Sub minimo()
> > If Range("BB3").Value = Range("E3").Value Then
> > Range("AX3").Select
> > Macro13
> > With Selection
> > .ClearComments
> > .AddComment
> > .Comment.Visible = False
> > .Comment.text text:="Maximo 89 dias.-"
> > End With
> > End If
> > End Sub
> >
> >
> >
> > gracias anticipadas.-
> >
> >
>
>

Muchas gracias fernando!!!!!!!!! conseguido!!!
uf me ha costado, si, soy un torpedo ahora veo clara tu explicacion,
pero no se porque, no la entendia y me he visto en apuros..-


"fernando" escribió en el mensaje
news:%

Hash: SHA1

Las celdas se poden nombrar con la notacion A1 o con la notacion
L1C1. Puedes pasar de una a otra en le menu Herramienstas-Opciones,
pestaña General opcion L1C1. Cuando selecciones esta opcion en lugar
de las letras idetificativas de las columnas te apareceran números y
ya podras averiguar qué número le corresponde a la columna BB.



ActiveSheet.Cells.SpecialCells(xlCellTypeLastCell).Activate
UltimaFilaHoja = ActiveCell.Row

For Fila = 3 To UltimaFilaHoja

If Cells(Fila, 2).Value = Cells(Fila, 5) Then 'la celda
e3 es la 3,5
MsgBox "encontrado" ' aqui lo que quieres hacer
End If

Next



"Jesús Román" <CRISONIA3(texto inactivo)@terra.es> escribió en el
mensaje news:TS5gc.4566018$
> Hola fernando!
>
> pero como llamo a mis celdas bb3 y e3?
> tengo que renombrarlas en la macro o no?
>
> para ver si te he entendido bien o no, o si tu me entendiste bien a
> mi o no, te pego la macro que he conseguido hacer gracias a tus
> nuevos datos y te confirmo de nuevo que lo que necesito hacer: es
> que la macro me compare dos celdas de una misma fila (E y BB). Lo
> del FOR NEXT, lo he adaptado bien y me funciona, es ahora la
> comparacion lo que me temo que no va bien.
>
> por favor te ruego disculpes mi ignorancia
> gracias.-
>
>
>
> "fernando" escribió en el mensaje
> news:O$VY%23$
> >
> > Hash: SHA1
> >
> > Esto te puede servir
> >
> > ' para saber la ultima fila de la hoja
> > ActiveSheet.Cells.SpecialCells(xlCellTypeLastCell).Activate
> > UltimaFilaHoja = ActiveCell.Row
> >
> > For Fila = 3 To UltimaFilaHoja
> >
> > If Cells(Fila, 1).Value = Cells(5, 3) Then 'la celda e3 es
> > la 5,3
> > MsgBox "encontrado" ' aqui lo que quieres hacer
> > End If
> >
> > Next
> >
> >
> >
> >
> > "Jesús Román" <CRISONIA3(texto inactivo)@terra.es> escribió en el
> > mensaje news:1Q4gc.4565256$
> > > Hola familia! Buen fin de semana a todos
> > >
> > > me acabo de crear la siguiente macro, pero me gustaria que una vez
> > > que me ha mirado la fila correspondiente a las celdas BB3 y E3, me
> > > corriera el turno a las siguientes hacia abajo, es decir, me mire
> > > bb4 y e4 y así sucesivamente hasta llegar a la celda vacia.
> > >
> > > Sub minimo()
> > > If Range("BB3").Value = Range("E3").Value Then
> > > Range("AX3").Select
> > > Macro13
> > > With Selection
> > > .ClearComments
> > > .AddComment
> > > .Comment.Visible = False
> > > .Comment.text text:="Maximo 89 dias.-"
> > > End With
> > > End If
> > > End Sub
> > >
> > >
> > >
> > > gracias anticipadas.-
> > >
> > >
> >
> >
>