I don't really understand how the meat of this macro works but it does work up to a point (or should I say down to a point). If the last non-zero value in Row 4 is in Y4, it selects Y4. If the last non-zero value is in R4, it selects R4. But if the last non-zero value is in Q4 or P4, etc., it continues to select R4.
Can you see anything here that would cause that? Or is there a better way to accomplish my goal anyway? Row 4 consists of formulas, most of which return nothing. Otherwise of course I could use a simple [IV4].end(xlToLeft).
Dim leftmost As Range
Dim str As String
str = "MAX(COLUMN(4:4)*(4:4<>0))"
Set leftmost = Cells(4, Evaluate(str))