"Ikke defineret funktion" når kodemodul kaldes i query

Er du sikker på at koden ligger i et modul, der er globalt for din base (og altså ikke i f.eks. en formular)?
Har du valgt Insert/Module i VBA editoren?

Betalingsudtrykket mener jeg ikke skal stå i [ ] - prøv det engang

også mener jeg at du mangler en "end if" til sidst

Tak for svarene!
@fdata: Ja, koden er indsat i et nyt modul i VBA editoren. Nu ligger den som et modul i min access database (den er synlig under "Moduler" når jeg lukker VBA editoren).
Hvis jeg fremsøger funktionen i min query fremfinder den også "FindTal"-funktionen. Den ser bare ikke ud til at virke...

@Thomas: Jeg har nu ændret koden til dette:
---
Option Compare Database

Public Function FindTal(Ind As String) As Integer
Dim I As Integer
For I = 1 To Len(Ind)

If IsNumeric(Mid(Ind, I, 1)) Then
FindTal = FindTal & Mid(Ind, I, 1)
End If
Next
If IsEmpty(FindTal) Then FindTal = 0
End If

End Function
---
Samt fjernet [ ] fra mit felt i query-forespørgslen - jeg får desværre stadig samme fejl. Tror I der foreligger en fejl i scriptet?

Her lige tjekket din funktion. Brug den oprindelige. Den spiller.
En lille test-query ser også ud til at spille:
SELECT Betalingsbetingelser, FindTal(Betalingsbetingelser) AS Nettodage
FROM Tabel1;
--------
Betalingsbetingelser    Nettodage
N7    7
10N    10
LM10    10
LM    0
--------

Fedt at du kan få den til at virke!!

Det kan jeg ikke. Hvis jeg laver en test a la din får jeg stadig samme fejlmeddelelse:

SELECT tbl_WAMTred.Betalingsbetingelser, FindTal(Betalingsbetingelser) AS Nettodage
FROM tbl_WAMTred;

Kan du fortælle mig hvordan du laver modulet inde i VBA editoren? Måske har jeg gjort noget forkert der?

Jeg har åbnet VBA editoren --> Indsat nyt modul --> Indsat scriptet --> Gemt modulet som "FindTal" --> Lukket ned

Kan det muligvis have noget at gøre med de værdier jeg har i opslagstabellen? Der forekommer også "+" i nogle af de felter den skal slå op i.

Følgende værdier findes i kolonnen den skal slå op i:
Betalingsbetingelser
10N
10N
12N
14N
14N
15N
17N
20N
21N
21N
23N
25N
30N
30N
45N
5N
60N
6N
7N
7N
7N
8N
9N
LB
LB 30
LB1
LB10
LB14
LB15
LB20
LB25
LB30
LB30
LB40
LB45
LB5
LB60
LB60
LM+10
LM+15
LM+20
N14
N20
N30
N8
NK

Jeg har testet med alle din værdier. Intet problem.

Til gengæld er det måske et problem at du har gemt modulet med navnet FindTal. Det er jo det samme som funktionens navn. Access er ikke glad for at man bruger samme betegnelse for to forskellige objekter/funktioner.

Prøv at omdøbe dit modul.

That did the trick!
TAK!
Fedt at det bare var en omdøbning der skulle til! :)
Endnu engang tak!

You live and learn  ;O)