Hei Ole
Lim den inn i en modul, så finner du den i funksjonsveiviseren under
"egendefinerede funktioner" (eller heter det "brugerdefinerede" ?)...
Eller skriv bare inn direkte en formel i en celle, såsom
=BeregningAfRente(A1;20;B1)
Det sagt (hvordan lave egne funksjoner), den ser ikke ut til å være noget
værd. Den er elendig skrevet, variabler er ikke deklareret, hvor kommer 3600
inn som konstant ?, den kaller seg selv rekursivt, jeg kan ikke fatte at den
returnerer noget annet enn en windows-feil. Hva heter bogen og hvem har
skrevet den ?
HTH. Beste hilsen Harald
"old" <old.news@kandu.dk> wrote in message
news:KGeg7.6214$3q.232534@news010.worldonline.dk...
> Jeg har en VBA bog i den er der følgende Procedure
> option explicit
> Public Function BeregningAfRente(Saldo,NomRente,Dage As Integer)
> Dim Resultat
> BeregningAfRente=Saldo*NomRente*Dage/36000
> Resultat = BeregningAfRente(50000,12,50)
> End Function
> Der er vist noget forkert ved det hele,og hvordan i alverden får man
> resultatet fra en function,fra en sub er det jo ligetil.
> Taknemligst ole@olesen.mail.dk
>
>
> --
> Leveret af:
>
http://www.kandu.dk/
> "Vejen til en hurtig løsning"
>