Last record in a row

[Gregc]

Is there an Excel function to return the last record in a row of data. I have dates in a row, 6 columns wide, I want to return the last date in the row.

 

[Corticus]

here ya go:

Book2
	A	B	C	D	E	F	G
1	Date
2	1/1/2001	1/2/2001	1/3/2001	1/4/2001	1/5/2001	1/6/2001	1/7/2001
3
4	LastDate	7
5	1/7/2001
Sheet1

HTH,
Corticus
This message was edited by Corticus on 2002-11-01 16:18

 

[Gregc]

Thank you.

 

[Aladin Akyurek]

On 2002-11-01 16:07, Gregc wrote:
Is there an Excel function to return the last record in a row of data. I have dates in a row, 6 columns wide, I want to return the last date in the row.

(1.) Activate Insert|Name|Define.
(2.) Enter BigNum as name in the Names in Workbook box.
(3.) Enter the following in the Refers to box:

9.99999999999999E+307

(4.) Click OK.

Now use...

=LOOKUP(BigNum,A2:F2)

Adjust the range to suit.

If dates are in ascending order, you can also use...

=MAX(A2:F2)
This message was edited by Aladin Akyurek on 2002-11-01 16:27

 

[Haluk]

On 2002-11-01 16:23, Aladin Akyurek wrote:

=LOOKUP(BigNum,A2:F2)

Adjust the range to suit.

Aladin, i get an #N/A error when i enter the above formula ( with the numeric BigNum).

i don't know, what am i missing ?

 

[Aladin Akyurek]

On 2002-11-01 17:15, Raider wrote:

On 2002-11-01 16:23, Aladin Akyurek wrote:

=LOOKUP(BigNum,A2:F2)

Adjust the range to suit.

Aladin, i get an #N/A error when i enter the above formula ( with the numeric BigNum).

i don't know, what am i missing ?

LookupBigNum.xls
	A	B	C	D	E	F
1
2	1/2/2001	1/3/2001	1/4/2001	1/5/2001	1/6/2001
3
4
5	1/6/2001
Sheet1

This message was edited by Aladin Akyurek on 2002-11-01 17:22

 

[Haluk]

thx, Aladin.

strange but, still the same error. i give it up, its late here....thx again.

 

[Aladin Akyurek]

On 2002-11-01 17:33, Raider wrote:
thx, Aladin.

strange but, still the same error. i give it up, its late here....thx again.

Try also:

=INDEX(A2:F2,MATCH(BigNum,A2:F2))

Did you define BigNum as I described?

 

[normpam]

Here's a shot at it from an amateur!

Assuming the data are in adjacent columns, try the following code:

Sub GetValue()
Range("B7").Value = Range ("B2").Offset.End(xlToRight).Value
End Sub