Excel Digitar valor em campo para soma e este campo ficar em branco após cálculo

[eduardobbrasilia]

sou iniciante e preciso de ajuda, não sei onde postar: preciso fazer uma planilha onde os valores que eu digitar na celula a1 somem na celula b5, porém a celula a1 tem que ficar em branco para eu lançar outros valores que serao somados na celula b5 ex: digito 25 na celula a1 e na celula b5 aparece 25, depois digito 25 na celula a1 e na b5 vai para 50... mas preciso que a celula...

[Midori]

@eduardobbrasilia  Isso pode ser feito no evento change da planilha,

 

Private Sub Worksheet_Change(ByVal Target As Range)
    If IsNumeric([A1]) And [A1] <> "" Then
        Application.EnableEvents = False
        [B5] = [B5] + [A1]
        [A1] = ""
        Application.EnableEvents = True
    End If
End Sub

 

[eduardobbrasilia]

muito obrigado a todos pela ajuda e compreensão

[Patropi]

Bom dia @eduardobbrasilia

 

Você não clicou em Curtir na resposta da Midori e também não marcou a resposta dela como Solução.

 

[]s

[eduardobbrasilia]

nossa eu dou trabalho...kkkk agora estou tentando fazer com que a formula ou função  se repita nas linhas abaixo tipo: preciso que faça a mesma coisa na B5, B6... ATE 367 / F5. F6... ATE  F367, sera que expliqyei direito. 

 

   
    If IsNumeric([B5]) And [B5] <> "" Then
       Application.EnableEvents = False
        [F5] = [F5] + [B5]
        [B5] = ""
         Application.EnableEvents = True
         
  
    ElseIf IsNumeric([C5]) And [C5] <> "" Then
       Application.EnableEvents = False
        [J5] = [J5] + [C5]
        [C5] = ""
        Application.EnableEvents = True
   
        
        End If

        
    
End Sub