Find celle med største værdi

Formel eller VBA?

VBA :)

Sub findCelleAdresseMedRækkensStørstreVærdi()
    adresse = adresseMedStørsteVærdi(1)
End Sub
Function adresseMedStørsteVærdi(rækkeNr)
Dim antalKolonner As Long, størsteVærdi
    antalKolonner = ActiveCell.SpecialCells(xlLastCell).Column
   
    størsteVærdi = 0
   
    For k = 1 To antalKolonner
        If Cells(rækkeNr, k) > størsteVærdi Then
            adresseMedStørsteVærdi = Cells(rækkeNr, k).Address
            størsteVærdi = Cells(rækkeNr, k)
        End If
    Next k
End Function

Perfekt, tak!