Probleme macro solver

[pasquetp]

Bonjour,

Je comprend pas j'ai une macro sur un solveur qui marche pour mettre des chiffres entier (macro prix). mais des que je mets des chiffres a virgule, ca ne marche pas

Pourriez vous voir cet macro?

Merci bcp pour votre aide

 

[CHALET53]

Re : Probleme macro solver

Bonjour,
Si tu parles du nombre saisi en réponse à la question Prix (valeur à atteindre) : en mettant un nombre avec virgule, je n'ai pas de problème, la colonne Q contient bien ce nombre

a+

 

[pasquetp]

Re : Probleme macro solver

Bonjour,

Merci de la reponse rapide

Je comprend pas alors

j'ai beau essayer avec une virgule puis un point et ca change rien dans la colonne Q

c'est dingue ca

Auriez vous un conseil?

 

[pasquetp]

Re : Probleme macro solver

j'ai procédé en mettant ce code

Sub prix()

s = Application.InputBox("valeur à atteindre?", "valeur à atteindre?")


'For a = 3 To 9

SolverOk SetCell:=Cells(3, 17), MaxMinVal:=3, ValueOf:=s, ByChange:=Cells(3, 3)

SolverSolve '(True)
' Next

End Sub

j'ai une erreur du solveur: "erreur dans le modele. veuillez verifier que toutes les cellules et toutes les contraintes sont valides."

 

[CHALET53]

Re : Probleme macro solver

Par défaut, sur excel, tu utilises la virgule ou le point comme séparateur décimal ?

 

[pasquetp]

Re : Probleme macro solver

la virgule

 

[pasquetp]

Re : Probleme macro solver

j'ai pourtant utilisé les deux par precautions, mais aucun n'a marché

 

[pasquetp]

Re : Probleme macro solver

je viens de verifier sur les parametres de l'ordi: c'est la virgule le separateur decimal

 

[CHALET53]

Re : Probleme macro solver

essaie de modifier les paramètres régionaux pour mettre le point par défaut

 

[pasquetp]

Re : Probleme macro solver

inutile,

j'ai finalement reussi

Dim saze As Single
Sub prix()


saze = Application.InputBox("valeur à atteindre?", "valeur à atteindre?", 1)


For a = 3 To 14

SolverOk SetCell:=Cells(a, 17), MaxMinVal:=3, ValueOf:=saze, ByChange:=Cells(a, 3)

SolverSolve (True)
Next

End Sub

ca na pas ete evident mais ca marche a present