Encontrar la ultima fila capturada

Hola parellano,

No se a que te refieres bajo "fila capturada", pero si es la ultima fila usada:

1) si te interesa la ultima fila con datos (los formatos no importan) en una columna, p.ej. la columna [A]:

Sub test()
Dim UFila As Long
With ActiveSheet
UFila=.Cells(.Rows.Count, "A").End(xlUp).Row
End With
MsgBox UFila
End Sub

2) si te interesa la ultima fila con datos en toda la hoja:

Sub test()
Dim UFila As Long
On Error Resume Next
With ActiveSheet
UFila = .Cells.Find("*", .Cells(1), _
xlValues, xlWhole, xlByRows, xlPrevious).Row
End With
MsgBox UFila
End Sub

3) si te interesa la ultima fila con datos o formatos en la hoja:

Sub test()
Dim UFila As Long
On Error Resume Next
With ActiveSheet
UFila = .Cells.SpecialCells(xlCellTypeLastCell).Row
End With
MsgBox UFila
End Sub

Saludos,
KL


"parellano" wrote in message news:

Buenos dias!!

Necesito ayuda!!!

Hola fijense que no se como hacer que por medio de una macro encuentre
la ultima fila capturada, para que desde la primer fila hasta ahi
(ultimafila) me pege el dato de yo quiero

Ojala y me puedan ayudar

Janett