15. december 2011 - 12:02
Der er
4 kommentarer og
1 løsning
Access formel fra 2003 kan ikke køre i 2010
Hej
Jeg har denne fårmel der er lavet i Access 2003 og som ikke kan køre i 2010
Er der en der har en løsning på hvordan jeg konvertere den.
Sum: Val(Mid([CPR nr];1;1))*4+Val(Mid([CPR nr];2;1))*3+Val(Mid([CPR nr];3;1))*2+Val(Mid([CPR nr];4;1))*7+Val(Mid([CPR nr];5;1))*6+Val(Mid([CPR nr];6;1))*5+Val(Mid([CPR nr];7;1))*4+Val(Mid([CPR nr];8;1))*3+Val(Mid([CPR nr];9;1))*2+Val(Mid([CPR nr];10;1))
/ Finn
15. december 2011 - 14:57
#1
Lav et modul og kom denne kode i
Public Function Cprfunk(Cpr) As Integer
Dim MultiPly As Variant, I As Integer
MultiPly = Array(4, 3, 2, 7, 6, 5, 4, 3, 2, 1)
For I = 1 To 10
Cprfunk = Cprfunk + Mid(Cpr, I, 1) * MultiPly(I - 1)
Next
End Function
i din forespørgsel kalder du den med.
Sum: Cprfunk([CPR nr])
15. december 2011 - 17:47
#3
prøv at se, når du er i kodemodulet, under Tools References, om der er flueben i Visual Basic for applications.
der må ikke være farvet, på linjen, så kan du ikke aktivere references, hvis den er farvet tryk på firkanten med reset.