Bonsoir Bernard,
Tu vas rire….
Ca fait encore "Ploufff!"
Cela ne vient sans doute pas de tes variables, soit disant mal définies, mais d'ici:
[B2] = MyValue
If (Application.WorksheetFunction.RoundUp([B2] / 100, 0) * 100) + (50 - [B2]) < 100 Then
[B3] = (Application.WorksheetFunction.RoundUp([B2] / 100, 0) * 100) + 50
Else
[B3] = [B2]
End If
J'ai constaté que tous les nombres en hauteur au-dessus de xx50 fonctionnaient bien;
mais que ceux en dessous coinçaient..
Je dois avouer que dans mon premier jet en calcul ordinaire "sans" VBA,
c'est sur ce palier que j'ai patiné un peu.
Sauf, qu'ici je suis devant une formulation "Function" machin que je ne maîtrise pas trop encore. (Tu viens de me l'apprendre!!!), je vais chercher cependant à comprendre.
Ne te prends pas la tête, à moins que cela te plaise.
Tu m'as déjà apporté beaucoup d'enseignements MAX utiles
qui m'ont, outre aidé dans mon projet, donné envie d'en apprendre plus.
Je pense l'avoir déjà dit par ailleurs, mais je le répète ici, tant cela colle bien à ce Forum:
"Donne un poisson à un homme, il se nourrira toute la journée.
Apprends-lui à pêcher, il se nourrira toute sa vie."
Merci Bernard pour ta canne à pêche,…. (Je n'ai pas osé dire "Chalut")
Bonne soirée et bien +
Yves