Avec cette ligne,
Code : Sélectionner tout - Visualiser dans une fenêtre à part
valeur = Format(Mid(enr, 102, 9), "#,0")
tu places un string dans ta cellule, non une valeur.
Mon problème étais la, je formatait la valeur avant de la mettre dans la cellule, du coup ca resous mes 2 problèmes

En remplacant la ligne
Code : Sélectionner tout - Visualiser dans une fenêtre à part
valeur = Format(Mid(enr, 102, 9), "#,0")
par
Code : Sélectionner tout - Visualiser dans une fenêtre à part
valeur = Format(Mid(enr, 102, 9), "0")
, je peux affecter la valeur à la cellule sans séparateur de millier (qui me génais pour la fonction SOMME, normal c'étais un string) et du coup en remplacant l'affectation
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
Worksheets(1).Cells(lig, 4).NumberFormat = "0"
Worksheets(1).Cells(lig, 4) = valeur
par
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
Worksheets(1).Cells(lig, 4).NumberFormat = "#,0"
Worksheets(1).Cells(lig, 4) = valeur
Je peux avoir l'affichage avec le séparateur de millier (il est d'ailleur coché dans le format Excel) et la fonction SOMME marche bien.

Merci beaucoup, je n'y comprenais plus rien