Problème macro

[JULIANSAT]

Bonjour

Voir le fichier joint.
La macro «TransfertPoids » me permet d’avoir une synthèse des poids par famille de matière.
Sur la feuille1, le format des cellules pour les poids est en « Standard ».
La macro fonctionne bien avec des valeurs que je saisie moi-même (avec ou sans virgule).
Par contre, pour les valeurs en provenance d’un export depuis la CAO, j’ai un pb.
Pour exemple, j’ai collé 2 valeurs issues d’un export (en F8 et F9).
Pour la synthèse des poids j’ai : BOIS 707,4353,7 au lieu de 1061,1 (707,4 + 353,7) .
Je ne vois pas de pb au niveau du format de ces 2 cellules.

Merci beaucoup pour votre aide.

Bonne journée

Julian

 

[Dull]

Re : Problème macro

Salut JULIANSAT, le Forum

Il faut au préalable transformer Sheets("Synthèse Pds").Cells(CompteurDeLigne, 2) et Poids en Valeur
ce qui donnerait

Sheets("Synthèse Pds").Cells(CompteurDeLigne, 2) = Val(Sheets("Synthèse Pds").Cells(CompteurDeLigne, 2)) + Val(Poids)

a tester

Bonne Journée

 

[JNP]

Re : Problème macro

Bonjour le fil ,
Le plus simple est de dimensionner la variable Poids

Dim Poids As Double

Bonne suite

 

[JULIANSAT]

Re : Problème macro

merci beaucoup

bonne journée