função vba

elabore uma funçao que entre com 2 numeros e retorna a soma de todos numeros primos q existem entre eles

to com maior duvida nao estou conseguindo se alguem poder me dar alguma dica agradeço

vlw deste ja

ai tom com maior dificuldade se alguem tiver uma dica pra me ajudar agradeço vlw

olha o q eu fiço mais a soma nao esta certa

Public Function primo(a As Double, b As Double) As Double

Dim cont As Double

cont = 0

For i = a To b

If (i Mod 2 <> 0) Then

cont = cont + i

End If

Next i

primo = cont

End Function