Bonjour,
j'ai un problème avec cette routine:
Private Sub cmd_Solver_Click()
'on remet le solver à zéro
SolverReset
'éléments du diagramme de classes (matrice)
matrice = Range(Cells(6, 3), Cells(15, 7))
' MsgBox TypeName(matrice) RENVOIE BEL ET BIEN UN VARIANT!!
'la case à minimiser
SolverOK Range("$N$2"), 2, matrice
'les éléments de la matrice doivent être binaires
n1 = SolverAdd(matrice, 5) //ICI
'dans chq ligne: un seul 1
somLigne = Range(Cells(6, 8), Cells(15, 8))
n2 = SolverAdd(somLigne, 2, 1)
'dans chq colonne: au moins un 1
somCol = Range(Cells(16, 3), Cells(16,7))
n3 = SolverAdd(somCol, 3, 1)
'et on résout
SolverSolve
End Sub
Et je suppose aussi dans les appels suivants à SolverAdd mais l'éxécution s'arrête à ce point, avec un message d'erreur: "Type incompatible"
Est-ce que vous pourriez m'aider s'il vous plaît c'est urgent!!
merci beaucoup...
Calamity