Boa noite!!
Tente...

Private Sub Worksheet_Change(ByVal Target As Range)
    If Intersect(Target, Range("C21:C22")) Is Nothing Then Exit Sub
     Range("B21:B22").Value = Range("C21:C22").Value
End Sub

Att

Boa noite!!
Tente...

Private Sub Worksheet_Change(ByVal Target As Range)
    If Intersect(Target, Range("C21:C22")) Is Nothing Then Exit Sub
     Range("B21:B22").Value = Range("C21:C22").Value
End Sub

Att

Por favor Alexandre, como coloco isso no excel!!!???

Boa noite!!

"Isso" é um recurso chamado VBA, onde esse código é posto dentro Editor VB no módulo de planilha!
http://www.ambienteoffice.com.br/office ... os_em_vba/

Att

Thiago,

O que o Alexandre está oferecendo, é um recurso extra que o Excel comporta, que muitas vezes, usuários mais novos, não tem conhecimento.
Se você apertar alt+f11 em seu excel, ira abrir o depurador de macros em VBA, e poderá incrementar essa macro fornecida por ele.
Outra maneira de fazer, seria criar uma base de dados que constem as informações mês a mês de ambos os casos(0800 e 7070) e uma formula que traga esse valor.

Mexi em uma das suas sheets, e deixei ela na forma que te informei. Deixei a Sheet das ligações noturnas, para que você mesmo faça, e tente aprender e conseguir fazer as formulas.

Sou do princípio que entrar no forum, e pegar a informação, não ajuda em nada. Acho legal que a pessoa aprenda, erre, crie dúvidas, sobre o assunto.
Se precisar, fico a disposição,

Grande abraço,

ps. Em Amarelo, estão os locais onde alterei alguma coisa na planilha.