Re,
Le problème vient du fichier "Cunac" où les longueurs ont des valeurs comme 123,3111 <|> 366,6889 <|> 283,3111 etc...
Pour régler le problème si les longueurs ont des valeurs entières (donc sans décimale) il suffit de typer la variable "Longueur" en Long au lieu de Double ce qui aura pour effet de supprimer les décimales.
Donc, dans le type Utilisateur, la voila modifiée :
Type Piece
IDPiece As Integer
IDSection As Integer
SousGroupe As String
Largeur As Double
Hauteur As Double
Longueur As Long ' <--- au lieu de Double
Qualite As Integer
Quantite As Integer
Prod As Long
EJ1 As Integer
EJ2 As Integer
End Type