Excel programmering

=HVIS(A4<=25;"A";HVIS(A4>=76;"D";HVIS(A4<=50;"B";"C")))

Indsæt denne formel i D4:

=HVIS(OG(A4>=1; A4<=25);"A";HVIS(OG(A4>=26; A4<=50);"B";HVIS(OG(A4>=51; A4<=75);"C";HVIS(OG(A4>=76; A4<=100);"D";"Indtast en værdi i A")))

Hvis værdien i A4 er > 100, så skrives teksten Indtast en værdi i A

Du kan selv rette teksten til hvad du vil.

Med VBA:
Sub test()
Dim A4Tal As Integer, tegn As String
    A4Tal = Range("A4").Value
   
    Select Case A4Tal
        Case 1 To 25: tegn = "A"
        Case 26 To 50: tegn = "B"
        Case 51 To 75: tegn = "C"
        Case 76 To 100: tegn = "D"
    Case Else
        tegn = ""
    End Select
   
    Range("D4") = tegn
End Sub

=VÆLG(HELTAL((A4-1)/25)+1;"A";"B";"C";"D")

Super effektivt :)

hvem skal svare ?