Boa noite!!

Tente alterar as linhas (onde tem vbRed para vbBlack)

Celula.Interior.Color = vbRed

para

Celula.Interior.Color = vbvbBlack

Mesmo assim eu não entendi muito bem...
Você deve analisar as condições lógicas e alterar o fundo, para isso leia:
http://dmcritchie.mvps.org/excel/colors.htm
Baixe o arquivo e veja

Boa noite

Alterando para vbBlack, não resolve o problema. O código funciona assim: Quando é digitado um "x", a célula correspondente no intervalo B4:D30 e CB4:CD30 é pintada de vermelho e o digito branco. Todo o intervalo tem o fundo preto (B4:D30 e CB4:CD30). O problema é que quando reseto, esse mesmo intervalo muda o fundo de preto para branco e preciso que fique sempre preto.

Grato

Boa noite!!

Já tentou isso?..........

Option Explicit

Sub Reset()
    Application.EnableEvents = False
    Range("B4:D30,CB4:CD30").Interior.Color = RGB(0, 0, 0)
    Columns("AM:AR").ClearContents
    Application.EnableEvents = True
End Sub

Att

Boa tarde

Valeu alexvba, problema resolvido.
Grato

Boa tarde!!

Obrigado pelo retorno, mas você NÃO clicou na mãozinha

Att

Boa tarde

Opa!! mãozinha clicada