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