Bonjour j'ai une fonction en VBA
et un requête SQL qui l'execute
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17 Public Function majcdap(cdap As String, cd As Integer, an As Double) As String an = an Mod 100 Select Case cd Case 0 majcdap = cdap Case 1 If cdap = 0 Then majcdap = cdap Else: majcdap = "0" & an & "," & cdap End If Case Else If cdap = 0 Then majcdap = cd & "." & "0" & an Else: majcdap = cd & "." & "0" & an & "," & cdap End If End Select End Function
ça me met la fonction majcdap non définie dans l'expression
Code : Sélectionner tout - Visualiser dans une fenêtre à part UPDATE essemaj SET essemaj.[Cols Durs années précéd] = majcdap([«cdap»],[«cd»],[«an»]), essemaj.[A déclarer] = No, essemaj.CD = 0;
Vous voyez où est l'erreur?????
Partager