Probleme code VBA (Multiplication)

mickno

XLDnaute Nouveau
Bonjour j'ai un petit problème que je ne parvient pas a résoudre...
Jai le code suivant :
Code:
''Affichage du prix total
    If IsNumeric(Me.PU1) = True Then
        Me.PT1 = CDbl(Me.PU1) * CDbl(Me.QU1)
            End If
        
        If IsNumeric(Me.PU2) = True Then
            Me.PT2 = CDbl(Me.PU2) * CDbl(Me.QU2)
                End If
        
            If IsNumeric(Me.PU3) = True Then
                Me.PT3 = CDbl(Me.PU3) * CDbl(Me.QU3)
                    End If
        
                If IsNumeric(Me.PU4) = True Then
                    Me.PT4 = CDbl(Me.PU4) * CDbl(Me.QU4)
                        End If
        
                    If IsNumeric(Me.PU5) = True Then
                        Me.PT5 = CDbl(Me.PU5) * CDbl(Me.QU5)
                            End If
Qui permet de calculer le prix de l'item en multipliant le prix unitaire (Me.PU) par la quantité(Me.QU) Lors des sortie de piece d'un stock (Ses un UserForm et non une macro)

Celle-ci S'inscrit sur une autre feuille afin de faire un suivit.
Mon probleme etant que lorsque je suis sur Excel 2013, il ne prend pas en considération les Centime (Si j'ai 2 * 1,50 il me donne le résultat 300$. Mais lorsque je le lance sur Excel 2007, tout ce calcule bien ... je ne comprend pas.

Merci de votre temps :)
 
Dernière édition:
C

Compte Supprimé 979

Guest
Re : Probleme code VBA (Multipliquation)

Bonjour

Multipliquation.... n'y a t'il pas un problème d'adéquation... mdr2.gif
 

Pièces jointes

  • mdr2.gif
    mdr2.gif
    9.6 KB · Affichages: 38
  • mdr2.gif
    mdr2.gif
    9.6 KB · Affichages: 39

Statistiques des forums

Discussions
312 176
Messages
2 085 959
Membres
103 065
dernier inscrit
HB ARPF 95