@ing82

Una Sub funziona esattamente come un Function, la sola differenza è che la Function può,e dovrebbe, restituire un valore che indica o meno il successo del codice eseguito, la Sub non restituisce alcun valore.
codice:
Public Function myFunction(parametri) As Boolean
    ' se il codice da eseguire ha successo ritorno Vero
    myFunction = True
End Function

Public Sub MySub(parametri)
    ' codice da eseguire
End Sub
Detto per inciso, il parametro restituito dovrebbe essere tipizzato (es. .. As Boolean, ... As Long, ... As Integer) mentre tu non lo dichiari.