Excel - dato de lultima fila

 
Vista:

dato de lultima fila

Publicado por omarj (1 intervención) el 03/03/2006 15:26:31
Hola a todos
Tengo una planilla muy sencilla con una columna, en la que se anexa ocasionalmente un nuevo dato.
¿Que función debo utilizar para reflejar en una celda, el dato de la última fila?
Gracias por adelantado. Omar
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:dato de lultima fila

Publicado por Mark (273 intervenciones) el 04/03/2006 02:00:45
Hice esto para ti

Sub ultima()
Dim Ubicacion As String
Dim valor As Currency

Range("A1").Activate
While ActiveCell.Value <> ""
ActiveCell.Offset(1, 0).Activate
Wend
Lugar = ActiveCell.Offset(-1, 0).Activate
valor = ActiveCell.Value
Ubicacion = MsgBox("Ultima celda con datos " & ActiveCell.Address & Chr(13) & _
"Por un valor de " & ActiveCell.Value, vbInformation, "INFORMACION >>>!!!")
Sheets("Hoja1").Range("B2").Activate
With ActiveCell
.Value = valor
End With

End Sub

'Como te lei asi a lo rapido no copie bien que deseas que te lo muestre en una celda,
'pero lo cambie a ultima hora y como veras hace lo que pides. Ahora bien para hacer
'el ejemplo esta pensado para que analize desde A1 en la hoja activa. Si no es asi solo debes
'cambiar, en Sheets("Nombre de la hoja") y de igual manera con los otros parametros como
'donde ubicar el dato que contiene la ultima celda con datos (en mi ejemplo B2 de la Hoja1)

Espero te sirva saludos
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar