Dúvida de iniciante

[Juniorse]

Sou iniciante em VBA e gostaria da ajuda de você para consertar o código abaixo:

Function Soma() As Integer

Dim A1 As Integer

Dim B1 As Integer

Dim C1 As Integer

Cells(1, 1) = A1

Cells(1, 2) = B1

Cells(1, 3) = C1

C1 = A1 + B1

End Function

Na planilha, quando digito os valores nas células A1 e B1 o valor de C1 permance "0".

[kuroi]

acho q você fez o contrario do q você queria.

não devia ser isso??

A1 = Cells(1, 1)
B1 = Cells(1, 2)
C1 = Cells(1, 3)[/code]

[Raziel_LOK]

Oi. dessa maneira não vai funcionar. da forma abaixo é bem mais simples e irá funcionar com qualquer celula ou número. Tem que adicionar a Função em um modulo no VBA, aí ela vai aparecer em funções definidas pelo usuário.

Function Somando(A1 As Integer, B1 As Integer)
Somando = A1 + B1
End Function