View Single Post
  #4   Report Post  
Posted to microsoft.public.excel.programming
John Green[_3_] John Green[_3_] is offline
external usenet poster
 
Posts: 49
Default Finding first non-blank cell

Allison,

What exactly do you want? Perhaps you mean that you want the value from the left hand side of the Z column that is closest to the Z
column for each row. If so, and if the odd columns are always empty, the following version of my function would work:

Function LastValue(r As Range)
LastValue = Application.Caller.End(xlToLeft).Value
End Function

where you would put the following in Z6, for example

=LastValue(D6:X6)

If there are values in the odd columns, this will probably not work.

--

John Green - Excel MVP
Sydney
Australia


"Allison" wrote in message ...
This VBA was great for returning the last value in a
column, but that's not what I wanted. Thanks anyway for
trying to help.

Allison

-----Original Message-----
Create the following function in a standard module:

Function LastValue(r As Range)
With r
LastValue = .Parent.Cells(65536, .Column).End

(xlUp).Value
End With
End Function

In the Z column enter the following to get the last value

in column D

=LastValue(D:D)

--

John Green - Excel MVP
Sydney
Australia


"Allison" wrote in

message ...
Excel 2002

I need to return in column Z the last non-blank value in
columns D, F, H, J, L, N, P, R, T, V, X (every other
column starting with D) [or conversely, the first non-
blank working backward from column z and hitting every
other column].

I can use nested IF statements using ISBLANK(X3), but

only
up to 7 and I need 11.

What formula (or VBA if a formula isn't possible) could

I
use to accomplish this?

Thanks for any help!



.