Boa-noite.
Segue exemplo de somar "TextBox" mostrar a soma em um "TextBox" ou em uma "Label".

Private Sub CommandButton1_Click()

Dim valor1 As Integer
Dim valor2 As Integer

Dim UltimaLinha As Object

valor1 = TextBox1.Text
valor2 = TextBox2.Text

TextBox3 = valor1 + valor2

Label4.Caption = valor1 + valor2

Set UltimaLinha = Plan1.Range("A20").End(xlUp)

UltimaLinha.Offset(1, 0).Value = TextBox1.Text
UltimaLinha.Offset(1, 1).Value = TextBox2.Text
UltimaLinha.Offset(1, 2).Value = Label4.Caption

ActiveWorkbook.Save

TextBox1.SetFocus

End Sub

qualquer coisa posta um arquivo exemplo.

Att,

Francisco

Necessário atentar ao tipo de valor vs Função de conversão e/ou definição de variável.
Função Val:
Retorna os números contidos em uma sequência como um valor numérico do tipo apropriado; porem reconhece somente o ponto (.) como um separador decimal válido.
Quando separadores decimais diferentes forem usados, como em aplicativos internacionais, use CDbl para converter uma sequência em um número.

Integer:
Numeros inteiros de -32.768 a 32.767.Frações são arredondadas.
Para numeros com decimais utilize Double ou Currency