Você tenta definir uma função dentro de um sub, não é possível no VBA.
Você tenta definir uma função dentro de um sub, não é possível no VBA.
Explicação de palavras simples:
sub four() deve ter um end sub correspondente antes do
a linha que começa com Function OverFour(...
Tags microsoft-excel-2010 vba