Douglas Petrin Bertini

Boa noite, Sou inciante e quero executar uma função para somar o valor anterior da coluna J (Saldo) que é resultado da subtração entre as celulas B4(Saída) e H4 (Entrada) com os valores seguintes da inserção de dados dessa planilha. Ou seja, Saída = B4 Entrada = H4 Saldo = J4 Exemplificando --> J4 = Entrada (H4) - Saída(B4) + J4 anterior Iniciei o código porém não consegui dar continuidade.. Sub Cadastrar() 'Inserir nova linha Worksheets(2).Rows("2:2").Insert 'Inserir Saída Worksheets(2).Range("H4") = Range("B4") 'Inserir Data Worksheets(2).Range("C4") = Now 'Inserir Data - Dia Worksheets(2).Range("D4") = Range("D4") 'Inserir Data - Mês Worksheets(2).Range("E4") = Range("E4") 'Inserir Data - Ano Worksheets(2).Range("F4") = Range("F4") 'Inserir Entrada Worksheets(2).Range("I4") = Range("H4") 'Inserir Categoria Worksheets(2).Range("B4") = Range("J4") 'Inserir Descrição Worksheets(2).Range("G4") = Range("M4") 'Inserindo Subtração entre Entrada e Saída Worksheets(2).Range("J4") = Range("H4").Value - Range("B4").Value 'Limpar formulário Range("B4") = "" Range("D4") = "" Range("E4") = "" Range("F4") = "" Range("H4") = "" Range("J4") = "" Range("M4") = "" 'Mensagem de sucesso MsgBox "Cadastro realizado com sucesso", vbInformation, "Concluído!" End Sub Encontrei informação parecida mas não consegui adequa-la a minha situação. Se alguem puder me ajudar eu ficaria grato.