Discussion :

[Commandeur]

Bonjour,


Je recherche une formule pour faire un calcule dans une formulaire

par exemple : [champ1]*[champ2]


Mais mon calcule et plus complique

Voila c'est juste pour afficher la clee de contôle

voici le calcule a faire

code a 6 chiffres est 306276

cle = (3x2+0x3+6x4+2x5+7x6+6x7)/11=11,3
La clee de contrôle et le 3

le faire manuellement c'est simple, mais dans un formulaire comment faire?

Merci de vos reponses

[philben]

bonjour,

le plus simple est de passer par une fonction en VBA :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
 
Public Function CalculClef(ByVal vValeur As Variant) As Integer
   Dim i As Integer, iProd As Integer
   If Not IsNull(vValeur) Then
      For i = 1 To Len(vValeur)
         iProd = iProd + CInt(Mid$(vValeur, i, 1)) * (i + 1)
      Next i
      CalculClef = iProd Mod 11
   End If
End Function

Utilisation dans la propriété <source controle> du controle : =CalculClef([MonChamp])

Philippe

[Commandeur]

Merci baucoup, sa marche
je me demande comment tu a fait pour trouver

[Gabout]

Bonjour,

Ce doit être le hasard !