Sum of highlighted cells

Sums the answer of all highlighted cells in a spreadsheet.

(function () {
    let worksheet = Api.GetActiveSheet();
    let range1 = worksheet.GetRange("B1"); // Set your range for the color reference
    let colorReference = range1.SetFillColor(Api.CreateColorFromRGB(91, 155, 213)); // Set targeted background color. To use fill color from the existing range, comment this line out
    let targetedColor = range1.GetFillColor();
    let range2 = worksheet.GetRange("A1:A16"); // Set the targeted range in the spreadsheet
    let result = worksheet.GetRange("A17"); // Set the cell where the result will be displayed
    let sum = 0;
    let cellColorCode;

    range2.ForEach(function (range) {
        let cellColor = range.GetFillColor();

        if (cellColor!== "No Fill"){
         cellColorCode = cellColor.GetRGB();
        } else {
            cellColorCode = null;
        }

        if (cellColorCode && cellColorCode === targetedColor.GetRGB()) {
            let value = range.GetValue();
            if (!isNaN(parseFloat(value))) {
                sum += parseFloat(value); 
            }
        }
    });
    result.SetValue(`The sum: ${sum}`)
})();

Methods used: GetActiveSheet, GetRange, SetFillColor, CreateColorFromRGB, GetFillColor, ForEach, GetRGB, GetValue

Reference Microsoft VBA macro code

Sub SumHighlightedCells()
    Dim cell As Range
    Dim total As Double
    
    ' Loop through each cell in the selection
    For Each cell In Selection
        ' Check if the cell contains a numeric value
        If IsNumeric(cell.Value) Then
            total = total + cell.Value
        End If
    Next cell
    
    ' Display the sum in a message box
    MsgBox "The sum of the highlighted cells is: " & total
End Sub

Result