Foro Excel

Existen varias formas de determinar la última fila ocupada de una hoja.
Sin embargo la mayoría no dan resultados exactos siempre.
Primero ponemos los q dan problemas y al final ponemos la que no falla nunca!

LastRow = Cells.SpecialCells(xlCellTypeLastCell).Row
(no es muy exacta)

LastRowColA = Range("A65536").End(xlUp).Row
(solo evalúa columna A y no considera q Excel 2.007 tiene más filas)

LastRow = ActiveSheet.UsedRange.Rows.Count
(no es muy exacta)

LastRow = MiHoja.Cells.Find("*",SearchOrder:=xlByRows,SearchDirection:=xlPrevious).Row
(esta no falla nunca!)

Buena Aportación y/o acotación, pero me atrevo a realizar una obervación, en cuanto:

LastRowColA = Range("A65536").End(xlUp).Row
(solo evalúa columna A y no considera q Excel 2.007 tiene más filas)

Debido a que puede ser una sola columna que se desea evaluar, para mi es subjetivo destacar cual es más o menos eficaz.

En cuanto a:
LastRow = MiHoja.Cells.Find("*",SearchOrder:=xlByRows,SearchDirection:=xlPrevious).Row
(esta no falla nunca!)

No la sabia, tratatré de interpretarla, busca en la hoja "todo" (esto es el "*" comodín), por fila, es como un Do While Not EOF en una BD.

Salu2.xlsm

SALUDOS
Me pueden dar mayor informacion de como utilizar esta macro: soy muy novato quisiera saber por ejem. como aplicar en una columna A desde A4:A50
la Hoja podria llamarse "SEG"
Que significa "*"
MiHoja.

Gracias por su atención
miltonm@andinanet.net


LastRow = MiHoja.Cells.Find("*",SearchOrder:=xlByRows,SearchDirection:=xlPrevious).Row