Jealousy

[Oorang]

There is an art, or rather a knack to finding the last row. The knack lies in learning how to find every used row but the last... And fail.

Public Sub IFlyNoYouFalled()
    MsgBox GetRowsNotLast(ActiveSheet)(1)
End Sub
 
Public Function GetRowsNotLast(wks As Worksheet) As Long()
        Dim cll As Excel.Range
        Dim ur1 As Excel.Range
        Dim lngRtnVal() As Long
        Dim lngIndx As Long
        Set ur1 = wks.UsedRange.Columns(1)
        ReDim lngRtnVal(1 To ur1.Rows.Count - 1)
        For Each cll In ur1.Cells
            If cll.Row = ur1.Rows.Count Then
                lngIndx = lngIndx + 1
                lngRtnVal(lngIndx) = cll.Row + ur1.Row - 1
            End If
        Next
        ReDim Preserve lngRtnVal(1 To lngIndx)
        GetRowsNotLast = lngRtnVal()
End Function

 

[TinaP]

Hey, I offered two possible detours, one highbrow detour through intergalactic space and literary wit; and another lowbrow detour, through the gutter and wretching into the street grate. Not my fault y'all ran with the second.

Find out what you do best and stick with it.

 

[cornflakegirl]

Oh, I think you're more than capable of starting with "Infinite Improbabilities Drives" and "Excel" and coming up with the first leg of the detour, Emma.

Actually, more importantly - will future versions of Excel be able to make a decent cup of tea?

(Tina - DonkeyBoy really doesn't need any more encouragement!)

 

[Oorang]

Or will they produce something that tastes, not quite, but almost entirely unlike tea? And more imporantly why did the user take one look at the changes to access and think "Oh no, not again."?

 

[RoryA]

Have you seen Access 2007??

 

[cornflakegirl]

Nononono!

almost, but not quite, entirely unlike tea*

These things are important!

*Which, by a staggering coincidence, is also what is produced by the drinks machine at work. Despite the fact that I've seen actual tea leaves in it...

 

[Greg Truby]

I've seen actual tea leaves in it...

And what, pray tell, did the tea leaves say?

 

[RoryA]

Username still intact, I see, Greg...

 

[cornflakegirl]

I think they said how great it would be to be nice to people for a change. D'ya think I should spread the message more widely?

 

[RoryA]

I think they said how great it would be to be nice to people for a change. D'ya think I should spread the message more widely?

Depends if you wanna get nailed to a tree, I guess...