Escrevendo uma macro VBA que avalia uma instrução IF em um intervalo de células especificado em SheetA que define a cor do texto de dois intervalos de células em SheetB

Question

Eu consegui isso para funcionar, mas não está funcionando corretamente. (Interessantemente, apenas uma célula da minha PlanilhaB especificada está sendo alterada para a fonte vermelha na execução.) Suponho que não estou especificando quais planilhas e / ou intervalos usar nos locais apropriados no script ou que minha sintaxe é claramente errado. Obrigado pela sua ajuda.

Sub RedBold()
'Sets color of current cell to red  
With ActiveCell.Font
    .Color = -16776961
    .TintAndShade = 0
End With
ActiveCell.Font.Bold = True 
End Sub

Option Explicit

Sub LowInventory()

Dim cell As Range
Dim deltaQ As Range

'Assign specific cell range in the Inventory Quantities sheet to variable          deltaQ
Set deltaQ = Sheets("Inventory Quantities").[E3:E190]

'Conditional loop that checks for low deltaQ values and assigns a color to   two specific cell ranges in the Inventory Costs, Sources sheet
For Each cell In deltaQ.Cells
    'if deltaQ value is less than 2
    If cell.Value < 2 Then
        'Specify cell ranges in specific sheet to be affected by low inventory check loop
        Sheets("Inventory Costs, Sources").Range("B3:B190, C3:C190").Select
        Call RedBold
    End If
Next

End Sub