Bonsoir a tous,
Voila, j'ai un petit problème pour additionner des variables. Voici mon code:
Je dois récupérer trois données afin des les additionner. Ce code marche lorsque les trois données sont identiques. Cependant lorsque au moins une des trois données est différentes alors la il y a un écart. Un écart important.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10 If Mid(vLigne, 39, 13) = "1680544109053" Then brutMsa = Mid(vLigne, 89, 10) brutMsa = (Val(brutMsa)) + (Val(Mid(vLigne, 89, 10))) brutMsa = (Val(brutMsa)) + (Val(Mid(vLigne, 89, 10))) With rstEmploye .Fields("brutDernierTrimestre").Value = brutMsa .Update End With End If
Donc je viens vers vous car je ne vois pas du tout d'où peut venir le problème.
De plus, je voulais savoir comment convertir un string en double. J'ai écrit ceci:mais dans ma table, elle ne se transforme pas. Pour info, j'essaye de convertir ceci : +0000003456 --> + 34,56
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10 vBrutMSA = CDbl(Mid(vLigne, 88, 11)) With rstSalaire .AddNew .Fields("idEmploye").Value = IDEmploye .Fields("dateSalaire").Value = Mid(vLigne, 52, 8) .Fields("brutMSA").Value = vBrutMSA .Update IDSalaire = .Fields("idSalaire").Value End With
J'esepere avoir était assez claire.
Cordialement.
Partager