laatste 5 getallen in een rij

[rhkas]

Hoe vind ik de laatste 5 ingevoerde getallen in een rij, waarvan sommige cellen ook tekst bevatten?

 

[edmoor]

Dat is zonder een voorbeeld uiteraard niet te zeggen.

 

[Emil S]

met een UDF is dat mogelijk:

Function VindGetalInRij(Rij As Long, PositieVanAfRechts As Integer) As Variant
Dim AantalGetallen
Dim mTmp As Variant
Dim C As Range

    AantalGetallen = WorksheetFunction.Count(Rows(Rij))
    If AantalGetallen < PositieVanAfRechts Then
        VindGetalInRij = "nie gevint nie"
        Exit Function
    End If
    
    ReDim mTmp(1 To 1)
    For Each C In Cells.Rows(Rij).SpecialCells(xlCellTypeConstants).Cells
        If IsEmpty(C) Then Exit For
        If IsNumeric(C) Then
            mTmp(UBound(mTmp)) = C.Value
            ReDim Preserve mTmp(1 To UBound(mTmp) + 1)
        End If
    Next
    VindGetalInRij = mTmp(UBound(mTmp) - PositieVanAfRechts)
    
End Function

voor de eerste laatste cel de formule in rij 1 van hetzelfde werkblad:

=vindgetalinrij(1;1)

 

[rhkas]

mislukt mij

met mijn excel-kennis lukt het niet: als ik aan het einde van een rij rechts de volgende invoer pleeg "=vindgetalinrij(1;1)" dan gebeurt er niets. Het gaat denk ik mijn pet te boven, rhkas

 

[WHER]

Een voorbeeld met formules (matrixformules, dus bevestgen met ctrl+shift+enter, niet gewoon enter)

 

[rhkas]

gaat werken denk ik

snappen doe ik het niet, maar ik kan er wel mee aan de slag. Bedankt. Als ik het bereik van de gegevens-rij moet veranderen, moet ik in de formule volgens mij veel veranderen maar dat probeer ik dan wel