suma de cuadrados de un intervalo

[caesar.l]

Puedes probar haciendo tú una función, en el editor de VBA en un módulo defines:

Código:

Function SUMA_CUAD_RANG(A As Integer, B As Integer)
    Dim i As Integer
    Dim Suma As Integer

    Suma = 0
    If A < B Then
        For i = A To B
            Suma = Suma + i ^ 2
        Next i
    ElseIf A > B Then
        For i = B To A
            Suma = Suma + i ^ 2
        Next i
    Else
        Suma = A ^ 2
    End If
    SUMA_CUAD_RANG = Suma
End Function

Por ejemplo si en A1 tienes el valor menor del intervalo y en B1 tienes el valor mayor, y en C1 quieres la respuesta pones en la celda = SUMA_CUAD_RANG(A1,B1)

No importa cual sea el mayor, y si es el mismo valor, solo saca el cuadrado de ese valor, saludos